From: tomo <tomo>
Date: Sun, 14 Oct 2001 17:35:36 +0000 (+0000)
Subject: Use `=>ucs' instead of `->ucs'.
X-Git-Tag: r21-2-41-utf-2000-0_18-1~198
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=4f0f2bff530a0f50989a94901a83038c8fee6c1c;p=chise%2Fxemacs-chise.git-

Use `=>ucs' instead of `->ucs'.
(JX2-2547): Unify U-00021647.
(C4-3678): Add `ideographic-structure'.
---

diff --git a/lisp/utf-2000/Ideograph-R037-Big.el b/lisp/utf-2000/Ideograph-R037-Big.el
index f1f076d..9d94214 100644
--- a/lisp/utf-2000/Ideograph-R037-Big.el
+++ b/lisp/utf-2000/Ideograph-R037-Big.el
@@ -24,7 +24,7 @@
     (ucs		. #x5928)	; 夨
     ))
 (define-char
-  '((->ucs		. #x5929)	; 天
+  '((=>ucs		. #x5929)	; 天
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 1)
     (total-strokes	 . 4)
@@ -76,7 +76,7 @@
     (ucs			. #x592B)	; 夫
     ))
 (define-char
-  '((->ucs		. #x592C)	; 夬
+  '((=>ucs		. #x592C)	; 夬
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 1)
     (total-strokes	 . 4)
@@ -903,7 +903,7 @@
     (ucs		. #x5950)	; 奐
     ))
 (define-char
-  '((->ucs		. #x5950)	; 奐
+  '((=>ucs		. #x5950)	; 奐
     (morohashi-daikanwa	5916 0 5)
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 6)
@@ -911,14 +911,14 @@
     (chinese-cns11643-1 . #x5059)	; ø»’ˆ–
     ))
 (define-char
-  '((->ucs		. #x5951)	; 契
+  '((=>ucs		. #x5951)	; 契
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 6)
     (total-strokes	 . 9)
     (ideograph-daikanwa . 05917)	; ø¸œ
     ))
 (define-char
-  '((->ucs		. #x5951)	; 契
+  '((=>ucs		. #x5951)	; 契
     (morohashi-daikanwa	5917 0 0)
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 6)
@@ -926,7 +926,7 @@
     (korean-ksc5601	. #x4C78)	; ø»‰š­
     ))
 (define-char
-  '((->ucs		. #x5951)	; 契
+  '((=>ucs		. #x5951)	; 契
     (morohashi-daikanwa	5917 0 1)
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 6)
@@ -943,7 +943,7 @@
     (ucs		. #x5951)	; 契
     ))
 (define-char
-  '((->ucs		. #x5951)	; 契
+  '((=>ucs		. #x5951)	; 契
     (morohashi-daikanwa	5917 0 3)
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 6)
@@ -1000,7 +1000,7 @@
     (ucs			. #x5954)	; 奔
     ))
 (define-char
-  '((->ucs		. #x5955)	; 奕
+  '((=>ucs		. #x5955)	; 奕
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 6)
     (total-strokes	 . 9)
@@ -1092,7 +1092,7 @@
     (ucs		. #x5959)	; 奙
     ))
 (define-char
-  '((->ucs		. #x595A)	; 奚
+  '((=>ucs		. #x595A)	; 奚
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 7)
     (total-strokes	 . 10)
@@ -1209,7 +1209,7 @@
     (ucs		. #x595C)	; 奜
     ))
 (define-char
-  '((->ucs		. #x595D)	; 奝
+  '((=>ucs		. #x595D)	; 奝
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 8)
     (total-strokes	 . 11)
@@ -1271,7 +1271,7 @@
     (ideograph-daikanwa . 05950)	; ø¸œ¾
     ))
 (define-char
-  '((->ucs		. #x595F)	; 奟
+  '((=>ucs		. #x595F)	; 奟
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 8)
     (total-strokes	 . 11)
@@ -1347,7 +1347,7 @@
     (ideograph-daikanwa . 05959)	; ø¸‡
     ))
 (define-char
-  '((->ucs		. #x5960)	; 奠
+  '((=>ucs		. #x5960)	; 奠
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 9)
     (total-strokes	 . 12)
@@ -1391,6 +1391,7 @@
     (total-strokes	 . 12)
     (japanese-jisx0213-2	. #x2547)	; ø»¤£ž
     (ideograph-daikanwa		. 05963)	; ø¸‹
+    (ucs			. #x21647)	; 𡙇
     ))
 (define-char
   '((morohashi-daikanwa	5963 0 2)
@@ -1400,7 +1401,7 @@
     (chinese-cns11643-4 . #x3C5E)	; ø»˜‰
     ))
 (define-char
-  '((->ucs		. #x5962)	; 奢
+  '((=>ucs		. #x5962)	; 奢
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 9)
     (total-strokes	 . 12)
@@ -1478,6 +1479,14 @@
   '((ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 9)
     (total-strokes	 . 12)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (ucs		  . #x2FF1)	; ⿱
+      )
+     ((ucs		  . #x5927)	; 大
+      )
+     ((ucs		  . #x54C1)	; 品
+      ))
     (chinese-cns11643-4 . #x3678)	; ø»˜€µ
     (ideograph-daikanwa . 05972)	; ø¸”
     ))
@@ -1626,7 +1635,7 @@
     (ucs			. #x5968)	; 奨
     ))
 (define-char
-  '((->ucs		. #x5968)	; 奨
+  '((=>ucs		. #x5968)	; 奨
     (morohashi-daikanwa	5990 1 0)
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 10)
@@ -1674,7 +1683,7 @@
     (chinese-cns11643-5 . #x452F)	; ø»šŸ²
     ))
 (define-char
-  '((->ucs		. #x596A)	; 奪
+  '((=>ucs		. #x596A)	; 奪
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 11)
     (total-strokes	 . 14)
@@ -1868,7 +1877,7 @@
     (ideograph-daikanwa . 06011)	; ø¸»
     ))
 (define-char
-  '((->ucs		. #x596E)	; 奮
+  '((=>ucs		. #x596E)	; 奮
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 13)
     (total-strokes	 . 16)