(A-cgnBC-8CC9): Changed from A-BC-8CC9.

(BC-8CC9-itaiji-001): Use A-cgnBC-8CC9 instead of A-BC-8CC9 as its
mother.
(BC-8CC9): Likewise; apply new conventions for glyph granularity.
(BC-8CC9-var-002): New character; use `<-subsumptive' for BC-8CC9.
(BC-8CC9-itaiji-002): Use A-cgnBC-8CC9 instead of A-BC-8CC9 as its
mother.

diff --git a/lisp/utf-2000/Ideograph-R131-Minister.el b/lisp/utf-2000/Ideograph-R131-Minister.el
index bcbef3b..c881a1c 100644 (file)
--- a/lisp/utf-2000/Ideograph-R131-Minister.el
+++ b/lisp/utf-2000/Ideograph-R131-Minister.el
@@ -330,13 +330,11 @@
     ))
 (define-char
   '((ideographic-radical . 131)        ; ⾂
-    (ideographic-strokes . 3)
-    (total-strokes      . 9)
-    (=>big5-cdp                . #x8CC9)       ; &A-CDP-8CC9;
+    (=>big5-cdp@cognate . #x8CC9)      ; &A-cgnCDP-8CC9;
     ))
 (define-char
   '((<-denotational
-     ((=>big5-cdp        . #x8CC9)     ; &A-CDP-8CC9;
+     ((=>big5-cdp@cognate . #x8CC9)    ; &A-cgnCDP-8CC9;
       ))
     (ideographic-radical . 131)        ; ⾂
     (ideographic-strokes . 3)
@@ -361,7 +359,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=>big5-cdp        . #x8CC9)     ; &A-CDP-8CC9;
+     ((=>big5-cdp@cognate . #x8CC9)    ; &A-cgnCDP-8CC9;
       ))
     (ideographic-radical . 131)        ; ⾂
     (ideographic-strokes . 3)
@@ -372,11 +370,32 @@
       )
      ((=ucs              . #x81E3)     ; 臣
       )
-     ((=big5-cdp         . #x8C74)     ; &CDP-8C74;
+     ((=+>big5-cdp       . #x8C74)     ; &o-CDP-8C74;
       ))
     (=big5-cdp         . #x8CC9)       ; &CDP-8CC9;
     (->subsumptive
-     ((==big5-cdp        . #x8CC9)     ; &g2-CDP-8CC9;
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+       (=ucs               . #x2FF0)   ; ⿰
+       )
+       ((=ucs              . #x81E3)   ; 臣
+       )
+       ((=big5-cdp         . #x8C74)   ; &CDP-8C74;
+       ))
+      (=>>big5-cdp       . #x8CC9)     ; &G-CDP-8CC9;
+      (->subsumptive
+       ((==big5-cdp        . #x8CC9)   ; &g2-CDP-8CC9;
+       ))
+      )
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+       (=ucs               . #x2FF0)   ; ⿰
+       )
+       ((=ucs              . #x81E3)   ; 臣
+       )
+       ((=big5-cdp         . #x89BC)   ; &CDP-89BC;
+       ))
+      (=big5-cdp-var-002  . #x8CC9)    ; &CDP-v002-8CC9;
       ))
     ))
 (define-char
@@ -433,7 +452,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=>big5-cdp        . #x8CC9)     ; &A-CDP-8CC9;
+     ((=>big5-cdp@cognate . #x8CC9)    ; &A-cgnCDP-8CC9;
       ))
     (ideographic-radical . 131)        ; ⾂
     (ideographic-strokes . 4)
@@ -674,7 +693,10 @@
      ((=ucs              . #x76E3)     ; 監
       ))
     (->subsumptive
-     ((==big5-cdp        . #x8D50)     ; &g2-CDP-8D50;
+     ((=>>big5-cdp       . #x8D50)     ; &G-CDP-8D50;
+      (->subsumptive
+       ((==big5-cdp        . #x8D50)   ; &g2-CDP-8D50;
+       ))
       ))
     ))
 (define-char