X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fu02150-Number-Forms.el;h=f7d6f0a2d47cc566be31305e87fc5dce1bd69eb9;hb=90c42eb4fa13a7f78c7b3a33b62d80e4aff44e60;hp=c6d524d05e909662cf7504f0b01c9205a4515579;hpb=153e3b036553abb2028faff67f80c923555028b7;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/u02150-Number-Forms.el b/lisp/utf-2000/u02150-Number-Forms.el
index c6d524d..f7d6f0a 100644
--- a/lisp/utf-2000/u02150-Number-Forms.el
+++ b/lisp/utf-2000/u02150-Number-Forms.el
@@ -1,569 +1,689 @@
 (define-char
   '((name		. "VULGAR FRACTION ONE THIRD")
-    (ucs		. #x2153)
     (general-category	number other) ; Normative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 1/3)
     (->decomposition	fraction #x0031 #x2044 #x0033)
-    (korean-ksc5601		#x28 #x77)	; ø»ˆ¥´
-    (japanese-jisx0213-1	#x27 #x78)	; ⅓
+    (korean-ksc5601	. #x2877)	; ø»ˆ¥´
+    (=jis-x0213-1-2000	. #x2778)	; ø»¢‡
+    (ucs		. #x2153)	; ⅓
     ))
 (define-char
   '((name		. "VULGAR FRACTION TWO THIRDS")
-    (ucs		. #x2154)
     (general-category	number other) ; Normative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 2/3)
     (->decomposition	fraction #x0032 #x2044 #x0033)
-    (korean-ksc5601		#x28 #x78)	; ø»ˆ¥µ
-    (japanese-jisx0213-1	#x27 #x79)	; ⅔
+    (korean-ksc5601	. #x2878)	; ø»ˆ¥µ
+    (=jis-x0213-1-2000	. #x2779)	; ø»¢ˆ
+    (ucs		. #x2154)	; ⅔
     ))
 (define-char
   '((name		. "VULGAR FRACTION ONE FIFTH")
-    (ucs		. #x2155)
     (general-category	number other) ; Normative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 1/5)
     (->decomposition	fraction #x0031 #x2044 #x0035)
-    (japanese-jisx0213-1	#x27 #x7A)	; ⅕
+    (=jis-x0213-1-2000	. #x277A)	; ø»¢‰
+    (ucs		. #x2155)	; ⅕
     ))
 (define-char
   '((name		. "VULGAR FRACTION TWO FIFTHS")
-    (ucs		. #x2156)
     (general-category	number other) ; Normative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 2/5)
     (->decomposition	fraction #x0032 #x2044 #x0035)
+    (ucs		. #x2156)	; ⅖
     ))
 (define-char
   '((name		. "VULGAR FRACTION THREE FIFTHS")
-    (ucs		. #x2157)
     (general-category	number other) ; Normative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 3/5)
     (->decomposition	fraction #x0033 #x2044 #x0035)
+    (ucs		. #x2157)	; ⅗
     ))
 (define-char
   '((name		. "VULGAR FRACTION FOUR FIFTHS")
-    (ucs		. #x2158)
     (general-category	number other) ; Normative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 4/5)
     (->decomposition	fraction #x0034 #x2044 #x0035)
+    (ucs		. #x2158)	; ⅘
     ))
 (define-char
   '((name		. "VULGAR FRACTION ONE SIXTH")
-    (ucs		. #x2159)
     (general-category	number other) ; Normative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 1/6)
     (->decomposition	fraction #x0031 #x2044 #x0036)
+    (ucs		. #x2159)	; ⅙
     ))
 (define-char
   '((name		. "VULGAR FRACTION FIVE SIXTHS")
-    (ucs		. #x215A)
     (general-category	number other) ; Normative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 5/6)
     (->decomposition	fraction #x0035 #x2044 #x0036)
+    (ucs		. #x215A)	; ⅚
     ))
 (define-char
   '((name		. "VULGAR FRACTION ONE EIGHTH")
-    (ucs		. #x215B)
     (general-category	number other) ; Normative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 1/8)
     (->decomposition	fraction #x0031 #x2044 #x0038)
-    (korean-ksc5601	#x28 #x7B)	; ø»ˆ¥¸
+    (korean-ksc5601	. #x287B)	; ø»ˆ¥¸
+    (ucs		. #x215B)	; ⅛
     ))
 (define-char
   '((name		. "VULGAR FRACTION THREE EIGHTHS")
-    (ucs		. #x215C)
     (general-category	number other) ; Normative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 3/8)
     (->decomposition	fraction #x0033 #x2044 #x0038)
-    (korean-ksc5601	#x28 #x7C)	; ø»ˆ¥¹
+    (korean-ksc5601	. #x287C)	; ø»ˆ¥¹
+    (ucs		. #x215C)	; ⅜
     ))
 (define-char
   '((name		. "VULGAR FRACTION FIVE EIGHTHS")
-    (ucs		. #x215D)
     (general-category	number other) ; Normative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 5/8)
     (->decomposition	fraction #x0035 #x2044 #x0038)
-    (korean-ksc5601	#x28 #x7D)	; ø»ˆ¥º
+    (korean-ksc5601	. #x287D)	; ø»ˆ¥º
+    (ucs		. #x215D)	; ⅝
     ))
 (define-char
   '((name		. "VULGAR FRACTION SEVEN EIGHTHS")
-    (ucs		. #x215E)
     (general-category	number other) ; Normative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 7/8)
     (->decomposition	fraction #x0037 #x2044 #x0038)
-    (korean-ksc5601	#x28 #x7E)	; ø»ˆ¥»
+    (korean-ksc5601	. #x287E)	; ø»ˆ¥»
+    (ucs		. #x215E)	; ⅞
     ))
 (define-char
   '((name		. "FRACTION NUMERATOR ONE")
-    (ucs		. #x215F)
     (general-category	number other) ; Normative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 1)
     (->decomposition	fraction #x0031 #x2044)
+    (ucs		. #x215F)	; ⅟
     ))
 (define-char
   '((name		. "ROMAN NUMERAL ONE")
-    (ucs		. #x2160)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 1)
     (->decomposition	compat #x0049)
-    (->lowercase	#x2170)
-    (chinese-gb2312		#x22 #x71)	; ø»„ˆ²
-    (korean-ksc5601		#x25 #x30)	; ø»ˆ “
-    (chinese-cns11643-1		#x24 #x2B)	; ø»‘‡€
-    (japanese-jisx0213-1	#x2D #x35)	; Ⅰ
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL ONE")
+      (ucs		  . #x2170)	; ⅰ
+      ))
+    (chinese-gb2312	. #x2271)	; ø»„ˆ²
+    (korean-ksc5601	. #x2530)	; ø»ˆ “
+    (chinese-cns11643-1 . #x242B)	; ø»‘‡€
+    (=jis-x0213-1-2000	. #x2D35)	; ø»¢¤¸
+    (chinese-big5	. #xA2B9)	; ý¢€ŠŠ¹
+    (=jef-china3	. #x77DE)	; øº‡Ÿž
+    (ucs		. #x2160)	; Ⅰ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL TWO")
-    (ucs		. #x2161)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 2)
     (->decomposition	compat #x0049 #x0049)
-    (->lowercase	#x2171)
-    (chinese-gb2312		#x22 #x72)	; ø»„ˆ³
-    (korean-ksc5601		#x25 #x31)	; ø»ˆ ”
-    (chinese-cns11643-1		#x24 #x2C)	; ø»‘‡
-    (japanese-jisx0213-1	#x2D #x36)	; Ⅱ
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL TWO")
+      (ucs		  . #x2171)	; ⅱ
+      ))
+    (chinese-gb2312	. #x2272)	; ø»„ˆ³
+    (korean-ksc5601	. #x2531)	; ø»ˆ ”
+    (chinese-cns11643-1 . #x242C)	; ø»‘‡
+    (=jis-x0213-1-2000	. #x2D36)	; ø»¢¤¹
+    (chinese-big5	. #xA2BA)	; ý¢€ŠŠº
+    (=jef-china3	. #x77DF)	; øº‡ŸŸ
+    (ucs		. #x2161)	; Ⅱ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL THREE")
-    (ucs		. #x2162)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 3)
     (->decomposition	compat #x0049 #x0049 #x0049)
-    (->lowercase	#x2172)
-    (chinese-gb2312		#x22 #x73)	; ø»„ˆ´
-    (korean-ksc5601		#x25 #x32)	; ø»ˆ •
-    (chinese-cns11643-1		#x24 #x2D)	; ø»‘‡‚
-    (japanese-jisx0213-1	#x2D #x37)	; Ⅲ
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL THREE")
+      (ucs		  . #x2172)	; ⅲ
+      ))
+    (chinese-gb2312	. #x2273)	; ø»„ˆ´
+    (korean-ksc5601	. #x2532)	; ø»ˆ •
+    (chinese-cns11643-1 . #x242D)	; ø»‘‡‚
+    (=jis-x0213-1-2000	. #x2D37)	; ø»¢¤º
+    (chinese-big5	. #xA2BB)	; ý¢€ŠŠ»
+    (=jef-china3	. #x77E0)	; øº‡Ÿ 
+    (ucs		. #x2162)	; Ⅲ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL FOUR")
-    (ucs		. #x2163)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 4)
     (->decomposition	compat #x0049 #x0056)
-    (->lowercase	#x2173)
-    (chinese-gb2312		#x22 #x74)	; ø»„ˆµ
-    (korean-ksc5601		#x25 #x33)	; ø»ˆ –
-    (chinese-cns11643-1		#x24 #x2E)	; ø»‘‡ƒ
-    (japanese-jisx0213-1	#x2D #x38)	; Ⅳ
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL FOUR")
+      (ucs		  . #x2173)	; ⅳ
+      ))
+    (chinese-gb2312	. #x2274)	; ø»„ˆµ
+    (korean-ksc5601	. #x2533)	; ø»ˆ –
+    (chinese-cns11643-1 . #x242E)	; ø»‘‡ƒ
+    (=jis-x0213-1-2000	. #x2D38)	; ø»¢¤»
+    (chinese-big5	. #xA2BC)	; ý¢€ŠŠ¼
+    (=jef-china3	. #x77E1)	; øº‡Ÿ¡
+    (ucs		. #x2163)	; Ⅳ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL FIVE")
-    (ucs		. #x2164)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 5)
     (->decomposition	compat #x0056)
-    (->lowercase	#x2174)
-    (chinese-gb2312		#x22 #x75)	; ø»„ˆ¶
-    (korean-ksc5601		#x25 #x34)	; ø»ˆ —
-    (chinese-cns11643-1		#x24 #x2F)	; ø»‘‡„
-    (japanese-jisx0213-1	#x2D #x39)	; Ⅴ
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL FIVE")
+      (ucs		  . #x2174)	; ⅴ
+      ))
+    (chinese-gb2312	. #x2275)	; ø»„ˆ¶
+    (korean-ksc5601	. #x2534)	; ø»ˆ —
+    (chinese-cns11643-1 . #x242F)	; ø»‘‡„
+    (=jis-x0213-1-2000	. #x2D39)	; ø»¢¤¼
+    (chinese-big5	. #xA2BD)	; ý¢€ŠŠ½
+    (=jef-china3	. #x77E2)	; øº‡Ÿ¢
+    (ucs		. #x2164)	; Ⅴ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL SIX")
-    (ucs		. #x2165)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 6)
     (->decomposition	compat #x0056 #x0049)
-    (->lowercase	#x2175)
-    (chinese-gb2312		#x22 #x76)	; ø»„ˆ·
-    (korean-ksc5601		#x25 #x35)	; ø»ˆ ˜
-    (chinese-cns11643-1		#x24 #x30)	; ø»‘‡…
-    (japanese-jisx0213-1	#x2D #x3A)	; Ⅵ
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL SIX")
+      (ucs		  . #x2175)	; ⅵ
+      ))
+    (chinese-gb2312	. #x2276)	; ø»„ˆ·
+    (korean-ksc5601	. #x2535)	; ø»ˆ ˜
+    (chinese-cns11643-1 . #x2430)	; ø»‘‡…
+    (=jis-x0213-1-2000	. #x2D3A)	; ø»¢¤½
+    (chinese-big5	. #xA2BE)	; ý¢€ŠŠ¾
+    (=jef-china3	. #x77E3)	; øº‡Ÿ£
+    (ucs		. #x2165)	; Ⅵ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL SEVEN")
-    (ucs		. #x2166)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 7)
     (->decomposition	compat #x0056 #x0049 #x0049)
-    (->lowercase	#x2176)
-    (chinese-gb2312		#x22 #x77)	; ø»„ˆ¸
-    (korean-ksc5601		#x25 #x36)	; ø»ˆ ™
-    (chinese-cns11643-1		#x24 #x31)	; ø»‘‡†
-    (japanese-jisx0213-1	#x2D #x3B)	; Ⅶ
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL SEVEN")
+      (ucs		  . #x2176)	; ⅶ
+      ))
+    (chinese-gb2312	. #x2277)	; ø»„ˆ¸
+    (korean-ksc5601	. #x2536)	; ø»ˆ ™
+    (chinese-cns11643-1 . #x2431)	; ø»‘‡†
+    (=jis-x0213-1-2000	. #x2D3B)	; ø»¢¤¾
+    (chinese-big5	. #xA2BF)	; ý¢€ŠŠ¿
+    (=jef-china3	. #x77E4)	; øº‡Ÿ¤
+    (ucs		. #x2166)	; Ⅶ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL EIGHT")
-    (ucs		. #x2167)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 8)
     (->decomposition	compat #x0056 #x0049 #x0049 #x0049)
-    (->lowercase	#x2177)
-    (chinese-gb2312		#x22 #x78)	; ø»„ˆ¹
-    (korean-ksc5601		#x25 #x37)	; ø»ˆ š
-    (chinese-cns11643-1		#x24 #x32)	; ø»‘‡‡
-    (japanese-jisx0213-1	#x2D #x3C)	; Ⅷ
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL EIGHT")
+      (ucs		  . #x2177)	; ⅷ
+      ))
+    (chinese-gb2312	. #x2278)	; ø»„ˆ¹
+    (korean-ksc5601	. #x2537)	; ø»ˆ š
+    (chinese-cns11643-1 . #x2432)	; ø»‘‡‡
+    (=jis-x0213-1-2000	. #x2D3C)	; ø»¢¤¿
+    (chinese-big5	. #xA2C0)	; ý¢€Š‹€
+    (=jef-china3	. #x77E5)	; øº‡Ÿ¥
+    (ucs		. #x2167)	; Ⅷ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL NINE")
-    (ucs		. #x2168)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 9)
     (->decomposition	compat #x0049 #x0058)
-    (->lowercase	#x2178)
-    (chinese-gb2312		#x22 #x79)	; ø»„ˆº
-    (korean-ksc5601		#x25 #x38)	; ø»ˆ ›
-    (chinese-cns11643-1		#x24 #x33)	; ø»‘‡ˆ
-    (japanese-jisx0213-1	#x2D #x3D)	; Ⅸ
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL NINE")
+      (ucs		  . #x2178)	; ⅸ
+      ))
+    (chinese-gb2312	. #x2279)	; ø»„ˆº
+    (korean-ksc5601	. #x2538)	; ø»ˆ ›
+    (chinese-cns11643-1 . #x2433)	; ø»‘‡ˆ
+    (=jis-x0213-1-2000	. #x2D3D)	; ø»¢¥€
+    (chinese-big5	. #xA2C1)	; ý¢€Š‹
+    (=jef-china3	. #x77E6)	; øº‡Ÿ¦
+    (ucs		. #x2168)	; Ⅸ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL TEN")
-    (ucs		. #x2169)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 10)
     (->decomposition	compat #x0058)
-    (->lowercase	#x2179)
-    (chinese-gb2312		#x22 #x7A)	; ø»„ˆ»
-    (korean-ksc5601		#x25 #x39)	; ø»ˆ œ
-    (chinese-cns11643-1		#x24 #x34)	; ø»‘‡‰
-    (japanese-jisx0213-1	#x2D #x3E)	; Ⅹ
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL TEN")
+      (ucs		  . #x2179)	; ⅹ
+      ))
+    (chinese-gb2312	. #x227A)	; ø»„ˆ»
+    (korean-ksc5601	. #x2539)	; ø»ˆ œ
+    (chinese-cns11643-1 . #x2434)	; ø»‘‡‰
+    (=jis-x0213-1-2000	. #x2D3E)	; ø»¢¥
+    (chinese-big5	. #xA2C2)	; ý¢€Š‹‚
+    (=jef-china3	. #x77E7)	; øº‡Ÿ§
+    (ucs		. #x2169)	; Ⅹ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL ELEVEN")
-    (ucs		. #x216A)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 11)
     (->decomposition	compat #x0058 #x0049)
-    (->lowercase	#x217A)
-    (chinese-gb2312		#x22 #x7B)	; ø»„ˆ¼
-    (japanese-jisx0213-1	#x2D #x3F)	; Ⅺ
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL ELEVEN")
+      (ucs		  . #x217A)	; ⅺ
+      ))
+    (chinese-gb2312	. #x227B)	; ø»„ˆ¼
+    (=jis-x0213-1-2000	. #x2D3F)	; ø»¢¥‚
+    (ucs		. #x216A)	; Ⅺ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL TWELVE")
-    (ucs		. #x216B)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 12)
     (->decomposition	compat #x0058 #x0049 #x0049)
-    (->lowercase	#x217B)
-    (chinese-gb2312		#x22 #x7C)	; ø»„ˆ½
-    (japanese-jisx0213-1	#x2D #x57)	; Ⅻ
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL TWELVE")
+      (ucs		  . #x217B)	; ⅻ
+      ))
+    (chinese-gb2312	. #x227C)	; ø»„ˆ½
+    (=jis-x0213-1-2000	. #x2D57)	; ø»¢¥š
+    (ucs		. #x216B)	; Ⅻ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL FIFTY")
-    (ucs		. #x216C)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 50)
     (->decomposition	compat #x004C)
-    (->lowercase	#x217C)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL FIFTY")
+      (ucs		  . #x217C)	; ⅼ
+      ))
+    (ucs		. #x216C)	; Ⅼ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL ONE HUNDRED")
-    (ucs		. #x216D)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 100)
     (->decomposition	compat #x0043)
-    (->lowercase	#x217D)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL ONE HUNDRED")
+      (ucs		  . #x217D)	; ⅽ
+      ))
+    (ucs		. #x216D)	; Ⅽ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL FIVE HUNDRED")
-    (ucs		. #x216E)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 500)
     (->decomposition	compat #x0044)
-    (->lowercase	#x217E)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL FIVE HUNDRED")
+      (ucs		  . #x217E)	; ⅾ
+      ))
+    (ucs		. #x216E)	; Ⅾ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL ONE THOUSAND")
-    (ucs		. #x216F)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 1000)
     (->decomposition	compat #x004D)
-    (->lowercase	#x217F)
+    (->lowercase
+     ((name		  . "SMALL ROMAN NUMERAL ONE THOUSAND")
+      (ucs		  . #x217F)	; ⅿ
+      ))
+    (ucs		. #x216F)	; Ⅿ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL ONE")
-    (ucs		. #x2170)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 1)
     (->decomposition	compat #x0069)
-    (->uppercase	#x2160)
-    (->titlecase	#x2160)
-    (korean-ksc5601		#x25 #x21)	; ø»ˆ „
-    (chinese-cns11643-1		#x26 #x35)	; ø»‘Š†
-    (japanese-jisx0213-1	#x2C #x35)	; ⅰ
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL ONE")
+      (ucs		  . #x2160)	; Ⅰ
+      ))
+    (korean-ksc5601	. #x2521)	; ø»ˆ „
+    (chinese-cns11643-1 . #x2635)	; ø»‘Š†
+    (=jis-x0213-1-2000	. #x2C35)	; ø»¢£š
+    (=big5-eten		. #xC6B5)	; ý¢€Œšµ
+    (=jef-china3	. #x77EB)	; øº‡Ÿ«
+    (ucs		. #x2170)	; ⅰ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL TWO")
-    (ucs		. #x2171)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 2)
     (->decomposition	compat #x0069 #x0069)
-    (->uppercase	#x2161)
-    (->titlecase	#x2161)
-    (korean-ksc5601		#x25 #x22)	; ø»ˆ …
-    (chinese-cns11643-1		#x26 #x36)	; ø»‘Š‡
-    (japanese-jisx0213-1	#x2C #x36)	; ⅱ
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL TWO")
+      (ucs		  . #x2161)	; Ⅱ
+      ))
+    (korean-ksc5601	. #x2522)	; ø»ˆ …
+    (chinese-cns11643-1 . #x2636)	; ø»‘Š‡
+    (=jis-x0213-1-2000	. #x2C36)	; ø»¢£›
+    (=big5-eten		. #xC6B6)	; ý¢€Œš¶
+    (=jef-china3	. #x77EC)	; øº‡Ÿ¬
+    (ucs		. #x2171)	; ⅱ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL THREE")
-    (ucs		. #x2172)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 3)
     (->decomposition	compat #x0069 #x0069 #x0069)
-    (->uppercase	#x2162)
-    (->titlecase	#x2162)
-    (korean-ksc5601		#x25 #x23)	; ø»ˆ †
-    (chinese-cns11643-1		#x26 #x37)	; ø»‘Šˆ
-    (japanese-jisx0213-1	#x2C #x37)	; ⅲ
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL THREE")
+      (ucs		  . #x2162)	; Ⅲ
+      ))
+    (korean-ksc5601	. #x2523)	; ø»ˆ †
+    (chinese-cns11643-1 . #x2637)	; ø»‘Šˆ
+    (=jis-x0213-1-2000	. #x2C37)	; ø»¢£œ
+    (=big5-eten		. #xC6B7)	; ý¢€Œš·
+    (=jef-china3	. #x77ED)	; øº‡Ÿ­
+    (ucs		. #x2172)	; ⅲ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL FOUR")
-    (ucs		. #x2173)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 4)
     (->decomposition	compat #x0069 #x0076)
-    (->uppercase	#x2163)
-    (->titlecase	#x2163)
-    (korean-ksc5601		#x25 #x24)	; ø»ˆ ‡
-    (chinese-cns11643-1		#x26 #x38)	; ø»‘Š‰
-    (japanese-jisx0213-1	#x2C #x38)	; ⅳ
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL FOUR")
+      (ucs		  . #x2163)	; Ⅳ
+      ))
+    (korean-ksc5601	. #x2524)	; ø»ˆ ‡
+    (chinese-cns11643-1 . #x2638)	; ø»‘Š‰
+    (=jis-x0213-1-2000	. #x2C38)	; ø»¢£
+    (=big5-eten		. #xC6B8)	; ý¢€Œš¸
+    (=jef-china3	. #x77EE)	; øº‡Ÿ®
+    (ucs		. #x2173)	; ⅳ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL FIVE")
-    (ucs		. #x2174)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 5)
     (->decomposition	compat #x0076)
-    (->uppercase	#x2164)
-    (->titlecase	#x2164)
-    (korean-ksc5601		#x25 #x25)	; ø»ˆ ˆ
-    (chinese-cns11643-1		#x26 #x39)	; ø»‘ŠŠ
-    (japanese-jisx0213-1	#x2C #x39)	; ⅴ
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL FIVE")
+      (ucs		  . #x2164)	; Ⅴ
+      ))
+    (korean-ksc5601	. #x2525)	; ø»ˆ ˆ
+    (chinese-cns11643-1 . #x2639)	; ø»‘ŠŠ
+    (=jis-x0213-1-2000	. #x2C39)	; ø»¢£ž
+    (=big5-eten		. #xC6B9)	; ý¢€Œš¹
+    (=jef-china3	. #x77EF)	; øº‡Ÿ¯
+    (ucs		. #x2174)	; ⅴ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL SIX")
-    (ucs		. #x2175)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 6)
     (->decomposition	compat #x0076 #x0069)
-    (->uppercase	#x2165)
-    (->titlecase	#x2165)
-    (korean-ksc5601		#x25 #x26)	; ø»ˆ ‰
-    (chinese-cns11643-1		#x26 #x3A)	; ø»‘Š‹
-    (japanese-jisx0213-1	#x2C #x3A)	; ⅵ
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL SIX")
+      (ucs		  . #x2165)	; Ⅵ
+      ))
+    (korean-ksc5601	. #x2526)	; ø»ˆ ‰
+    (chinese-cns11643-1 . #x263A)	; ø»‘Š‹
+    (=jis-x0213-1-2000	. #x2C3A)	; ø»¢£Ÿ
+    (=big5-eten		. #xC6BA)	; ý¢€Œšº
+    (=jef-china3	. #x77F0)	; øº‡Ÿ°
+    (ucs		. #x2175)	; ⅵ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL SEVEN")
-    (ucs		. #x2176)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 7)
     (->decomposition	compat #x0076 #x0069 #x0069)
-    (->uppercase	#x2166)
-    (->titlecase	#x2166)
-    (korean-ksc5601		#x25 #x27)	; ø»ˆ Š
-    (chinese-cns11643-1		#x26 #x3B)	; ø»‘ŠŒ
-    (japanese-jisx0213-1	#x2C #x3B)	; ⅶ
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL SEVEN")
+      (ucs		  . #x2166)	; Ⅶ
+      ))
+    (korean-ksc5601	. #x2527)	; ø»ˆ Š
+    (chinese-cns11643-1 . #x263B)	; ø»‘ŠŒ
+    (=jis-x0213-1-2000	. #x2C3B)	; ø»¢£ 
+    (=big5-eten		. #xC6BB)	; ý¢€Œš»
+    (=jef-china3	. #x77F1)	; øº‡Ÿ±
+    (ucs		. #x2176)	; ⅶ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL EIGHT")
-    (ucs		. #x2177)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 8)
     (->decomposition	compat #x0076 #x0069 #x0069 #x0069)
-    (->uppercase	#x2167)
-    (->titlecase	#x2167)
-    (korean-ksc5601		#x25 #x28)	; ø»ˆ ‹
-    (chinese-cns11643-1		#x26 #x3C)	; ø»‘Š
-    (japanese-jisx0213-1	#x2C #x3C)	; ⅷ
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL EIGHT")
+      (ucs		  . #x2167)	; Ⅷ
+      ))
+    (korean-ksc5601	. #x2528)	; ø»ˆ ‹
+    (chinese-cns11643-1 . #x263C)	; ø»‘Š
+    (=jis-x0213-1-2000	. #x2C3C)	; ø»¢£¡
+    (=big5-eten		. #xC6BC)	; ý¢€Œš¼
+    (=jef-china3	. #x77F2)	; øº‡Ÿ²
+    (ucs		. #x2177)	; ⅷ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL NINE")
-    (ucs		. #x2178)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 9)
     (->decomposition	compat #x0069 #x0078)
-    (->uppercase	#x2168)
-    (->titlecase	#x2168)
-    (korean-ksc5601		#x25 #x29)	; ø»ˆ Œ
-    (chinese-cns11643-1		#x26 #x3D)	; ø»‘ŠŽ
-    (japanese-jisx0213-1	#x2C #x3D)	; ⅸ
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL NINE")
+      (ucs		  . #x2168)	; Ⅸ
+      ))
+    (korean-ksc5601	. #x2529)	; ø»ˆ Œ
+    (chinese-cns11643-1 . #x263D)	; ø»‘ŠŽ
+    (=jis-x0213-1-2000	. #x2C3D)	; ø»¢£¢
+    (=big5-eten		. #xC6BD)	; ý¢€Œš½
+    (=jef-china3	. #x77F3)	; øº‡Ÿ³
+    (ucs		. #x2178)	; ⅸ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL TEN")
-    (ucs		. #x2179)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 10)
     (->decomposition	compat #x0078)
-    (->uppercase	#x2169)
-    (->titlecase	#x2169)
-    (korean-ksc5601		#x25 #x2A)	; ø»ˆ 
-    (chinese-cns11643-1		#x26 #x3E)	; ø»‘Š
-    (japanese-jisx0213-1	#x2C #x3E)	; ⅹ
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL TEN")
+      (ucs		  . #x2169)	; Ⅹ
+      ))
+    (korean-ksc5601	. #x252A)	; ø»ˆ 
+    (chinese-cns11643-1 . #x263E)	; ø»‘Š
+    (=jis-x0213-1-2000	. #x2C3E)	; ø»¢££
+    (=big5-eten		. #xC6BE)	; ý¢€Œš¾
+    (=jef-china3	. #x77F4)	; øº‡Ÿ´
+    (ucs		. #x2179)	; ⅹ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL ELEVEN")
-    (ucs		. #x217A)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 11)
     (->decomposition	compat #x0078 #x0069)
-    (->uppercase	#x216A)
-    (->titlecase	#x216A)
-    (japanese-jisx0213-1	#x2C #x3F)	; ⅺ
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL ELEVEN")
+      (ucs		  . #x216A)	; Ⅺ
+      ))
+    (=jis-x0213-1-2000	. #x2C3F)	; ø»¢£¤
+    (ucs		. #x217A)	; ⅺ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL TWELVE")
-    (ucs		. #x217B)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 12)
     (->decomposition	compat #x0078 #x0069 #x0069)
-    (->uppercase	#x216B)
-    (->titlecase	#x216B)
-    (japanese-jisx0213-1	#x2C #x40)	; ⅻ
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL TWELVE")
+      (ucs		  . #x216B)	; Ⅻ
+      ))
+    (=jis-x0213-1-2000	. #x2C40)	; ø»¢£¥
+    (ucs		. #x217B)	; ⅻ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL FIFTY")
-    (ucs		. #x217C)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 50)
     (->decomposition	compat #x006C)
-    (->uppercase	#x216C)
-    (->titlecase	#x216C)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL FIFTY")
+      (ucs		  . #x216C)	; Ⅼ
+      ))
+    (ucs		. #x217C)	; ⅼ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL ONE HUNDRED")
-    (ucs		. #x217D)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 100)
     (->decomposition	compat #x0063)
-    (->uppercase	#x216D)
-    (->titlecase	#x216D)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL ONE HUNDRED")
+      (ucs		  . #x216D)	; Ⅽ
+      ))
+    (ucs		. #x217D)	; ⅽ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL FIVE HUNDRED")
-    (ucs		. #x217E)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 500)
     (->decomposition	compat #x0064)
-    (->uppercase	#x216E)
-    (->titlecase	#x216E)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL FIVE HUNDRED")
+      (ucs		  . #x216E)	; Ⅾ
+      ))
+    (ucs		. #x217E)	; ⅾ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL ONE THOUSAND")
-    (ucs		. #x217F)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 1000)
     (->decomposition	compat #x006D)
-    (->uppercase	#x216F)
-    (->titlecase	#x216F)
+    (->uppercase
+     ((name		  . "ROMAN NUMERAL ONE THOUSAND")
+      (ucs		  . #x216F)	; Ⅿ
+      ))
+    (ucs		. #x217F)	; ⅿ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL ONE THOUSAND C D")
-    (ucs		. #x2180)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 1000)
+    (ucs		. #x2180)	; ↀ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL FIVE THOUSAND")
-    (ucs		. #x2181)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 5000)
+    (ucs		. #x2181)	; ↁ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL TEN THOUSAND")
-    (ucs		. #x2182)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 10000)
+    (ucs		. #x2182)	; ↂ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL REVERSED ONE HUNDRED")
-    (ucs		. #x2183)
     (general-category	number letter) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (ucs		. #x2183)	; Ↄ
     ))