(U+5C54): Use `->subsumptive'.

[chise/xemacs-chise.git-] / lisp / utf-2000 / Ideograph-R008-Lid.el

diff --git a/lisp/utf-2000/Ideograph-R008-Lid.el b/lisp/utf-2000/Ideograph-R008-Lid.el
index 99e6175..ac5444d 100644 (file)
--- a/lisp/utf-2000/Ideograph-R008-Lid.el
+++ b/lisp/utf-2000/Ideograph-R008-Lid.el
@@ -30,13 +30,12 @@
     (sound@ja/on/go    "mAu")
     (sound@ja/on/kan   "bAu")
     (=ucs              . #x4EA1)       ; 亡
+    (=big5             . #xA460)       ; &I-B-A460;
     (->subsumptive
      ((shinjigen-1       . 90)
-      (=big5             . #xA460)     ; &M-00287;
-      (=gt-k             . 00202)      ; &I-GT-K00202;
+      (=gt-k             . 00202)      ; &M-00287;
       (=gt-pj-k1         . #x3343)     ; &M-00287; [19-35]
       (=daikanwa         . 00287)      ; &I-M-00287;
-      (=ucs@big5         . #x4EA1)     ; &M-00287;
       )
      ((shinjigen-1       . 89)
       (shinjigen-2       . 89)
@@ -2549,24 +2548,14 @@
     (->subsumptive
      ((ideographic-radical . 123)      ; ⽺
       (ideographic-strokes . 8)
-      (ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-       (=ucs               . #x2FF1)   ; ⿱
-       )
-       ((ideographic-structure
-        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-         (=ucs               . #x2FF1) ; ⿱
-         )
-        ((=gt-k              . 01444)  ; &GT-K01444;
-         )
-        ((=ucs               . #x53E3) ; 口
-         ))
-       )
-       ((name              . "CJK RADICAL EWE")
-       (=ucs               . #x2EB8)   ; ⺸
-       ))
       (=daikanwa         . 49510)      ; &M-49510;
       )
+     ((ideographic-radical . 8)        ; ⼇
+      (ideographic-strokes . 13)
+      (hanyu-dazidian    1 292 5)
+      (=hanziku-1        . #xE256)     ; &HZK01-E256;
+      (=ucs@iso                  . #x20186)    ; &HZK01-E256;
+      )
      ((ideographic-radical . 123)      ; ⽺
       (ideographic-strokes . 8)
       (ideographic-structure
@@ -2594,12 +2583,6 @@
        (=ucs               . #x2EB8)   ; ⺸
        ))
       (=cns11643-7       . #x2679)     ; &C7-2679; [06-89]
-      )
-     ((ideographic-radical . 8)        ; ⼇
-      (ideographic-strokes . 13)
-      (hanyu-dazidian    1 292 5)
-      (=hanziku-1        . #xE256)     ; &HZK01-E256;
-      (=ucs@iso                  . #x20186)    ; &HZK01-E256;
       ))
     ))
 (define-char