X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fu02150-Number-Forms.el;h=341cb11347744b93404f8398a684d0d9127576da;hb=87afbb93a2a7dd46008e3b58093b4e5ea87ae95e;hp=6c972fcabddf412ead417f0cd2dc0f73956b6314;hpb=b5d8b5deea02394e1b2c2a70b814f03b65f36358;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/utf-2000/u02150-Number-Forms.el b/lisp/utf-2000/u02150-Number-Forms.el
index 6c972fc..341cb11 100644
--- a/lisp/utf-2000/u02150-Number-Forms.el
+++ b/lisp/utf-2000/u02150-Number-Forms.el
@@ -131,12 +131,15 @@
     (mirrored		. nil)
     (numeric-value	. 1)
     (->decomposition	compat #x0049)
-    (->lowercase	#x2170)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL ONE")
+      (ucs		  . #x2170)	; ⅰ
+      ))
     (chinese-gb2312		. #x2271)	; ø»„ˆ²
     (korean-ksc5601		. #x2530)	; ø»ˆ “
     (chinese-cns11643-1		. #x242B)	; ø»‘‡€
     (japanese-jisx0213-1	. #x2D35)	; ø»¢¤¸
-    (chinese-big5		. #xA2B9)	; øºŸž´
+    (chinese-big5		. #xA2B9)	; ý¢€ŠŠ¹
     (ucs			. #x2160)	; Ⅰ
     ))
 (define-char
@@ -146,12 +149,15 @@
     (mirrored		. nil)
     (numeric-value	. 2)
     (->decomposition	compat #x0049 #x0049)
-    (->lowercase	#x2171)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL TWO")
+      (ucs		  . #x2171)	; ⅱ
+      ))
     (chinese-gb2312		. #x2272)	; ø»„ˆ³
     (korean-ksc5601		. #x2531)	; ø»ˆ ”
     (chinese-cns11643-1		. #x242C)	; ø»‘‡
     (japanese-jisx0213-1	. #x2D36)	; ø»¢¤¹
-    (chinese-big5		. #xA2BA)	; øºŸžµ
+    (chinese-big5		. #xA2BA)	; ý¢€ŠŠº
     (ucs			. #x2161)	; Ⅱ
     ))
 (define-char
@@ -161,12 +167,15 @@
     (mirrored		. nil)
     (numeric-value	. 3)
     (->decomposition	compat #x0049 #x0049 #x0049)
-    (->lowercase	#x2172)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL THREE")
+      (ucs		  . #x2172)	; ⅲ
+      ))
     (chinese-gb2312		. #x2273)	; ø»„ˆ´
     (korean-ksc5601		. #x2532)	; ø»ˆ •
     (chinese-cns11643-1		. #x242D)	; ø»‘‡‚
     (japanese-jisx0213-1	. #x2D37)	; ø»¢¤º
-    (chinese-big5		. #xA2BB)	; øºŸž¶
+    (chinese-big5		. #xA2BB)	; ý¢€ŠŠ»
     (ucs			. #x2162)	; Ⅲ
     ))
 (define-char
@@ -176,12 +185,15 @@
     (mirrored		. nil)
     (numeric-value	. 4)
     (->decomposition	compat #x0049 #x0056)
-    (->lowercase	#x2173)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL FOUR")
+      (ucs		  . #x2173)	; ⅳ
+      ))
     (chinese-gb2312		. #x2274)	; ø»„ˆµ
     (korean-ksc5601		. #x2533)	; ø»ˆ –
     (chinese-cns11643-1		. #x242E)	; ø»‘‡ƒ
     (japanese-jisx0213-1	. #x2D38)	; ø»¢¤»
-    (chinese-big5		. #xA2BC)	; øºŸž·
+    (chinese-big5		. #xA2BC)	; ý¢€ŠŠ¼
     (ucs			. #x2163)	; Ⅳ
     ))
 (define-char
@@ -191,12 +203,15 @@
     (mirrored		. nil)
     (numeric-value	. 5)
     (->decomposition	compat #x0056)
-    (->lowercase	#x2174)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL FIVE")
+      (ucs		  . #x2174)	; ⅴ
+      ))
     (chinese-gb2312		. #x2275)	; ø»„ˆ¶
     (korean-ksc5601		. #x2534)	; ø»ˆ —
     (chinese-cns11643-1		. #x242F)	; ø»‘‡„
     (japanese-jisx0213-1	. #x2D39)	; ø»¢¤¼
-    (chinese-big5		. #xA2BD)	; øºŸž¸
+    (chinese-big5		. #xA2BD)	; ý¢€ŠŠ½
     (ucs			. #x2164)	; Ⅴ
     ))
 (define-char
@@ -206,12 +221,15 @@
     (mirrored		. nil)
     (numeric-value	. 6)
     (->decomposition	compat #x0056 #x0049)
-    (->lowercase	#x2175)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL SIX")
+      (ucs		  . #x2175)	; ⅵ
+      ))
     (chinese-gb2312		. #x2276)	; ø»„ˆ·
     (korean-ksc5601		. #x2535)	; ø»ˆ ˜
     (chinese-cns11643-1		. #x2430)	; ø»‘‡…
     (japanese-jisx0213-1	. #x2D3A)	; ø»¢¤½
-    (chinese-big5		. #xA2BE)	; øºŸž¹
+    (chinese-big5		. #xA2BE)	; ý¢€ŠŠ¾
     (ucs			. #x2165)	; Ⅵ
     ))
 (define-char
@@ -221,12 +239,15 @@
     (mirrored		. nil)
     (numeric-value	. 7)
     (->decomposition	compat #x0056 #x0049 #x0049)
-    (->lowercase	#x2176)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL SEVEN")
+      (ucs		  . #x2176)	; ⅶ
+      ))
     (chinese-gb2312		. #x2277)	; ø»„ˆ¸
     (korean-ksc5601		. #x2536)	; ø»ˆ ™
     (chinese-cns11643-1		. #x2431)	; ø»‘‡†
     (japanese-jisx0213-1	. #x2D3B)	; ø»¢¤¾
-    (chinese-big5		. #xA2BF)	; øºŸžº
+    (chinese-big5		. #xA2BF)	; ý¢€ŠŠ¿
     (ucs			. #x2166)	; Ⅶ
     ))
 (define-char
@@ -236,12 +257,15 @@
     (mirrored		. nil)
     (numeric-value	. 8)
     (->decomposition	compat #x0056 #x0049 #x0049 #x0049)
-    (->lowercase	#x2177)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL EIGHT")
+      (ucs		  . #x2177)	; ⅷ
+      ))
     (chinese-gb2312		. #x2278)	; ø»„ˆ¹
     (korean-ksc5601		. #x2537)	; ø»ˆ š
     (chinese-cns11643-1		. #x2432)	; ø»‘‡‡
     (japanese-jisx0213-1	. #x2D3C)	; ø»¢¤¿
-    (chinese-big5		. #xA2C0)	; øºŸž»
+    (chinese-big5		. #xA2C0)	; ý¢€Š‹€
     (ucs			. #x2167)	; Ⅷ
     ))
 (define-char
@@ -251,12 +275,15 @@
     (mirrored		. nil)
     (numeric-value	. 9)
     (->decomposition	compat #x0049 #x0058)
-    (->lowercase	#x2178)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL NINE")
+      (ucs		  . #x2178)	; ⅸ
+      ))
     (chinese-gb2312		. #x2279)	; ø»„ˆº
     (korean-ksc5601		. #x2538)	; ø»ˆ ›
     (chinese-cns11643-1		. #x2433)	; ø»‘‡ˆ
     (japanese-jisx0213-1	. #x2D3D)	; ø»¢¥€
-    (chinese-big5		. #xA2C1)	; øºŸž¼
+    (chinese-big5		. #xA2C1)	; ý¢€Š‹
     (ucs			. #x2168)	; Ⅸ
     ))
 (define-char
@@ -266,12 +293,15 @@
     (mirrored		. nil)
     (numeric-value	. 10)
     (->decomposition	compat #x0058)
-    (->lowercase	#x2179)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL TEN")
+      (ucs		  . #x2179)	; ⅹ
+      ))
     (chinese-gb2312		. #x227A)	; ø»„ˆ»
     (korean-ksc5601		. #x2539)	; ø»ˆ œ
     (chinese-cns11643-1		. #x2434)	; ø»‘‡‰
     (japanese-jisx0213-1	. #x2D3E)	; ø»¢¥
-    (chinese-big5		. #xA2C2)	; øºŸž½
+    (chinese-big5		. #xA2C2)	; ý¢€Š‹‚
     (ucs			. #x2169)	; Ⅹ
     ))
 (define-char
@@ -281,7 +311,10 @@
     (mirrored		. nil)
     (numeric-value	. 11)
     (->decomposition	compat #x0058 #x0049)
-    (->lowercase	#x217A)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL ELEVEN")
+      (ucs		  . #x217A)	; ⅺ
+      ))
     (chinese-gb2312		. #x227B)	; ø»„ˆ¼
     (japanese-jisx0213-1	. #x2D3F)	; ø»¢¥‚
     (ucs			. #x216A)	; Ⅺ
@@ -293,7 +326,10 @@
     (mirrored		. nil)
     (numeric-value	. 12)
     (->decomposition	compat #x0058 #x0049 #x0049)
-    (->lowercase	#x217B)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL TWELVE")
+      (ucs		  . #x217B)	; ⅻ
+      ))
     (chinese-gb2312		. #x227C)	; ø»„ˆ½
     (japanese-jisx0213-1	. #x2D57)	; ø»¢¥š
     (ucs			. #x216B)	; Ⅻ
@@ -305,7 +341,10 @@
     (mirrored		. nil)
     (numeric-value	. 50)
     (->decomposition	compat #x004C)
-    (->lowercase	#x217C)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL FIFTY")
+      (ucs		  . #x217C)	; ⅼ
+      ))
     (ucs		. #x216C)	; Ⅼ
     ))
 (define-char
@@ -315,7 +354,10 @@
     (mirrored		. nil)
     (numeric-value	. 100)
     (->decomposition	compat #x0043)
-    (->lowercase	#x217D)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL ONE HUNDRED")
+      (ucs		  . #x217D)	; ⅽ
+      ))
     (ucs		. #x216D)	; Ⅽ
     ))
 (define-char
@@ -325,7 +367,10 @@
     (mirrored		. nil)
     (numeric-value	. 500)
     (->decomposition	compat #x0044)
-    (->lowercase	#x217E)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL FIVE HUNDRED")
+      (ucs		  . #x217E)	; ⅾ
+      ))
     (ucs		. #x216E)	; Ⅾ
     ))
 (define-char
@@ -335,7 +380,10 @@
     (mirrored		. nil)
     (numeric-value	. 1000)
     (->decomposition	compat #x004D)
-    (->lowercase	#x217F)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL ONE THOUSAND")
+      (ucs		  . #x217F)	; ⅿ
+      ))
     (ucs		. #x216F)	; Ⅿ
     ))
 (define-char
@@ -345,11 +393,14 @@
     (mirrored		. nil)
     (numeric-value	. 1)
     (->decomposition	compat #x0069)
-    (->uppercase	#x2160)
-    (->titlecase	#x2160)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL ONE")
+      (ucs		  . #x2160)	; Ⅰ
+      ))
     (korean-ksc5601		. #x2521)	; ø»ˆ „
     (chinese-cns11643-1		. #x2635)	; ø»‘Š†
     (japanese-jisx0213-1	. #x2C35)	; ø»¢£š
+    (chinese-big5-eten		. #xC6B5)	; ý¢€Œšµ
     (ucs			. #x2170)	; ⅰ
     ))
 (define-char
@@ -359,11 +410,14 @@
     (mirrored		. nil)
     (numeric-value	. 2)
     (->decomposition	compat #x0069 #x0069)
-    (->uppercase	#x2161)
-    (->titlecase	#x2161)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL TWO")
+      (ucs		  . #x2161)	; Ⅱ
+      ))
     (korean-ksc5601		. #x2522)	; ø»ˆ …
     (chinese-cns11643-1		. #x2636)	; ø»‘Š‡
     (japanese-jisx0213-1	. #x2C36)	; ø»¢£›
+    (chinese-big5-eten		. #xC6B6)	; ý¢€Œš¶
     (ucs			. #x2171)	; ⅱ
     ))
 (define-char
@@ -373,11 +427,14 @@
     (mirrored		. nil)
     (numeric-value	. 3)
     (->decomposition	compat #x0069 #x0069 #x0069)
-    (->uppercase	#x2162)
-    (->titlecase	#x2162)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL THREE")
+      (ucs		  . #x2162)	; Ⅲ
+      ))
     (korean-ksc5601		. #x2523)	; ø»ˆ †
     (chinese-cns11643-1		. #x2637)	; ø»‘Šˆ
     (japanese-jisx0213-1	. #x2C37)	; ø»¢£œ
+    (chinese-big5-eten		. #xC6B7)	; ý¢€Œš·
     (ucs			. #x2172)	; ⅲ
     ))
 (define-char
@@ -387,11 +444,14 @@
     (mirrored		. nil)
     (numeric-value	. 4)
     (->decomposition	compat #x0069 #x0076)
-    (->uppercase	#x2163)
-    (->titlecase	#x2163)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL FOUR")
+      (ucs		  . #x2163)	; Ⅳ
+      ))
     (korean-ksc5601		. #x2524)	; ø»ˆ ‡
     (chinese-cns11643-1		. #x2638)	; ø»‘Š‰
     (japanese-jisx0213-1	. #x2C38)	; ø»¢£
+    (chinese-big5-eten		. #xC6B8)	; ý¢€Œš¸
     (ucs			. #x2173)	; ⅳ
     ))
 (define-char
@@ -401,11 +461,14 @@
     (mirrored		. nil)
     (numeric-value	. 5)
     (->decomposition	compat #x0076)
-    (->uppercase	#x2164)
-    (->titlecase	#x2164)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL FIVE")
+      (ucs		  . #x2164)	; Ⅴ
+      ))
     (korean-ksc5601		. #x2525)	; ø»ˆ ˆ
     (chinese-cns11643-1		. #x2639)	; ø»‘ŠŠ
     (japanese-jisx0213-1	. #x2C39)	; ø»¢£ž
+    (chinese-big5-eten		. #xC6B9)	; ý¢€Œš¹
     (ucs			. #x2174)	; ⅴ
     ))
 (define-char
@@ -415,11 +478,14 @@
     (mirrored		. nil)
     (numeric-value	. 6)
     (->decomposition	compat #x0076 #x0069)
-    (->uppercase	#x2165)
-    (->titlecase	#x2165)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL SIX")
+      (ucs		  . #x2165)	; Ⅵ
+      ))
     (korean-ksc5601		. #x2526)	; ø»ˆ ‰
     (chinese-cns11643-1		. #x263A)	; ø»‘Š‹
     (japanese-jisx0213-1	. #x2C3A)	; ø»¢£Ÿ
+    (chinese-big5-eten		. #xC6BA)	; ý¢€Œšº
     (ucs			. #x2175)	; ⅵ
     ))
 (define-char
@@ -429,11 +495,14 @@
     (mirrored		. nil)
     (numeric-value	. 7)
     (->decomposition	compat #x0076 #x0069 #x0069)
-    (->uppercase	#x2166)
-    (->titlecase	#x2166)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL SEVEN")
+      (ucs		  . #x2166)	; Ⅶ
+      ))
     (korean-ksc5601		. #x2527)	; ø»ˆ Š
     (chinese-cns11643-1		. #x263B)	; ø»‘ŠŒ
     (japanese-jisx0213-1	. #x2C3B)	; ø»¢£ 
+    (chinese-big5-eten		. #xC6BB)	; ý¢€Œš»
     (ucs			. #x2176)	; ⅶ
     ))
 (define-char
@@ -443,11 +512,14 @@
     (mirrored		. nil)
     (numeric-value	. 8)
     (->decomposition	compat #x0076 #x0069 #x0069 #x0069)
-    (->uppercase	#x2167)
-    (->titlecase	#x2167)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL EIGHT")
+      (ucs		  . #x2167)	; Ⅷ
+      ))
     (korean-ksc5601		. #x2528)	; ø»ˆ ‹
     (chinese-cns11643-1		. #x263C)	; ø»‘Š
     (japanese-jisx0213-1	. #x2C3C)	; ø»¢£¡
+    (chinese-big5-eten		. #xC6BC)	; ý¢€Œš¼
     (ucs			. #x2177)	; ⅷ
     ))
 (define-char
@@ -457,11 +529,14 @@
     (mirrored		. nil)
     (numeric-value	. 9)
     (->decomposition	compat #x0069 #x0078)
-    (->uppercase	#x2168)
-    (->titlecase	#x2168)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL NINE")
+      (ucs		  . #x2168)	; Ⅸ
+      ))
     (korean-ksc5601		. #x2529)	; ø»ˆ Œ
     (chinese-cns11643-1		. #x263D)	; ø»‘ŠŽ
     (japanese-jisx0213-1	. #x2C3D)	; ø»¢£¢
+    (chinese-big5-eten		. #xC6BD)	; ý¢€Œš½
     (ucs			. #x2178)	; ⅸ
     ))
 (define-char
@@ -471,11 +546,14 @@
     (mirrored		. nil)
     (numeric-value	. 10)
     (->decomposition	compat #x0078)
-    (->uppercase	#x2169)
-    (->titlecase	#x2169)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL TEN")
+      (ucs		  . #x2169)	; Ⅹ
+      ))
     (korean-ksc5601		. #x252A)	; ø»ˆ 
     (chinese-cns11643-1		. #x263E)	; ø»‘Š
     (japanese-jisx0213-1	. #x2C3E)	; ø»¢££
+    (chinese-big5-eten		. #xC6BE)	; ý¢€Œš¾
     (ucs			. #x2179)	; ⅹ
     ))
 (define-char
@@ -485,8 +563,10 @@
     (mirrored		. nil)
     (numeric-value	. 11)
     (->decomposition	compat #x0078 #x0069)
-    (->uppercase	#x216A)
-    (->titlecase	#x216A)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL ELEVEN")
+      (ucs		  . #x216A)	; Ⅺ
+      ))
     (japanese-jisx0213-1	. #x2C3F)	; ø»¢£¤
     (ucs			. #x217A)	; ⅺ
     ))
@@ -497,8 +577,10 @@
     (mirrored		. nil)
     (numeric-value	. 12)
     (->decomposition	compat #x0078 #x0069 #x0069)
-    (->uppercase	#x216B)
-    (->titlecase	#x216B)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL TWELVE")
+      (ucs		  . #x216B)	; Ⅻ
+      ))
     (japanese-jisx0213-1	. #x2C40)	; ø»¢£¥
     (ucs			. #x217B)	; ⅻ
     ))
@@ -509,8 +591,10 @@
     (mirrored		. nil)
     (numeric-value	. 50)
     (->decomposition	compat #x006C)
-    (->uppercase	#x216C)
-    (->titlecase	#x216C)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL FIFTY")
+      (ucs		  . #x216C)	; Ⅼ
+      ))
     (ucs		. #x217C)	; ⅼ
     ))
 (define-char
@@ -520,8 +604,10 @@
     (mirrored		. nil)
     (numeric-value	. 100)
     (->decomposition	compat #x0063)
-    (->uppercase	#x216D)
-    (->titlecase	#x216D)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL ONE HUNDRED")
+      (ucs		  . #x216D)	; Ⅽ
+      ))
     (ucs		. #x217D)	; ⅽ
     ))
 (define-char
@@ -531,8 +617,10 @@
     (mirrored		. nil)
     (numeric-value	. 500)
     (->decomposition	compat #x0064)
-    (->uppercase	#x216E)
-    (->titlecase	#x216E)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL FIVE HUNDRED")
+      (ucs		  . #x216E)	; Ⅾ
+      ))
     (ucs		. #x217E)	; ⅾ
     ))
 (define-char
@@ -542,8 +630,10 @@
     (mirrored		. nil)
     (numeric-value	. 1000)
     (->decomposition	compat #x006D)
-    (->uppercase	#x216F)
-    (->titlecase	#x216F)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL ONE THOUSAND")
+      (ucs		  . #x216F)	; Ⅿ
+      ))
     (ucs		. #x217F)	; ⅿ
     ))
 (define-char