From: tomo <tomo>
Date: Fri, 29 Mar 2002 07:53:13 +0000 (+0000)
Subject: - Use `=>ucs' instead of `->ucs'.
X-Git-Tag: r21-2-44-0_18-m7~176
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=a7bc6e53927e8d8a7810915b521d303508a87cb5;p=chise%2Fxemacs-chise.git

- Use `=>ucs' instead of `->ucs'.
- Merge mapping to CHINA3-JEF code points.
---

diff --git a/lisp/utf-2000/Ideograph-R070-Square.el b/lisp/utf-2000/Ideograph-R070-Square.el
index ee1b1ad..d99fb03 100644
--- a/lisp/utf-2000/Ideograph-R070-Square.el
+++ b/lisp/utf-2000/Ideograph-R070-Square.el
@@ -1,5 +1,5 @@
 (define-char
-  '((->ucs		. #x65B9)	; 方
+  '((=>ucs		. #x65B9)	; 方
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 0)
     (total-strokes	 . 4)
@@ -39,7 +39,7 @@
     (chinese-cns11643-6 . #x277B)	; ø»›¾¾
     ))
 (define-char
-  '((->ucs		. #x65BA)	; 斺
+  '((=>ucs		. #x65BA)	; 斺
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 4)
     (ideograph-daikanwa . 13625)	; ø¸ƒ”¹
@@ -53,7 +53,7 @@
     (ucs		. #x65BA)	; 斺
     ))
 (define-char
-  '((->ucs		. #x65BB)	; 斻
+  '((=>ucs		. #x65BB)	; 斻
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 4)
     (ideograph-daikanwa . 13626)	; ø¸ƒ”º
@@ -67,7 +67,7 @@
     (ucs		. #x65BB)	; 斻
     ))
 (define-char
-  '((->ucs		. #x65BC)	; 於
+  '((=>ucs		. #x65BC)	; 於
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 4)
     (total-strokes	 . 8)
@@ -101,7 +101,7 @@
     (chinese-cns11643-5 . #x2643)	; ø»™²¤
     ))
 (define-char
-  '((->ucs		. #x65BD)	; 施
+  '((=>ucs		. #x65BD)	; 施
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 5)
     (total-strokes	 . 9)
@@ -122,7 +122,7 @@
     (ucs		. #x65BD)	; 施
     ))
 (define-char
-  '((->ucs		. #x65BE)	; 斾
+  '((=>ucs		. #x65BE)	; 斾
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 5)
     (total-strokes	 . 9)
@@ -177,7 +177,7 @@
     (chinese-cns11643-6 . #x3164)	; ø»œ“
     ))
 (define-char
-  '((->ucs		. #x65C1)	; 旁
+  '((=>ucs		. #x65C1)	; 旁
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 6)
     (total-strokes	 . 10)
