From: tomo <tomo>
Date: Wed, 25 Feb 2004 05:28:44 +0000 (+0000)
Subject: (C6-3649): Unify U-00020AFB; use
X-Git-Tag: r21-4-14-chise-0_21-25-ii-identical^2~66
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=3421de1bc691a998641ec2be9885ecae15660408;p=chise%2Fxemacs-chise.git-

(C6-3649): Unify U-00020AFB; use
`ideographic-{radical|strokes}@{ucs|cns}' and
`ideographic-radical@cns*sources'.
(C4-4F7C): Unify U-00020057 and BC-85A3 instead of using
`->identical'; use `ideographic-{radical|strokes}@{ucs|cns}'.
---

diff --git a/lisp/utf-2000/Ideograph-R037-Big.el b/lisp/utf-2000/Ideograph-R037-Big.el
index 0369352..ff8197d 100644
--- a/lisp/utf-2000/Ideograph-R037-Big.el
+++ b/lisp/utf-2000/Ideograph-R037-Big.el
@@ -1547,10 +1547,14 @@
     (=ucs@cns		. #x595A)	; ø»’Ž¦
     ))
 (define-char
-  '((=>ucs		. #x20AFB)	; ð «»
-    (ideographic-radical . 37)	; ⼤
-    (ideographic-strokes . 7)
+  '((ideographic-radical@ucs . 28)	; ⼛
+    (ideographic-strokes@ucs . 8)
+    (ideographic-radical@cns . 37)	; ⼤
+    (ideographic-strokes@cns . 7)
+    (ideographic-radical@cns*sources
+     daikanwa cns11643)
     (total-strokes	 . 10)
+    (=ucs		. #x20AFB)	; ð «»
     (=cns11643-6	. #x3649)	; ø»œ”Ž
     (=daikanwa		. 05931)	; ø¸œ«
     ))
@@ -3098,14 +3102,15 @@
     (=daikanwa		. 06019)	; ø¸žƒ
     ))
 (define-char
-  '((=>ucs		. #x20057)	; 𠁗
-    (ideographic-radical . 37)	; ⼤
-    (ideographic-strokes . 13)
+  '((ideographic-radical@ucs . 1)	; ⼀
+    (ideographic-strokes@ucs . 15)
+    (ideographic-radical@cns . 37)	; ⼤
+    (ideographic-strokes@cns . 13)
     (total-strokes	 . 16)
-    (->identical
-     ((=ucs		  . #x20057)	; 𠁗
-      ))
+    (hanyu-dazidian	1 27 3)
+    (=ucs		. #x20057)	; 𠁗
     (=cns11643-4	. #x4F7C)	; ø»˜¥§
+    (=big5-cdp		. #x85A3)	; ý¢€ˆ–£
     (=daikanwa		. 49012)	; ø¸‹½´
     ))
 (define-char