(U-00024CA3): Use `->subsumptive' instead of using `->identical' for
authortomo <tomo>
Fri, 5 Mar 2004 11:03:32 +0000 (11:03 +0000)
committertomo <tomo>
Fri, 5 Mar 2004 11:03:32 +0000 (11:03 +0000)
M-49345.
(U-00024CCF): Unify C7-2C3B, GT-00098 and M-00065 instead of using
`->identical'; use `ideographic-{radical|strokes}@{ucs|cns}'.

lisp/utf-2000/Ideograph-R102-Field.el

index 04a91f0..3f887d2 100644 (file)
     (=hanziku-7                . #xB8B3)       ; 
     ))
 (define-char
+  '((=>daikanwa                . 49345)        ; 
+    (ideographic-strokes . 8)
+    (total-strokes      . 13)
+    (=ucs              . #x24CA3)      ; 𤲣
+    (->subsumptive
+     ((ideographic-radical . 103)      ; ⽦
+      (=cns11643-5       . #x4057)     ; 
+      (=daikanwa         . 49345)      ; 
+      )
+     ((ideographic-radical . 102)      ; ⽥
+      (hanyu-dazidian    4 2546 4)
+      (=hanziku-7        . #xB851)     ; 
+      (=ucs@iso                  . #x24CA3)    ; 
+      ))
+    ))
+(define-char
   '((ideographic-radical . 102)        ; ⽥
     (ideographic-strokes . 8)
     (total-strokes      . 13)
   '((ideographic-radical . 102)        ; ⽥
     (ideographic-strokes . 8)
     (total-strokes      . 13)
-    (->identical
-     ((=daikanwa         . 49345)      ; 
-      ))
-    (hanyu-dazidian    4 2546 4)
-    (=ucs              . #x24CA3)      ; 𤲣
-    (=hanziku-7                . #xB851)       ; 
-    ))
-(define-char
-  '((ideographic-radical . 102)        ; ⽥
-    (ideographic-strokes . 8)
-    (total-strokes      . 13)
     (=ucs              . #x24CA8)      ; 𤲨
     ))
 (define-char
     (=hanziku-7                . #xB942)       ; 
     ))
 (define-char
+  '((ideographic-radical@ucs . 102)    ; ⽥
+    (ideographic-strokes@ucs . 11)
+    (ideographic-radical@cns . 1)      ; ⼀
+    (ideographic-strokes@cns . 15)
+    (ideographic-radical@cns*sources
+     daikanwa cns11643)
+    (total-strokes      . 16)
+    (hanyu-dazidian    4 2552 4)
+    (=ucs              . #x24CCF)      ; 𤳏
+    (=cns11643-7       . #x2C3B)       ; 
+    (=gt               . 00098)        ; 
+    (=gt-pj-2          . #x3051)       ; 
+    (=daikanwa         . 00065)        ; 
+    (=hanziku-7                . #xB974)       ; 
+    ))
+(define-char
   '((ideographic-radical . 102)        ; ⽥
     (ideographic-strokes . 11)
     (total-strokes      . 16)
     ))
 (define-char
   '((ideographic-radical . 102)        ; ⽥
-    (ideographic-strokes . 11)
-    (total-strokes      . 16)
-    (->identical
-     ((=daikanwa         . 00065)      ; 
-      ))
-    (hanyu-dazidian    4 2552 4)
-    (=ucs              . #x24CCF)      ; 𤳏
-    (=hanziku-7                . #xB974)       ; 
-    ))
-(define-char
-  '((ideographic-radical . 102)        ; ⽥
     (ideographic-strokes . 12)
     (total-strokes      . 17)
     (=ucs              . #x7583)       ; 疃