(A-BC-8CC6): New abstract node.

(BC-8CC6): New character; use `<-denotational' for A-BC-8CC6.
(A-BC-8851): Add `<-denotational@component' for A-compBC-8851.
(A-BC-8851-itaiji-001): New abstract node; use
`<-denotational@component' for A-compBC-8851.
(BC-8851-itaiji-001): New character; use `<-denotational' for
A-BC-8851-itaiji-001.
(A-BC-8851-itaiji-002): New abstract node; use
`<-denotational@component' for A-compBC-8851; unify
A-BC-8851-itaiji-003.
(BC-8851-itaiji-002): New character; use `<-denotational' for
A-BC-8851-itaiji-002.
(BC-8851-itaiji-003): Ditto.
(A-compBC-8851): New abstract node.

diff --git a/lisp/utf-2000/Ideograph-R083-Clan.el b/lisp/utf-2000/Ideograph-R083-Clan.el
index 4df70bd..329ff5c 100644 (file)
--- a/lisp/utf-2000/Ideograph-R083-Clan.el
+++ b/lisp/utf-2000/Ideograph-R083-Clan.el
@@ -59,6 +59,20 @@
     ))
 (define-char
   '((ideographic-radical . 83) ; ⽒
+    (ideographic-strokes . 0)
+    (=>big5-cdp                . #x8CC6)       ; &A-CDP-8CC6;
+    ))
+(define-char
+  '((<-denotational
+     ((=>big5-cdp        . #x8CC6)     ; &A-CDP-8CC6;
+      ))
+    (ideographic-radical . 83) ; ⽒
+    (ideographic-strokes . 0)
+    (total-strokes      . 3)
+    (=big5-cdp         . #x8CC6)       ; &CDP-8CC6;
+    ))
+(define-char
+  '((ideographic-radical . 83) ; ⽒
     (ideographic-strokes . 1)
     (total-strokes      . 5)
     (=ucs              . #x6C10)       ; 氐
@@ -265,7 +279,10 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 83) ; ⽒
+  '((<-denotational@component
+     ((=>big5-cdp@component . #x8851)  ; &A-compCDP-8851;
+      ))
+    (ideographic-radical . 83) ; ⽒
     (=>big5-cdp                . #x8851)       ; &A-CDP-8851;
     ))
 (define-char
@@ -278,6 +295,86 @@
     (=big5-cdp-var-001 . #x8851)       ; &CDP-v001-8851;
     ))
 (define-char
+  '((<-denotational@component
+     ((=>big5-cdp@component . #x8851)  ; &A-compCDP-8851;
+      ))
+    (ideographic-radical . 83) ; ⽒
+    (ideographic-structure@apparent
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=>ucs@component   . #x4E8C)     ; &A-compU+4E8C;
+      )
+     ((=>big5-cdp        . #x8CC6)     ; &A-CDP-8CC6;
+      ))
+    (=>big5-cdp-itaiji-001 . #x8851)   ; &A-CDP-i001-8851;
+    ))
+(define-char
+  '((<-denotational
+     ((=>big5-cdp-itaiji-001 . #x8851) ; &A-CDP-i001-8851;
+      ))
+    (ideographic-radical . 83) ; ⽒
+    (ideographic-strokes . 1)
+    (total-strokes      . 5)
+    (ideographic-structure@apparent
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=>ucs@component   . #x4E8C)     ; &A-compU+4E8C;
+      )
+     ((=big5-cdp         . #x8CC6)     ; &CDP-8CC6;
+      ))
+    (=big5-cdp-itaiji-001 . #x8851)    ; &CDP-i001-8851;
+    ))
+(define-char
+  '((<-denotational@component
+     ((=>big5-cdp@component . #x8851)  ; &A-compCDP-8851;
+      ))
+    (ideographic-radical . 83) ; ⽒
+    (ideographic-structure@apparent
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=>ucs@component   . #x5DE5)     ; &A-compU+5DE5;
+      )
+     ((=>big5-cdp        . #x8CC6)     ; &A-CDP-8CC6;
+      ))
+    (=>big5-cdp-itaiji-002 . #x8851)   ; &A-CDP-i002-8851;
+    (=>big5-cdp-itaiji-003 . #x8851)   ; &A-CDP-i002-8851;
+    ))
+(define-char
+  '((<-denotational
+     ((=>big5-cdp-itaiji-002 . #x8851) ; &A-CDP-i002-8851;
+      ))
+    (ideographic-radical . 83) ; ⽒
+    (ideographic-strokes . 1)
+    (total-strokes      . 6)
+    (ideographic-structure@apparent
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs@unicode      . #x5DE5)     ; &AJ1-01979;
+      )
+     ((=big5-cdp         . #x8CC6)     ; &CDP-8CC6;
+      ))
+    (=big5-cdp-itaiji-002 . #x8851)    ; &CDP-i002-8851;
+    ))
+(define-char
+  '((<-denotational
+     ((=>big5-cdp-itaiji-002 . #x8851) ; &A-CDP-i002-8851;
+      ))
+    (ideographic-radical . 83) ; ⽒
+    (ideographic-structure@apparent
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=big5-cdp         . #x8BC8)     ; &CDP-8BC8;
+      )
+     ((=big5-cdp         . #x8CC6)     ; &CDP-8CC6;
+      ))
+    (=big5-cdp-itaiji-003 . #x8851)    ; &CDP-i003-8851;
+    ))
+(define-char
   '((<-denotational
      ((=>big5-cdp        . #x8851)     ; &A-CDP-8851;
       ))
@@ -493,3 +590,7 @@
     (==>ucs@bucs       . #x6C0F)       ; &BUCS+6C0F;
     (==>daijiten       . 05932)        ; &BUCS+6C0F;
     ))
+(define-char
+  '((ideographic-radical . 83) ; ⽒
+    (=>big5-cdp@component . #x8851)    ; &A-compCDP-8851;
+    ))