(g2-JU+76F2): Use `->subsumptive' to add representative nodes.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R200-Hemp.el

diff --git a/lisp/utf-2000/Ideograph-R200-Hemp.el b/lisp/utf-2000/Ideograph-R200-Hemp.el
index ba1ff09..72ae080 100644 (file)
--- a/lisp/utf-2000/Ideograph-R200-Hemp.el
+++ b/lisp/utf-2000/Ideograph-R200-Hemp.el
@@ -46,20 +46,28 @@
     (ideographic-radical . 200)        ; ⿇
     (ideographic-strokes . 0)
     (total-strokes      . 11)
-    (=>>gt             . 65257)        ; &G-GT-65257;
-    (->subsumptive
-     ((=ucs@jis                  . #x9EBB)     ; &GT-65257;
-      (=jis-x0208        . #x4B63)     ; &GT-65257; [43-67]
-      (=jis-x0213-1      . #x4B63)     ; &I-JX1-4B63; [43-67]
-      (=big5-cdp         . #x8A5F)     ; &I-CDP-8A5F;
-      (=gt               . 65257)      ; &I-GT-65257;
-      (=gt-k             . 07878)      ; &I-GT-K07878;
-      (=gt-pj-1                  . #x4B63)     ; &I-GT-65257; [43-67]
-      (=daikanwa         . 47888)      ; &I-M-47888;
-      (=shinjigen        .  9804)      ; &GT-65257;
-      )
-     ((=ucs@unicode      . #x9EBB)     ; &G0-4269;
-      (=gb2312           . #x4269)     ; &G0-4269; [34-73]
+    (=ucs@unicode      . #x9EBB)       ; &GT-65257;
+    (=jis-x0208                . #x4B63)       ; &GT-65257; [43-67]
+    (=gb2312           . #x4269)       ; &I-G0-4269; [34-73]
+    (=jis-x0213-1      . #x4B63)       ; &I-JX1-4B63; [43-67]
+    (=big5-cdp         . #x8A5F)       ; &I-CDP-8A5F;
+    (=gt               . 65257)        ; &I-GT-65257;
+    (=gt-k             . 07878)        ; &I-GT-K07878;
+    (=gt-pj-1          . #x4B63)       ; &I-GT-65257; [43-67]
+    (=daikanwa         . 47888)        ; &I-M-47888;
+    (=shinjigen                .  9804)        ; &GT-65257;
+    (->subsumptive
+     ((==ucs@jis         . #x9EBB)     ; &R-GT-65257;
+      (==jis-x0208       . #x4B63)     ; &R-GT-65257; [43-67]
+      (==jis-x0213-1     . #x4B63)     ; &R-GT-65257; [43-67]
+      (==big5-cdp        . #x8A5F)     ; &R-GT-65257;
+      (==gt              . 65257)      ; &R-GT-65257;
+      (==gt-k            . 07878)      ; &R-GT-65257;
+      (==daikanwa        . 47888)      ; &R-GT-65257;
+      (==shinjigen       .  9804)      ; &R-GT-65257;
+      )
+     ((==ucs@unicode     . #x9EBB)     ; &R-UU+9EBB;
+      (==gb2312                  . #x4269)     ; &R-UU+9EBB; [34-73]
       ))
     ))
 (define-char
@@ -147,8 +155,13 @@
     (ideographic-radical . 200)        ; ⿇
     (ideographic-strokes . 3)
     (total-strokes      . 14)
-    (=>>ucs@jis                . #x9EBC)       ; &G-JU+9EBC;
-    (=>>ucs@cns                . #x9EBC)       ; &G-JU+9EBC;
+    (=>>ucs@jis                . #x9EBC)       ; &G-J0-5677;
+    (=>>ucs@cns                . #x9EBC)       ; &G-J0-5677;
+    (=>>jis-x0208      . #x5677)       ; &G-J0-5677; [54-87]
+    (=>>jis-x0213-1    . #x5677)       ; &G-J0-5677; [54-87]
+    (=>>gt             . 65265)        ; &G-J0-5677;
+    (=>>gt-k           . 11204)        ; &G-J0-5677;
+    (=>>daikanwa       . 47892)        ; &G-J0-5677;
     (->subsumptive
      ((=ucs@jis                  . #x9EBC)     ; &GT-65265;
       (=jis-x0208        . #x5677)     ; &GT-65265; [54-87]
@@ -169,13 +182,18 @@
     (ideographic-radical . 200)        ; ⿇
     (ideographic-strokes . 3)
     (total-strokes      . 14)
-    (=>>ucs@unicode    . #x9EBC)       ; &G-HD-FT-3564;
-    (=>>>ucs@unicode   . #x9EBC)       ; &G-HD-FT-3564;
-    (=>>hanyo-denshi/ft . #x3564)      ; &G-HD-FT-3564; [21-68]
+    (=>>ucs@unicode    . #x9EBC)       ; &HD-FT-3564;
+    (=ucs@unicode      . #x9EBC)       ; &HD-FT-3564;
+    (=hanyo-denshi/ft  . #x3564)       ; &HD-FT-3564; [21-68]
     (->subsumptive
-     ((=hanyo-denshi/ft          . #x3564)     ; &HD-FT-3564; [21-68]
+     ((=decomposition@hanyo-denshi
+       ((=ucs              . #x9EBC)   ; 麼
+       )
+       ((=ucs              . #xE0102)  ; 󠄂
+       ))
+      (==hanyo-denshi/ft  . #x3564)    ; &R-HD-FT-3564; [21-68]
       )
-     ((=ucs@unicode      . #x9EBC)     ; &UU+9EBC;
+     ((==ucs@unicode     . #x9EBC)     ; &R-UU+9EBC;
       ))
     ))
 (define-char
@@ -191,11 +209,13 @@
     (ideographic-radical . 200)        ; ⿇
     (ideographic-strokes . 3)
     (total-strokes      . 14)
-    (=>>ucs@jis                . #x9EBD)       ; &G-JU+9EBD;
-    (=>>ucs@cns                . #x9EBD)       ; &G-JU+9EBD;
+    (=>>ucs@jis                . #x9EBD)       ; &G-JX2-7E59;
+    (=>>ucs@cns                . #x9EBD)       ; &G-JX2-7E59;
+    (=>>jis-x0213-2    . #x7E59)       ; &G-JX2-7E59; [94-57]
+    (=>>daikanwa       . 47893)        ; &G-JX2-7E59;
     (->subsumptive
-     ((=ucs@jis                  . #x9EBD)     ; &M-47893;
-      (=jis-x0213-2      . #x7E59)     ; &M-47893; [94-57]
+     ((=ucs@jis                  . #x9EBD)     ; &JX2-7E59;
+      (=jis-x0213-2      . #x7E59)     ; &JX2-7E59; [94-57]
       (=daikanwa         . 47893)      ; &I-M-47893;
       )
      ((=ucs@cns                  . #x9EBD)     ; &C3-4B22;
@@ -502,7 +522,6 @@
   '((<-denotational
      ((=>jis-x0208       . #x4B7B)     ; &J97-4B7B; [43-91]
       ))
-    (morohashi-daikanwa        47909 1)
     (ideographic-radical . 200)        ; ⿇
     (ideographic-strokes . 7)
     (total-strokes      . 18)
@@ -511,6 +530,7 @@
     (=jis-x0213-1      . #x4B7B)       ; &I-JX1-4B7B; [43-91]
     (=gt               . 65290)        ; &I-GT-65290;
     (=gt-pj-1          . #x4B7B)       ; &I-GT-65290; [43-91]
+    (=daikanwa/+p      . 47909)        ; &GT-65290;
     ))
 (define-char
   '((ideographic-radical . 200)        ; ⿇