(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 (file)
--- 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)