@@ -198,18 +198,26 @@
     (ucs		. #x65C1)	; 旁
     ))
 (define-char
-  '((ideographic-radical . 70)	; ⽅
+  '((=>ucs		. #x65C2)	; 旂
+    (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 6)
     (total-strokes	 . 10)
     (japanese-jisx0212		. #x4165)	; ø»‹””
-    (chinese-isoir165		. #x2D7E)	; ø»™
-    (chinese-cns11643-2		. #x2F54)	; ø»“¡·
     (japanese-jisx0213-2	. #x2D6E)	; ø»¤¯µ
     (ideograph-daikanwa		. 13638)	; ø¸ƒ•†
-    (ucs			. #x65C2)	; 旂
     ))
 (define-char
-  '((->ucs		. #x65C3)	; 旃
+  '((morohashi-daikanwa	13638 0 0)
+    (ideographic-radical . 70)	; ⽅
+    (ideographic-strokes . 6)
+    (total-strokes	 . 10)
+    (chinese-isoir165	. #x2D7E)	; ø»™
+    (chinese-cns11643-2 . #x2F54)	; ø»“¡·
+    (china3-jef		. #x50EB)	; øº…ƒ«
+    (ucs		. #x65C2)	; 旂
+    ))
+(define-char
+  '((=>ucs		. #x65C3)	; 旃
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 6)
     (total-strokes	 . 10)
@@ -229,7 +237,7 @@
     (ucs		. #x65C3)	; 旃
     ))
 (define-char
-  '((->ucs		. #x65C4)	; 旄
+  '((=>ucs		. #x65C4)	; 旄
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 6)
     (total-strokes	 . 10)
@@ -249,12 +257,13 @@
     (ucs		. #x65C4)	; 旄
     ))
 (define-char
-  '((->ucs		. #x65C5)	; 旅
+  '((=>ucs		. #x65C5)	; 旅
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 6)
     (total-strokes	 . 10)
     (korean-ksc5601	. #x5569)	; ø»‰§¬
     (ideograph-daikanwa . 13644)	; ø¸ƒ•Œ
+    (china3-jef		. #x50EC)	; øº…ƒ¬
     ))
 (define-char
   '((morohashi-daikanwa	13644 0 0)
@@ -267,7 +276,7 @@
     (ucs		. #x65C5)	; 旅
     ))
 (define-char
-  '((->ucs		. #x65C5)	; 旅
+  '((=>ucs		. #x65C5)	; 旅
     (morohashi-daikanwa	13644 0 2)
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 6)
@@ -277,7 +286,7 @@
     (japanese-jisx0208-1990	. #x4E39)	; ø½Š¸š
     ))
 (define-char
-  '((->ucs		. #x65C6)	; 旆
+  '((=>ucs		. #x65C6)	; 旆
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 6)
     (total-strokes	 . 10)
@@ -340,7 +349,7 @@
     (chinese-cns11643-6 . #x3835)	; ø»œ–¶
     ))
 (define-char
-  '((->ucs		. #x65C7)	; 旇
+  '((=>ucs		. #x65C7)	; 旇
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 7)
     (total-strokes	 . 11)
@@ -354,7 +363,7 @@
     (ucs		. #x65C7)	; 旇
     ))
 (define-char
-  '((->ucs		. #x65C8)	; 旈
+  '((=>ucs		. #x65C8)	; 旈
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 7)
     (total-strokes	 . 11)
@@ -369,14 +378,29 @@
     (ucs		. #x65C8)	; 旈
     ))
 (define-char
-  '((ideographic-radical . 70)	; ⽅
+  '((=>ucs		. #x65C9)	; 旉
+    (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 7)
     (total-strokes	 . 11)
     (japanese-jisx0212		. #x4167)	; ø»‹”–
-    (chinese-cns11643-3		. #x363F)	; ø»•µ¸
     (japanese-jisx0213-2	. #x2D6F)	; ø»¤¯¶
     (ideograph-daikanwa		. 13654)	; ø¸ƒ•–
-    (ucs			. #x65C9)	; 旉
+    (china3-jef			. #x50E9)	; øº…ƒ©
+    ))
+(define-char
+  '((morohashi-daikanwa	13654 0 0)
+    (ideographic-radical . 70)	; ⽅
+    (ideographic-strokes . 7)
+    (total-strokes	 . 11)
+    (ucs		. #x65C9)	; 旉
+    ))
+(define-char
+  '((=>ucs		. #x65C9)	; 旉
+    (morohashi-daikanwa	13654 0 1)
+    (ideographic-radical . 70)	; ⽅
+    (ideographic-strokes . 7)
+    (total-strokes	 . 11)
+    (chinese-cns11643-3 . #x363F)	; ø»•µ¸
     ))
 (define-char
   '((ideographic-radical . 70)	; ⽅
@@ -387,7 +411,7 @@
     (ucs		. #x65CA)	; 旊
     ))
 (define-char
-  '((->ucs		. #x65CB)	; 旋
+  '((=>ucs		. #x65CB)	; 旋
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 7)
     (total-strokes	 . 11)
@@ -408,7 +432,7 @@
     (ucs		. #x65CB)	; 旋
     ))
 (define-char
-  '((->ucs		. #x65CC)	; 旌
+  '((=>ucs		. #x65CC)	; 旌
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 7)
     (total-strokes	 . 11)
@@ -429,7 +453,7 @@
     (ucs		. #x65CC)	; 旌
     ))
 (define-char
-  '((->ucs		. #x65CD)	; 旍
+  '((=>ucs		. #x65CD)	; 旍
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 7)
     (total-strokes	 . 11)
@@ -443,7 +467,7 @@
     (ucs		. #x65CD)	; 旍
     ))
 (define-char
-  '((->ucs		. #x65CE)	; 旎
+  '((=>ucs		. #x65CE)	; 旎
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 7)
     (total-strokes	 . 11)
@@ -460,7 +484,7 @@
     (ucs		. #x65CE)	; 旎
     ))
 (define-char
-  '((->ucs		. #x65CF)	; 族
+  '((=>ucs		. #x65CF)	; 族
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 7)
     (total-strokes	 . 11)
@@ -525,12 +549,13 @@
     (chinese-cns11643-6 . #x404A)	; ø»œ¢»
     ))
 (define-char
-  '((->ucs		. #x65D0)	; 旐
+  '((=>ucs		. #x65D0)	; 旐
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 8)
     (total-strokes	 . 12)
     (japanese-jisx0212	. #x4169)	; ø»‹”˜
     (ideograph-daikanwa . 13668)	; ø¸ƒ•¤
+    (china3-jef		. #x50ED)	; øº…ƒ­
     ))
 (define-char
   '((morohashi-daikanwa	13668 0 0)
@@ -540,7 +565,7 @@
     (ucs		. #x65D0)	; 旐
     ))
 (define-char
-  '((->ucs		. #x65D1)	; 旑
+  '((=>ucs		. #x65D1)	; 旑
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 8)
     (total-strokes	 . 12)
