(M-01705): Map to U-00020601.

(U-00020601): Relate to M-01705; add strokes.
(U-00020602): Unify MH-0044 and M073555; add strokes.

diff --git a/lisp/utf-2000/Ideograph-R015-Ice.el b/lisp/utf-2000/Ideograph-R015-Ice.el
index 4139ac3..0d0ab74 100644 (file)
--- a/lisp/utf-2000/Ideograph-R015-Ice.el
+++ b/lisp/utf-2000/Ideograph-R015-Ice.el
@@ -2107,12 +2107,32 @@
     (=ucs              . #x20600)      ; 𠘀
     ))
 (define-char
-  '((ideographic-radical . 15) ; ⼎
+  '((=>ucs             . #x20601)      ; 𠘁
+    (ideographic-radical . 15) ; ⼎
     (ideographic-strokes . 11)
     (total-strokes      . 13)
     (=daikanwa         . 01705)        ; �����
     ))
 (define-char
+  '((morohashi-daikanwa        1705 0 0)
+    (ideographic-radical . 15) ; ⼎
+    (ideographic-strokes . 11)
+    (total-strokes      . 13)
+    (hanyu-dazidian    1 300 9)
+    (=hanziku-1                . #xE3DF)       ; ������
+    (=ucs              . #x20601)      ; 𠘁
+    ))
+(define-char
+  '((morohashi-daikanwa        ho 44)
+    (ideographic-radical . 15) ; ⼎
+    (ideographic-strokes . 11)
+    (total-strokes      . 13)
+    (hanyu-dazidian    1 300 13)
+    (=hanziku-1                . #xE3E3)       ; ������
+    (mojikyo           . 073555)       ; ������
+    (=ucs              . #x20602)      ; 𠘂
+    ))
+(define-char
   '((ideographic-radical . 15) ; ⼎
     (ideographic-strokes . 12)
     (total-strokes      . 14)
@@ -2894,18 +2914,6 @@
     ))
 (define-char
   '((ideographic-radical . 15) ; ⼎
-    (hanyu-dazidian    1 300 9)
-    (=hanziku-1                . #xE3DF)       ; ������
-    (=ucs              . #x20601)      ; 𠘁
-    ))
-(define-char
-  '((ideographic-radical . 15) ; ⼎
-    (hanyu-dazidian    1 300 13)
-    (=hanziku-1                . #xE3E3)       ; ������
-    (=ucs              . #x20602)      ; 𠘂
-    ))
-(define-char
-  '((ideographic-radical . 15) ; ⼎
     (hanyu-dazidian    1 301 10)
     (=hanziku-1                . #xE441)       ; ������
     (=ucs              . #x2060F)      ; 𠘏