(U-00026857): Use `->subsumptive' instead of `->identical' for C7-377E
authortomo <tomo>
Wed, 25 Feb 2004 07:34:53 +0000 (07:34 +0000)
committertomo <tomo>
Wed, 25 Feb 2004 07:34:53 +0000 (07:34 +0000)
and `->same-ideograph' for M-11349; use
`ideographic-{radical|strokes}@{ucs|cns}' and
`ideographic-radical@cns*sources'.
(H6-B3CA): Moved into U-00026857 and unified by M-11349.

lisp/utf-2000/Ideograph-R130-Meat.el

index ac308d1..3669866 100644 (file)
     (=gb12345          . #x7C4A)       ; 膶
     ))
 (define-char
+  '((=>daikanwa                . 11349)        ; 
+    (ideographic-radical@ucs . 130)    ; ⾁
+    (ideographic-strokes@ucs . 13)
+    (ideographic-radical@cns . 61)     ; ⼼
+    (ideographic-strokes@cns . 13)
+    (ideographic-radical@cns*sources
+     daikanwa cns11643)
+    (total-strokes      . 17)
+    (=ucs              . #x26857)      ; 𦡗
+    (->subsumptive
+     ((hanyu-dazidian    3 2116 13)
+      (=daikanwa         . 11349)      ; 
+      (=hanziku-6        . #xB3CA)     ; 
+      )
+     ((=cns11643-7       . #x377E)     ; 
+      (=ucs@iso                  . #x26857)    ; 
+      ))
+    ))
+(define-char
   '((ideographic-radical . 130)        ; ⾁
     (ideographic-strokes . 13)
     (total-strokes      . 17)
   '((ideographic-radical . 130)        ; ⾁
     (ideographic-strokes . 13)
     (total-strokes      . 17)
-    (->identical
-     ((=cns11643-7       . #x377E)     ; 
-      ))
-    (->same-ideograph
-     ((=daikanwa         . 11349)      ; 
-      ))
-    (=ucs              . #x26857)      ; 𦡗
-    ))
-(define-char
-  '((=>ucs             . #x26857)      ; 𦡗
-    (ideographic-radical . 130)        ; ⾁
-    (ideographic-strokes . 13)
-    (total-strokes      . 17)
-    (->identical
-     ((=daikanwa         . 11349)      ; 
-      ))
-    (hanyu-dazidian    3 2116 13)
-    (=hanziku-6                . #xB3CA)       ; 
-    ))
-(define-char
-  '((ideographic-radical . 130)        ; ⾁
-    (ideographic-strokes . 13)
-    (total-strokes      . 17)
     (=cns11643-7       . #x3A65)       ; 
     ))
 (define-char