From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 30 Sep 2018 12:48:57 +0000 (+0900)
Subject: (A-BC-86F7): New abstract node; use `<-denotational' for A-cgnBC-8DBA.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=f0d5cbfe4d412d23a8709831563ddb8bed47bb21;p=chise%2Fxemacs-chise.git

(A-BC-86F7): New abstract node; use `<-denotational' for A-cgnBC-8DBA.
(A-cgnBC-8DBA): New abstract node.
(A-BC-8DBA): Add `<-denotational' for A-cgnBC-8DBA; use
A-U+6211-itaiji-001 instead of "⿰禾戈" in `ideographic-structure'.
(BC-86F7): New character; use `<-denotational' for A-BC-86F7.
(BC-8DBA): Add `ideographic-structure'; add representative node.
(BC-86F7-var-001): New character; use `<-denotational' for A-BC-86F7.
---

diff --git a/lisp/utf-2000/Ideograph-R062-Halberd.el b/lisp/utf-2000/Ideograph-R062-Halberd.el
index 72f19aa..bc43d7b 100644
--- a/lisp/utf-2000/Ideograph-R062-Halberd.el
+++ b/lisp/utf-2000/Ideograph-R062-Halberd.el
@@ -1493,19 +1493,34 @@
     (=gb2312		. #x5458)	; &I-G0-5458; [52-56]
     ))
 (define-char
+  '((<-denotational
+     ((=>big5-cdp@cognate . #x8DBA)	; &A-cgnCDP-8DBA;
+      ))
+    (ideographic-radical . 62)	; â¼½
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
+      (=ucs		  . #x2FF8)	; ⿸
+      )
+     ((=>ucs-itaiji-001	  . #x6211)	; &A-U-i001+6211;
+      )
+     ((=ucs		  . #x4E43)	; 乃
+      ))
+    (=>big5-cdp		. #x86F7)	; &A-CDP-86F7;
+    ))
+(define-char
   '((ideographic-radical . 62)	; â¼½
+    (=>big5-cdp@cognate . #x8DBA)	; &A-cgnCDP-8DBA;
+    ))
+(define-char
+  '((<-denotational
+     ((=>big5-cdp@cognate . #x8DBA)	; &A-cgnCDP-8DBA;
+      ))
+    (ideographic-radical . 62)	; â¼½
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
       (=ucs		  . #x2FF8)	; ⿸
       )
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-	(=ucs		    . #x2FF0)	; â¿°
-	)
-       ((=ucs		    . #x79BE)	; 禾
-	)
-       ((=ucs		    . #x6208)	; 戈
-	))
+     ((=>ucs-itaiji-001	  . #x6211)	; &A-U-i001+6211;
       )
      ((=ucs		  . #x4E02)	; 丂
       ))
@@ -1513,12 +1528,43 @@
     ))
 (define-char
   '((<-denotational
+     ((=>big5-cdp	  . #x86F7)	; &A-CDP-86F7;
+      ))
+    (ideographic-radical . 62)	; â¼½
+    (ideographic-strokes . 6)
+    (total-strokes	 . 10)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
+      (=ucs		  . #x2FF8)	; ⿸
+      )
+     ((=ucs-itaiji-001	  . #x6211)	; &U-i001+6211;
+      )
+     ((=ucs		  . #x4E43)	; 乃
+      ))
+    (=big5-cdp		. #x86F7)	; &CDP-86F7;
+    (->subsumptive
+     ((==big5-cdp	  . #x86F7)	; &g2-CDP-86F7;
+      ))
+    ))
+(define-char
+  '((<-denotational
      ((=>big5-cdp	  . #x8DBA)	; &A-CDP-8DBA;
       ))
     (ideographic-radical . 62)	; â¼½
     (ideographic-strokes . 6)
     (total-strokes	 . 10)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
+      (=ucs		  . #x2FF8)	; ⿸
+      )
+     ((=ucs-itaiji-001	  . #x6211)	; &U-i001+6211;
+      )
+     ((=ucs		  . #x4E02)	; 丂
+      ))
     (=big5-cdp		. #x8DBA)	; &CDP-8DBA;
+    (->subsumptive
+     ((==big5-cdp	  . #x8DBA)	; &g2-CDP-8DBA;
+      ))
     ))
 (define-char
   '((ideographic-radical . 62)	; â¼½
@@ -1792,6 +1838,23 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>big5-cdp	  . #x86F7)	; &A-CDP-86F7;
+      ))
+    (ideographic-radical . 62)	; â¼½
+    (ideographic-strokes . 7)
+    (total-strokes	 . 11)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x79C0)	; 秀
+      )
+     ((=ucs		  . #x6208)	; 戈
+      ))
+    (=big5-cdp-var-001	. #x86F7)	; &CDP-v001-86F7;
+    ))
+(define-char
   '((=>ucs		. #x229C8)	; 𢧈
     (ideographic-radical . 62)	; â¼½
     (ideographic-strokes . 8)