(U-00025626): Use `->subsumptive'; use

`ideographic-radical@{ucs|cns}'.

diff --git a/lisp/utf-2000/Ideograph-R113-Spirit.el b/lisp/utf-2000/Ideograph-R113-Spirit.el
index b60109d..87a9f5b 100644 (file)
--- a/lisp/utf-2000/Ideograph-R113-Spirit.el
+++ b/lisp/utf-2000/Ideograph-R113-Spirit.el
@@ -415,6 +415,23 @@
     (=hanziku-12       . #xEEDE)       ; ������
     ))
 (define-char
+  '((=>daikanwa                . 13171)        ; �����
+    (ideographic-radical@ucs . 113)    ; ⽰
+    (ideographic-strokes@ucs . 4)
+    (ideographic-radical@cns . 66)     ; ⽁
+    (ideographic-strokes@cns . 5)
+    (total-strokes      . 9)
+    (=ucs              . #x25626)      ; 𥘦
+    (->subsumptive
+     ((hanyu-dazidian    4 2388 4)
+      (=daikanwa         . 13171)      ; �����
+      (=hanziku-6        . #xEDC7)     ; ������
+      )
+     ((=cns11643-6       . #x315A)     ; �����
+      (=ucs@iso                  . #x25626)    ; �����
+      ))
+    ))
+(define-char
   '((=>ucs             . #x40FD)       ; 䃽
     (ideographic-radical . 113)        ; ⽰
     (ideographic-strokes . 4)
@@ -810,17 +827,6 @@
   '((ideographic-radical . 113)        ; ⽰
     (ideographic-strokes . 4)
     (total-strokes      . 9)
-    (->identical
-     ((=daikanwa         . 13171)      ; �����
-      ))
-    (hanyu-dazidian    4 2388 4)
-    (=ucs              . #x25626)      ; 𥘦
-    (=hanziku-6                . #xEDC7)       ; ������
-    ))
-(define-char
-  '((ideographic-radical . 113)        ; ⽰
-    (ideographic-strokes . 4)
-    (total-strokes      . 9)
     (=ucs              . #x25627)      ; 𥘧
     ))
 (define-char