(M-01841): Moved into U-00025390.

(U-00025390): Use `->subsumptive'.

diff --git a/lisp/utf-2000/Ideograph-R017-Open-Box.el b/lisp/utf-2000/Ideograph-R017-Open-Box.el
index 83a63e0..645d6e0 100644 (file)
--- a/lisp/utf-2000/Ideograph-R017-Open-Box.el
+++ b/lisp/utf-2000/Ideograph-R017-Open-Box.el
@@ -702,16 +702,6 @@
     (=cns11643-5       . #x5A76)       ; �����
     ))
 (define-char
-  '((=>ucs             . #x25390)      ; 𥎐
-    (ideographic-radical . 17) ; ⼐
-    (ideographic-strokes . 15)
-    (total-strokes      . 17)
-    (->identical
-     ((=daikanwa         . 23906)      ; �����
-      ))
-    (=daikanwa         . 01841)        ; �����
-    ))
-(define-char
   '((ideographic-radical@ucs . 110)    ; ⽭
     (ideographic-strokes@ucs . 12)
     (ideographic-radical@ucs*sources
@@ -721,14 +711,16 @@
     (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)       ; ������
+    (->subsumptive
+     ((hanyu-dazidian    4 2768 16)
+      (=cns11643-5       . #x5A75)     ; �����
+      (=daikanwa         . 01841)      ; �����
+      (=hanziku-7        . #xE845)     ; ������
+      (=ucs@iso                  . #x25390)    ; �����
+      )
+     ((=daikanwa         . 23906)      ; �����
+      ))
     ))
 (define-char
   '((ideographic-radical . 17) ; ⼐