(U+9F8D): Use `->subsumptive'.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R039-Child.el

diff --git a/lisp/utf-2000/Ideograph-R039-Child.el b/lisp/utf-2000/Ideograph-R039-Child.el
index 7a12b04..5eee2b1 100644 (file)
--- a/lisp/utf-2000/Ideograph-R039-Child.el
+++ b/lisp/utf-2000/Ideograph-R039-Child.el
@@ -167,17 +167,23 @@
   '((ideographic-radical . 39) ; ⼦
     (ideographic-strokes . 3)
     (total-strokes      . 6)
-    (shinjigen-2       . 1777)
     (=ucs              . #x5B57)       ; 字
-    (=jis-x0208                . #x3B7A)       ; &I-J90-3B7A; [27-90]
-    (=gb2312           . #x5756)       ; &I-G0-5756; [55-54]
-    (=ks-x1001         . #x6D2E)       ; &I-K0-6D2E; [77-14]
-    (=cns11643-1       . #x4773)       ; &I-C1-4773; [39-83]
     (=big5             . #xA672)       ; &I-B-A672;
-    (=gt               . 08734)        ; &I-GT-08734;
-    (=gt-k             . 01624)        ; &I-GT-K01624;
-    (=gt-pj-1          . #x3B7A)       ; &I-GT-08734; [27-90]
-    (=daikanwa         . 06942)        ; &I-M-06942;
+    (->subsumptive
+     ((shinjigen-1       . 1777)
+      (shinjigen-2       . 1777)
+      (=jis-x0208        . #x3B7A)     ; &GT-08734; [27-90]
+      (=ks-x1001         . #x6D2E)     ; &I-K0-6D2E; [77-14]
+      (=gt               . 08734)      ; &I-GT-08734;
+      (=gt-k             . 01624)      ; &I-GT-K01624;
+      (=gt-pj-1                  . #x3B7A)     ; &I-GT-08734; [27-90]
+      (=daikanwa         . 06942)      ; &I-M-06942;
+      (=ucs@jis                  . #x5B57)     ; &GT-08734;
+      )
+     ((=gb2312           . #x5756)     ; &C1-4773; [55-54]
+      (=cns11643-1       . #x4773)     ; &I-C1-4773; [39-83]
+      (=ucs@unicode      . #x5B57)     ; &C1-4773;
+      ))
     ))
 (define-char
   '((ideographic-radical . 39) ; ⼦
@@ -749,6 +755,10 @@
   '((ideographic-radical . 39) ; ⼦
     (ideographic-strokes . 6)
     (total-strokes      . 9)
+    (<-Large-Seal
+     ((=ks-x1001         . #x7264)     ; &M-38943; [82-68]
+      (=daikanwa         . 38943)      ; &I-M-38943;
+      ))
     (=ucs              . #x21966)      ; 𡥦
     (=cns11643-6       . #x3022)       ; &I-C6-3022; [16-02]
     (=daikanwa         . 06982)        ; &I-M-06982;
@@ -797,7 +807,13 @@
     (total-strokes      . 10)
     (=ucs              . #x5B6B)       ; 孫
     (->subsumptive
-     ((shinjigen-2       . 1792)
+     ((<-formed
+       ((=jis-x0208@1978    . #x423D)  ; &M-39038; [34-29]
+       (=ks-x1001          . #x6161)   ; &I-K0-6161; [65-65]
+       (=daikanwa          . 39038)    ; &I-M-39038;
+       ))
+      (shinjigen-1       . 1792)
+      (shinjigen-2       . 1792)
       (=jis-x0208        . #x4239)     ; &GT-08784; [34-25]
       (=ks-x1001         . #x615D)     ; &I-K0-615D; [65-61]
       (=big5             . #xAE5D)     ; &I-B-AE5D;