@@ -603,7 +628,7 @@
     (ucs			. #x65D2)	; 旒
     ))
 (define-char
-  '((->ucs		. #x65D2)	; 旒
+  '((=>ucs		. #x65D2)	; 旒
     (morohashi-daikanwa	13676 0 1)
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 8)
@@ -611,7 +636,7 @@
     (chinese-cns11643-2 . #x3C43)	; ø»“´¬
     ))
 (define-char
-  '((->ucs		. #x65D3)	; 旓
+  '((=>ucs		. #x65D3)	; 旓
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 9)
     (total-strokes	 . 13)
@@ -625,14 +650,22 @@
     (ucs		. #x65D3)	; 旓
     ))
 (define-char
-  '((ideographic-radical . 70)	; ⽅
+  '((=>ucs		. #x65D4)	; 旔
+    (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 9)
     (total-strokes	 . 13)
     (japanese-jisx0212		. #x416A)	; ø»‹”™
-    (chinese-cns11643-4		. #x3D64)	; ø»˜Š³
     (japanese-jisx0213-2	. #x2D70)	; ø»¤¯·
     (ideograph-daikanwa		. 13679)	; ø¸ƒ•¯
-    (ucs			. #x65D4)	; 旔
+    (china3-jef			. #x50EE)	; øº…ƒ®
+    ))
+(define-char
+  '((morohashi-daikanwa	13679 0 0)
+    (ideographic-radical . 70)	; ⽅
+    (ideographic-strokes . 9)
+    (total-strokes	 . 13)
+    (chinese-cns11643-4 . #x3D64)	; ø»˜Š³
+    (ucs		. #x65D4)	; 旔
     ))
 (define-char
   '((ideographic-radical . 70)	; ⽅
@@ -667,7 +700,7 @@
     (chinese-cns11643-6 . #x5339)	; ø»œ¾¤
     ))
 (define-char
-  '((->ucs		. #x65D6)	; 旖
+  '((=>ucs		. #x65D6)	; 旖
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 10)
     (total-strokes	 . 14)
@@ -743,12 +776,20 @@
     (chinese-cns11643-7 . #x2356)	; ø»ž‚¥
     ))
 (define-char
-  '((ideographic-radical . 70)	; ⽅
+  '((=>ucs		. #x65D8)	; 旘
+    (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 12)
     (total-strokes	 . 16)
     (japanese-jisx0212	. #x416C)	; ø»‹”›
-    (chinese-cns11643-4 . #x504F)	; ø»˜¦˜
     (ideograph-daikanwa . 13694)	; ø¸ƒ•¾
+    (china3-jef		. #x50EF)	; øº…ƒ¯
+    ))
+(define-char
+  '((morohashi-daikanwa	13694 0 0)
+    (ideographic-radical . 70)	; ⽅
+    (ideographic-strokes . 12)
+    (total-strokes	 . 16)
+    (chinese-cns11643-4 . #x504F)	; ø»˜¦˜
     (ucs		. #x65D8)	; 旘
     ))
 (define-char
@@ -793,7 +834,7 @@
     (chinese-cns11643-7 . #x3843)	; ø»ž¡ˆ
     ))
 (define-char
-  '((->ucs		. #x65DB)	; 旛
+  '((=>ucs		. #x65DB)	; 旛
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 14)
     (total-strokes	 . 18)
@@ -841,7 +882,7 @@
     (chinese-cns11643-7 . #x3F74)	; ø»ž¬‹
     ))
 (define-char
-  '((->ucs		. #x65DC)	; 旜
+  '((=>ucs		. #x65DC)	; 旜
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 15)
     (total-strokes	 . 19)
@@ -855,7 +896,7 @@
     (ucs		. #x65DC)	; 旜
     ))
 (define-char
-  '((->ucs		. #x65DD)	; 旝
+  '((=>ucs		. #x65DD)	; 旝
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 15)
     (total-strokes	 . 19)
@@ -869,7 +910,7 @@
     (ucs		. #x65DD)	; 旝
     ))
 (define-char
-  '((->ucs		. #x65DE)	; 旞
+  '((=>ucs		. #x65DE)	; 旞
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 15)
     (total-strokes	 . 19)
@@ -889,12 +930,13 @@
     (chinese-cns11643-7 . #x473A)	; ø»ž·
     ))
 (define-char
-  '((->ucs		. #x65DF)	; 旟
+  '((=>ucs		. #x65DF)	; 旟
     (ideographic-radical . 70)	; ⽅
     (ideographic-strokes . 16)
     (total-strokes	 . 20)
     (japanese-jisx0212	. #x416D)	; ø»‹”œ
     (ideograph-daikanwa . 13709)	; ø¸ƒ–
+    (china3-jef		. #x50F0)	; øº…ƒ°
     ))
 (define-char
   '((morohashi-daikanwa	13709 0 0)