(U-00025390): Use `->subsumptive' instead of `->identical' for
[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R110-Spear.el
index de8e9b0..c770d9f 100644 (file)
     (=daikanwa         . 23902)        ; 
     ))
 (define-char
+  '((ideographic-radical@ucs . 110)    ; ⽭
+    (ideographic-strokes@ucs . 12)
+    (ideographic-radical@ucs*sources
+     daikanwa@r110 ucs)
+    (ideographic-radical@cns . 17)     ; ⼐
+    (ideographic-strokes@cns . 15)
+    (ideographic-radical@cns*sources
+     daikanwa@r017 cns11643)
+    (total-strokes      . 17)
+    (=ucs              . #x25390)      ; 𥎐
+    (->subsumptive
+     ((hanyu-dazidian    4 2768 16)
+      (=cns11643-5       . #x5A75)     ; 
+      (=daikanwa         . 01841)      ; 
+      (=hanziku-7        . #xE845)     ; 
+      (=ucs@iso                  . #x25390)    ; 
+      )
+     ((=daikanwa         . 23906)      ; 
+      ))
+    ))
+(define-char
   '((ideographic-radical . 110)        ; ⽭
     (ideographic-strokes . 12)
     (total-strokes      . 17)
     (=cns11643-7       . #x3965)       ; 
     ))
 (define-char
-  '((ideographic-radical@ucs . 110)    ; ⽭
-    (ideographic-strokes@ucs . 12)
-    (ideographic-radical@ucs*sources
-     daikanwa@r110 ucs)
-    (ideographic-radical@cns . 17)     ; ⼐
-    (ideographic-strokes@cns . 15)
-    (ideographic-radical@cns*sources
-     daikanwa@r017 cns11643)
-    (total-strokes      . 17)
-    (->identical
-     ((=daikanwa         . 01841)      ; 
-      ))
-    (hanyu-dazidian    4 2768 16)
-    (=ucs              . #x25390)      ; 𥎐
-    (=cns11643-5       . #x5A75)       ; 
-    (=daikanwa         . 23906)        ; 
-    (=hanziku-7                . #xE845)       ; 
-    ))
-(define-char
   '((ideographic-radical . 110)        ; ⽭
     (ideographic-strokes . 12)
     (total-strokes      . 17)