(U-00020B10): Use `->subsumptive' to integrate C6-6072; use
authortomo <tomo>
Wed, 15 Jun 2005 17:28:09 +0000 (17:28 +0000)
committertomo <tomo>
Wed, 15 Jun 2005 17:28:09 +0000 (17:28 +0000)
`ideographic-radical@ucs' instead of `ideographic-radical'; add
`ideographic-radical@cns', `ideographic-strokes@{ucs|cns}',
`ideographic-radical@cns*sources' and `total-strokes'.
(H1-F5F9): Unify M-49546.

lisp/utf-2000/Ideograph-R028-Private.el

index 5f2db58..437d6fa 100644 (file)
     (=hanziku-1                . #xDA5B)       ; &I-HZK01-DA5B;
     ))
 (define-char
+  '((ideographic-radical@ucs . 28)     ; ⼛
+    (ideographic-strokes@ucs . 12)
+    (ideographic-radical@cns . 130)    ; ⾁
+    (ideographic-strokes@cns . 10)
+    (ideographic-radical@cns*sources
+     daikanwa cns11643)
+    (total-strokes      . 14)
+    (=ucs              . #x20B10)      ; 𠬐
+    (->subsumptive
+     ((hanyu-dazidian    1 389 13)
+      (=daikanwa         . 49546)      ; &M-49546;
+      (=hanziku-1        . #xF5F9)     ; &I-HZK01-F5F9;
+      (=ucs@iso                  . #x20B10)    ; &M-49546;
+      )
+     ((=cns11643-6       . #x6072)     ; &C6-6072; [64-82]
+      ))
+    ))
+(define-char
   '((ideographic-radical . 28) ; ⼛
     (ideographic-strokes . 12)
     (total-strokes      . 14)
     ))
 (define-char
   '((ideographic-radical . 28) ; ⼛
-    (hanyu-dazidian    1 389 13)
-    (=ucs              . #x20B10)      ; 𠬐
-    (=hanziku-1                . #xF5F9)       ; &I-HZK01-F5F9;
-    ))
-(define-char
-  '((ideographic-radical . 28) ; ⼛
     (hanyu-dazidian    1 389 20)
     (=ucs              . #x20B18)      ; 𠬘
     (=hanziku-1                . #xF641)       ; &I-HZK01-F641;