(U-00020179): Use `->subsumptive'; integrate M-09212; use
authortomo <tomo>
Tue, 18 May 2004 08:18:41 +0000 (08:18 +0000)
committertomo <tomo>
Tue, 18 May 2004 08:18:41 +0000 (08:18 +0000)
`ideographic-{radical|strokes}@{ucs|daikanwa}'.

lisp/utf-2000/Ideograph-R008-Lid.el

index 0543186..ee5d516 100644 (file)
       ))
     ))
 (define-char
+  '((ideographic-radical@ucs . 8)      ; ⼇
+    (ideographic-strokes@ucs . 11)
+    (ideographic-radical@daikanwa . 52)        ; ⼳
+    (ideographic-strokes@daikanwa . 10)
+    (total-strokes      . 13)
+    (=ucs              . #x20179)      ; 𠅹
+    (->subsumptive
+     ((=daikanwa         . 09212)      ; &M-09212;
+      )
+     ((hanyu-dazidian    1 291 4)
+      (ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+       (=ucs               . #x2FF0)   ; ⿰
+       )
+       ((=ucs              . #x4EAD)   ; 亭
+       )
+       ((ideographic-structure
+        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+         (=ucs               . #x2FF1) ; ⿱
+         )
+        ((=ucs               . #x4E00) ; 一
+         )
+        ((=ucs               . #x5E7A) ; 幺
+         ))
+       ))
+      (=hanziku-1        . #xE1F4)     ; &HZK01-E1F4;
+      (=ucs@iso                  . #x20179)    ; &HZK01-E1F4;
+      ))
+    ))
+(define-char
   '((ideographic-radical . 8)  ; ⼇
     (ideographic-strokes . 11)
     (total-strokes      . 13)
   '((ideographic-radical . 8)  ; ⼇
     (ideographic-strokes . 11)
     (total-strokes      . 13)
-    (hanyu-dazidian    1 291 4)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-      (=ucs              . #x2FF0)     ; ⿰
-      )
-     ((=ucs              . #x4EAD)     ; 亭
-      )
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-       (=ucs               . #x2FF1)   ; ⿱
-       )
-       ((=ucs              . #x4E00)   ; 一
-       )
-       ((=ucs              . #x5E7A)   ; 幺
-       ))
-      ))
-    (=ucs              . #x20179)      ; 𠅹
-    (=hanziku-1                . #xE1F4)       ; &I-HZK01-E1F4;
-    ))
-(define-char
-  '((ideographic-radical . 8)  ; ⼇
-    (ideographic-strokes . 11)
-    (total-strokes      . 13)
     (hanyu-dazidian    8 10 2)
     (=ucs              . #x2017A)      ; 𠅺
     (=hanziku-12       . #xEBAC)       ; &I-HZK12-EBAC;