(U+4E03): Use `->unified'.

(U-00020055): Unify M-00064; use
`{ideographic|total}-strokes@{daikanwa|cns}' instead of
`{ideographic|total}-strokes'.

diff --git a/lisp/utf-2000/Ideograph-R001-One.el b/lisp/utf-2000/Ideograph-R001-One.el
index 6543f87..e288d46 100644 (file)
--- a/lisp/utf-2000/Ideograph-R001-One.el
+++ b/lisp/utf-2000/Ideograph-R001-One.el
@@ -118,31 +118,29 @@
     (=gt-pj-2          . #x3023)       ; ������
     ))
 (define-char
-  '((ideographic-radical . 1)  ; ⼀
+  '((=>daikanwa                . 00006)        ; �����
+    (ideographic-radical . 1)  ; ⼀
     (ideographic-strokes . 1)
     (total-strokes      . 2)
+    (->unified
+     ((shinjigen-1       . 3)
+      (shinjigen-2       . 3)
+      (=jis-x0208        . #x3C37)     ; �����
+      (=gb2312           . #x465F)     ; �����
+      (=ks-x1001         . #x7652)     ; �����
+      (=big5             . #xA443)     ; ������
+      (=big5-cdp         . #x88ED)     ; ������
+      (=gt               . 00004)      ; ������
+      (=gt-k             . 00046)      ; ������
+      (=gt-pj-1                  . #x3C37)     ; ������
+      (=daikanwa         . 00006)      ; �����
+      (=ucs@unicode      . #x4E03)     ; �����
+      )
+     ((=cns11643-1       . #x4424)     ; �����
+      (=ucs@cns                  . #x4E03)     ; �����
+      ))
     (hanyu-dazidian    1 3 3)
-    (shinjigen-1       . 3)
-    (shinjigen-2       . 3)
     (=ucs              . #x4E03)       ; 七
-    (=jis-x0208                . #x3C37)       ; �����
-    (=gb2312           . #x465F)       ; �����
-    (=ks-x1001         . #x7652)       ; �����
-    (=big5             . #xA443)       ; ������
-    (=big5-cdp         . #x88ED)       ; ������
-    (=gt               . 00004)        ; ������
-    (=gt-k             . 00046)        ; ������
-    (=gt-pj-1          . #x3C37)       ; ������
-    (=daikanwa         . 00006)        ; �����
-    ))
-(define-char
-  '((=>ucs             . #x4E03)       ; 七
-    (morohashi-daikanwa        6 0 0)
-    (ideographic-radical . 1)  ; ⼀
-    (ideographic-strokes . 1)
-    (total-strokes      . 2)
-    (=cns11643-1       . #x4424)       ; �����
-    (=ucs@cns          . #x4E03)       ; �����
     ))
 (define-char
   '((ideographic-radical . 1)  ; ⼀
@@ -2412,27 +2410,11 @@
     (=hanziku-1                . #xA9A3)       ; ������
     ))
 (define-char
-  '((=>ucs             . #x20055)      ; 𠁕
-    (ideographic-radical . 1)  ; ⼀
-    (ideographic-strokes . 15)
-    (total-strokes      . 16)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
-      (=ucs              . #x2FF3)     ; ⿳
-      )
-     ((=big5-cdp         . #x8DDD)     ; ������
-      )
-     ((=ucs              . #x5196)     ; 冖
-      )
-     ((=ucs              . #x4E9E)     ; 亞
-      ))
-    (=daikanwa         . 00064)        ; �����
-    ))
-(define-char
-  '((morohashi-daikanwa        64 0 0)
-    (ideographic-radical . 1)  ; ⼀
-    (ideographic-strokes . 14)
-    (total-strokes      . 15)
+  '((ideographic-radical . 1)  ; ⼀
+    (ideographic-strokes@daikanwa . 15)
+    (total-strokes@daikanwa      . 16)
+    (ideographic-strokes@cns . 14)
+    (total-strokes@cns      . 15)
     (hanyu-dazidian    1 27 4)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
@@ -2448,10 +2430,12 @@
     (=cns11643-7       . #x2121)       ; �����
     (=gt               . 00097)        ; ������
     (=gt-pj-2          . #x3050)       ; ������
+    (=daikanwa         . 00064)        ; �����
     (=hanziku-1                . #xA9B4)       ; ������
     ))
 (define-char
-  '((morohashi-daikanwa        64 0 4)
+  '((=>ucs             . #x20055)      ; 𠁕
+    (morohashi-daikanwa        64 0 4)
     (ideographic-radical . 1)  ; ⼀
     (ideographic-strokes . 13)
     (total-strokes      . 14)