X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fu02150-Number-Forms.el;h=c61fca1f42cfcf4237e43947954db97c60163439;hb=f761c4a7d22a16ffd4d55d8ca22c68240f964cc2;hp=91977e5c77751794434f8b28f7419665cb9be4b5;hpb=ae65b5734f63aa1b2b07ddb26fe8eeea31679c5c;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/utf-2000/u02150-Number-Forms.el b/lisp/utf-2000/u02150-Number-Forms.el
index 91977e5..c61fca1 100644
--- a/lisp/utf-2000/u02150-Number-Forms.el
+++ b/lisp/utf-2000/u02150-Number-Forms.el
@@ -1,13 +1,23 @@
+;; -*- coding: utf-8-mcs-er -*-
 (define-char
   '((name		. "VULGAR FRACTION ONE THIRD")
     (general-category	number other) ; Normative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 1/3)
-    (->decomposition	fraction #x0031 #x2044 #x0033)
-    (=ks-x1001		. #x2877)	; ø»ˆ¥´
-    (=jis-x0213-1-2000	. #x2778)	; ø»¢‡
+    (=>decomposition@fraction
+     ((name		  . "DIGIT ONE")
+      (=ucs		  . #x0031)	; 1
+      )
+     ((name		  . "FRACTION SLASH")
+      (=ucs		  . #x2044)	; ⁄
+      )
+     ((name		  . "DIGIT THREE")
+      (=ucs		  . #x0033)	; 3
+      ))
     (=ucs		. #x2153)	; ⅓
+    (=ks-x1001		. #x2877)	; &I-K0-2877; [08-87]
+    (=jis-x0213-1	. #x2778)	; &I-JX1-2778; [07-88]
     ))
 (define-char
   '((name		. "VULGAR FRACTION TWO THIRDS")
@@ -15,10 +25,19 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 2/3)
-    (->decomposition	fraction #x0032 #x2044 #x0033)
-    (=ks-x1001		. #x2878)	; ø»ˆ¥µ
-    (=jis-x0213-1-2000	. #x2779)	; ø»¢ˆ
+    (=>decomposition@fraction
+     ((name		  . "DIGIT TWO")
+      (=ucs		  . #x0032)	; 2
+      )
+     ((name		  . "FRACTION SLASH")
+      (=ucs		  . #x2044)	; ⁄
+      )
+     ((name		  . "DIGIT THREE")
+      (=ucs		  . #x0033)	; 3
+      ))
     (=ucs		. #x2154)	; ⅔
+    (=ks-x1001		. #x2878)	; &I-K0-2878; [08-88]
+    (=jis-x0213-1	. #x2779)	; &I-JX1-2779; [07-89]
     ))
 (define-char
   '((name		. "VULGAR FRACTION ONE FIFTH")
@@ -26,9 +45,18 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 1/5)
-    (->decomposition	fraction #x0031 #x2044 #x0035)
-    (=jis-x0213-1-2000	. #x277A)	; ø»¢‰
+    (=>decomposition@fraction
+     ((name		  . "DIGIT ONE")
+      (=ucs		  . #x0031)	; 1
+      )
+     ((name		  . "FRACTION SLASH")
+      (=ucs		  . #x2044)	; ⁄
+      )
+     ((name		  . "DIGIT FIVE")
+      (=ucs		  . #x0035)	; 5
+      ))
     (=ucs		. #x2155)	; ⅕
+    (=jis-x0213-1	. #x277A)	; &I-JX1-277A; [07-90]
     ))
 (define-char
   '((name		. "VULGAR FRACTION TWO FIFTHS")
@@ -36,7 +64,16 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 2/5)
-    (->decomposition	fraction #x0032 #x2044 #x0035)
+    (=>decomposition@fraction
+     ((name		  . "DIGIT TWO")
+      (=ucs		  . #x0032)	; 2
+      )
+     ((name		  . "FRACTION SLASH")
+      (=ucs		  . #x2044)	; ⁄
+      )
+     ((name		  . "DIGIT FIVE")
+      (=ucs		  . #x0035)	; 5
+      ))
     (=ucs		. #x2156)	; ⅖
     ))
 (define-char
@@ -45,7 +82,16 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 3/5)
-    (->decomposition	fraction #x0033 #x2044 #x0035)
+    (=>decomposition@fraction
+     ((name		  . "DIGIT THREE")
+      (=ucs		  . #x0033)	; 3
+      )
+     ((name		  . "FRACTION SLASH")
+      (=ucs		  . #x2044)	; ⁄
+      )
+     ((name		  . "DIGIT FIVE")
+      (=ucs		  . #x0035)	; 5
+      ))
     (=ucs		. #x2157)	; ⅗
     ))
 (define-char
@@ -54,7 +100,16 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 4/5)
-    (->decomposition	fraction #x0034 #x2044 #x0035)
+    (=>decomposition@fraction
+     ((name		  . "DIGIT FOUR")
+      (=ucs		  . #x0034)	; 4
+      )
+     ((name		  . "FRACTION SLASH")
+      (=ucs		  . #x2044)	; ⁄
+      )
+     ((name		  . "DIGIT FIVE")
+      (=ucs		  . #x0035)	; 5
+      ))
     (=ucs		. #x2158)	; ⅘
     ))
 (define-char
@@ -63,7 +118,16 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 1/6)
-    (->decomposition	fraction #x0031 #x2044 #x0036)
+    (=>decomposition@fraction
+     ((name		  . "DIGIT ONE")
+      (=ucs		  . #x0031)	; 1
+      )
+     ((name		  . "FRACTION SLASH")
+      (=ucs		  . #x2044)	; ⁄
+      )
+     ((name		  . "DIGIT SIX")
+      (=ucs		  . #x0036)	; 6
+      ))
     (=ucs		. #x2159)	; ⅙
     ))
 (define-char
@@ -72,7 +136,16 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 5/6)
-    (->decomposition	fraction #x0035 #x2044 #x0036)
+    (=>decomposition@fraction
+     ((name		  . "DIGIT FIVE")
+      (=ucs		  . #x0035)	; 5
+      )
+     ((name		  . "FRACTION SLASH")
+      (=ucs		  . #x2044)	; ⁄
+      )
+     ((name		  . "DIGIT SIX")
+      (=ucs		  . #x0036)	; 6
+      ))
     (=ucs		. #x215A)	; ⅚
     ))
 (define-char
@@ -81,9 +154,18 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 1/8)
-    (->decomposition	fraction #x0031 #x2044 #x0038)
-    (=ks-x1001		. #x287B)	; ø»ˆ¥¸
+    (=>decomposition@fraction
+     ((name		  . "DIGIT ONE")
+      (=ucs		  . #x0031)	; 1
+      )
+     ((name		  . "FRACTION SLASH")
+      (=ucs		  . #x2044)	; ⁄
+      )
+     ((name		  . "DIGIT EIGHT")
+      (=ucs		  . #x0038)	; 8
+      ))
     (=ucs		. #x215B)	; ⅛
+    (=ks-x1001		. #x287B)	; &I-K0-287B; [08-91]
     ))
 (define-char
   '((name		. "VULGAR FRACTION THREE EIGHTHS")
@@ -91,9 +173,18 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 3/8)
-    (->decomposition	fraction #x0033 #x2044 #x0038)
-    (=ks-x1001		. #x287C)	; ø»ˆ¥¹
+    (=>decomposition@fraction
+     ((name		  . "DIGIT THREE")
+      (=ucs		  . #x0033)	; 3
+      )
+     ((name		  . "FRACTION SLASH")
+      (=ucs		  . #x2044)	; ⁄
+      )
+     ((name		  . "DIGIT EIGHT")
+      (=ucs		  . #x0038)	; 8
+      ))
     (=ucs		. #x215C)	; ⅜
+    (=ks-x1001		. #x287C)	; &I-K0-287C; [08-92]
     ))
 (define-char
   '((name		. "VULGAR FRACTION FIVE EIGHTHS")
@@ -101,9 +192,18 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 5/8)
-    (->decomposition	fraction #x0035 #x2044 #x0038)
-    (=ks-x1001		. #x287D)	; ø»ˆ¥º
+    (=>decomposition@fraction
+     ((name		  . "DIGIT FIVE")
+      (=ucs		  . #x0035)	; 5
+      )
+     ((name		  . "FRACTION SLASH")
+      (=ucs		  . #x2044)	; ⁄
+      )
+     ((name		  . "DIGIT EIGHT")
+      (=ucs		  . #x0038)	; 8
+      ))
     (=ucs		. #x215D)	; ⅝
+    (=ks-x1001		. #x287D)	; &I-K0-287D; [08-93]
     ))
 (define-char
   '((name		. "VULGAR FRACTION SEVEN EIGHTHS")
@@ -111,9 +211,18 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 7/8)
-    (->decomposition	fraction #x0037 #x2044 #x0038)
-    (=ks-x1001		. #x287E)	; ø»ˆ¥»
+    (=>decomposition@fraction
+     ((name		  . "DIGIT SEVEN")
+      (=ucs		  . #x0037)	; 7
+      )
+     ((name		  . "FRACTION SLASH")
+      (=ucs		  . #x2044)	; ⁄
+      )
+     ((name		  . "DIGIT EIGHT")
+      (=ucs		  . #x0038)	; 8
+      ))
     (=ucs		. #x215E)	; ⅞
+    (=ks-x1001		. #x287E)	; &I-K0-287E; [08-94]
     ))
 (define-char
   '((name		. "FRACTION NUMERATOR ONE")
@@ -121,7 +230,13 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (numeric-value	. 1)
-    (->decomposition	fraction #x0031 #x2044)
+    (=>decomposition@fraction
+     ((name		  . "DIGIT ONE")
+      (=ucs		  . #x0031)	; 1
+      )
+     ((name		  . "FRACTION SLASH")
+      (=ucs		  . #x2044)	; ⁄
+      ))
     (=ucs		. #x215F)	; ⅟
     ))
 (define-char
@@ -130,18 +245,21 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 1)
-    (->decomposition	compat #x0049)
+    (=ucs		. #x2160)	; Ⅰ
+    (=gb2312		. #x2271)	; &I-G0-2271; [02-81]
+    (=ks-x1001		. #x2530)	; &I-K0-2530; [05-16]
+    (=cns11643-1	. #x242B)	; &I-C1-242B; [04-11]
+    (=jis-x0213-1	. #x2D35)	; &I-JX1-2D35; [13-21]
+    (=big5		. #xA2B9)	; &I-B-A2B9;
+    (=jef-china3	. #x77DE)	; &I-JC3-77DE;
+    (<-compat/Roman-Numeral
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      ))
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL ONE")
       (=ucs		  . #x2170)	; ⅰ
       ))
-    (chinese-gb2312	. #x2271)	; ø»„ˆ²
-    (=ks-x1001		. #x2530)	; ø»ˆ “
-    (chinese-cns11643-1 . #x242B)	; ø»‘‡€
-    (=jis-x0213-1-2000	. #x2D35)	; ø»¢¤¸
-    (chinese-big5	. #xA2B9)	; ý¢€ŠŠ¹
-    (=jef-china3	. #x77DE)	; øº‡Ÿž
-    (=ucs		. #x2160)	; Ⅰ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL TWO")
@@ -149,18 +267,24 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 2)
-    (->decomposition	compat #x0049 #x0049)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      )
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      ))
+    (=ucs		. #x2161)	; Ⅱ
+    (=gb2312		. #x2272)	; &I-G0-2272; [02-82]
+    (=ks-x1001		. #x2531)	; &I-K0-2531; [05-17]
+    (=cns11643-1	. #x242C)	; &I-C1-242C; [04-12]
+    (=jis-x0213-1	. #x2D36)	; &I-JX1-2D36; [13-22]
+    (=big5		. #xA2BA)	; &I-B-A2BA;
+    (=jef-china3	. #x77DF)	; &I-JC3-77DF;
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL TWO")
       (=ucs		  . #x2171)	; ⅱ
       ))
-    (chinese-gb2312	. #x2272)	; ø»„ˆ³
-    (=ks-x1001		. #x2531)	; ø»ˆ ”
-    (chinese-cns11643-1 . #x242C)	; ø»‘‡
-    (=jis-x0213-1-2000	. #x2D36)	; ø»¢¤¹
-    (chinese-big5	. #xA2BA)	; ý¢€ŠŠº
-    (=jef-china3	. #x77DF)	; øº‡ŸŸ
-    (=ucs		. #x2161)	; Ⅱ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL THREE")
@@ -168,18 +292,27 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 3)
-    (->decomposition	compat #x0049 #x0049 #x0049)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      )
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      )
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      ))
+    (=ucs		. #x2162)	; Ⅲ
+    (=gb2312		. #x2273)	; &I-G0-2273; [02-83]
+    (=ks-x1001		. #x2532)	; &I-K0-2532; [05-18]
+    (=cns11643-1	. #x242D)	; &I-C1-242D; [04-13]
+    (=jis-x0213-1	. #x2D37)	; &I-JX1-2D37; [13-23]
+    (=big5		. #xA2BB)	; &I-B-A2BB;
+    (=jef-china3	. #x77E0)	; &I-JC3-77E0;
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL THREE")
       (=ucs		  . #x2172)	; ⅲ
       ))
-    (chinese-gb2312	. #x2273)	; ø»„ˆ´
-    (=ks-x1001		. #x2532)	; ø»ˆ •
-    (chinese-cns11643-1 . #x242D)	; ø»‘‡‚
-    (=jis-x0213-1-2000	. #x2D37)	; ø»¢¤º
-    (chinese-big5	. #xA2BB)	; ý¢€ŠŠ»
-    (=jef-china3	. #x77E0)	; øº‡Ÿ 
-    (=ucs		. #x2162)	; Ⅲ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL FOUR")
@@ -187,18 +320,24 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 4)
-    (->decomposition	compat #x0049 #x0056)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      )
+     ((name		  . "LATIN CAPITAL LETTER V")
+      (=ucs		  . #x0056)	; V
+      ))
+    (=ucs		. #x2163)	; Ⅳ
+    (=gb2312		. #x2274)	; &I-G0-2274; [02-84]
+    (=ks-x1001		. #x2533)	; &I-K0-2533; [05-19]
+    (=cns11643-1	. #x242E)	; &I-C1-242E; [04-14]
+    (=jis-x0213-1	. #x2D38)	; &I-JX1-2D38; [13-24]
+    (=big5		. #xA2BC)	; &I-B-A2BC;
+    (=jef-china3	. #x77E1)	; &I-JC3-77E1;
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL FOUR")
       (=ucs		  . #x2173)	; ⅳ
       ))
-    (chinese-gb2312	. #x2274)	; ø»„ˆµ
-    (=ks-x1001		. #x2533)	; ø»ˆ –
-    (chinese-cns11643-1 . #x242E)	; ø»‘‡ƒ
-    (=jis-x0213-1-2000	. #x2D38)	; ø»¢¤»
-    (chinese-big5	. #xA2BC)	; ý¢€ŠŠ¼
-    (=jef-china3	. #x77E1)	; øº‡Ÿ¡
-    (=ucs		. #x2163)	; Ⅳ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL FIVE")
@@ -206,18 +345,21 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 5)
-    (->decomposition	compat #x0056)
+    (=ucs		. #x2164)	; Ⅴ
+    (=gb2312		. #x2275)	; &I-G0-2275; [02-85]
+    (=ks-x1001		. #x2534)	; &I-K0-2534; [05-20]
+    (=cns11643-1	. #x242F)	; &I-C1-242F; [04-15]
+    (=jis-x0213-1	. #x2D39)	; &I-JX1-2D39; [13-25]
+    (=big5		. #xA2BD)	; &I-B-A2BD;
+    (=jef-china3	. #x77E2)	; &I-JC3-77E2;
+    (<-compat/Roman-Numeral
+     ((name		  . "LATIN CAPITAL LETTER V")
+      (=ucs		  . #x0056)	; V
+      ))
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL FIVE")
       (=ucs		  . #x2174)	; ⅴ
       ))
-    (chinese-gb2312	. #x2275)	; ø»„ˆ¶
-    (=ks-x1001		. #x2534)	; ø»ˆ —
-    (chinese-cns11643-1 . #x242F)	; ø»‘‡„
-    (=jis-x0213-1-2000	. #x2D39)	; ø»¢¤¼
-    (chinese-big5	. #xA2BD)	; ý¢€ŠŠ½
-    (=jef-china3	. #x77E2)	; øº‡Ÿ¢
-    (=ucs		. #x2164)	; Ⅴ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL SIX")
@@ -225,18 +367,24 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 6)
-    (->decomposition	compat #x0056 #x0049)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN CAPITAL LETTER V")
+      (=ucs		  . #x0056)	; V
+      )
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      ))
+    (=ucs		. #x2165)	; Ⅵ
+    (=gb2312		. #x2276)	; &I-G0-2276; [02-86]
+    (=ks-x1001		. #x2535)	; &I-K0-2535; [05-21]
+    (=cns11643-1	. #x2430)	; &I-C1-2430; [04-16]
+    (=jis-x0213-1	. #x2D3A)	; &I-JX1-2D3A; [13-26]
+    (=big5		. #xA2BE)	; &I-B-A2BE;
+    (=jef-china3	. #x77E3)	; &I-JC3-77E3;
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL SIX")
       (=ucs		  . #x2175)	; ⅵ
       ))
-    (chinese-gb2312	. #x2276)	; ø»„ˆ·
-    (=ks-x1001		. #x2535)	; ø»ˆ ˜
-    (chinese-cns11643-1 . #x2430)	; ø»‘‡…
-    (=jis-x0213-1-2000	. #x2D3A)	; ø»¢¤½
-    (chinese-big5	. #xA2BE)	; ý¢€ŠŠ¾
-    (=jef-china3	. #x77E3)	; øº‡Ÿ£
-    (=ucs		. #x2165)	; Ⅵ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL SEVEN")
@@ -244,18 +392,27 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 7)
-    (->decomposition	compat #x0056 #x0049 #x0049)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN CAPITAL LETTER V")
+      (=ucs		  . #x0056)	; V
+      )
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      )
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      ))
+    (=ucs		. #x2166)	; Ⅶ
+    (=gb2312		. #x2277)	; &I-G0-2277; [02-87]
+    (=ks-x1001		. #x2536)	; &I-K0-2536; [05-22]
+    (=cns11643-1	. #x2431)	; &I-C1-2431; [04-17]
+    (=jis-x0213-1	. #x2D3B)	; &I-JX1-2D3B; [13-27]
+    (=big5		. #xA2BF)	; &I-B-A2BF;
+    (=jef-china3	. #x77E4)	; &I-JC3-77E4;
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL SEVEN")
       (=ucs		  . #x2176)	; ⅶ
       ))
-    (chinese-gb2312	. #x2277)	; ø»„ˆ¸
-    (=ks-x1001		. #x2536)	; ø»ˆ ™
-    (chinese-cns11643-1 . #x2431)	; ø»‘‡†
-    (=jis-x0213-1-2000	. #x2D3B)	; ø»¢¤¾
-    (chinese-big5	. #xA2BF)	; ý¢€ŠŠ¿
-    (=jef-china3	. #x77E4)	; øº‡Ÿ¤
-    (=ucs		. #x2166)	; Ⅶ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL EIGHT")
@@ -263,18 +420,30 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 8)
-    (->decomposition	compat #x0056 #x0049 #x0049 #x0049)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN CAPITAL LETTER V")
+      (=ucs		  . #x0056)	; V
+      )
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      )
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      )
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      ))
+    (=ucs		. #x2167)	; Ⅷ
+    (=gb2312		. #x2278)	; &I-G0-2278; [02-88]
+    (=ks-x1001		. #x2537)	; &I-K0-2537; [05-23]
+    (=cns11643-1	. #x2432)	; &I-C1-2432; [04-18]
+    (=jis-x0213-1	. #x2D3C)	; &I-JX1-2D3C; [13-28]
+    (=big5		. #xA2C0)	; &I-B-A2C0;
+    (=jef-china3	. #x77E5)	; &I-JC3-77E5;
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL EIGHT")
       (=ucs		  . #x2177)	; ⅷ
       ))
-    (chinese-gb2312	. #x2278)	; ø»„ˆ¹
-    (=ks-x1001		. #x2537)	; ø»ˆ š
-    (chinese-cns11643-1 . #x2432)	; ø»‘‡‡
-    (=jis-x0213-1-2000	. #x2D3C)	; ø»¢¤¿
-    (chinese-big5	. #xA2C0)	; ý¢€Š‹€
-    (=jef-china3	. #x77E5)	; øº‡Ÿ¥
-    (=ucs		. #x2167)	; Ⅷ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL NINE")
@@ -282,18 +451,24 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 9)
-    (->decomposition	compat #x0049 #x0058)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      )
+     ((name		  . "LATIN CAPITAL LETTER X")
+      (=ucs		  . #x0058)	; X
+      ))
+    (=ucs		. #x2168)	; Ⅸ
+    (=gb2312		. #x2279)	; &I-G0-2279; [02-89]
+    (=ks-x1001		. #x2538)	; &I-K0-2538; [05-24]
+    (=cns11643-1	. #x2433)	; &I-C1-2433; [04-19]
+    (=jis-x0213-1	. #x2D3D)	; &I-JX1-2D3D; [13-29]
+    (=big5		. #xA2C1)	; &I-B-A2C1;
+    (=jef-china3	. #x77E6)	; &I-JC3-77E6;
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL NINE")
       (=ucs		  . #x2178)	; ⅸ
       ))
-    (chinese-gb2312	. #x2279)	; ø»„ˆº
-    (=ks-x1001		. #x2538)	; ø»ˆ ›
-    (chinese-cns11643-1 . #x2433)	; ø»‘‡ˆ
-    (=jis-x0213-1-2000	. #x2D3D)	; ø»¢¥€
-    (chinese-big5	. #xA2C1)	; ý¢€Š‹
-    (=jef-china3	. #x77E6)	; øº‡Ÿ¦
-    (=ucs		. #x2168)	; Ⅸ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL TEN")
@@ -301,18 +476,21 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 10)
-    (->decomposition	compat #x0058)
+    (=ucs		. #x2169)	; Ⅹ
+    (=gb2312		. #x227A)	; &I-G0-227A; [02-90]
+    (=ks-x1001		. #x2539)	; &I-K0-2539; [05-25]
+    (=cns11643-1	. #x2434)	; &I-C1-2434; [04-20]
+    (=jis-x0213-1	. #x2D3E)	; &I-JX1-2D3E; [13-30]
+    (=big5		. #xA2C2)	; &I-B-A2C2;
+    (=jef-china3	. #x77E7)	; &I-JC3-77E7;
+    (<-compat/Roman-Numeral
+     ((name		  . "LATIN CAPITAL LETTER X")
+      (=ucs		  . #x0058)	; X
+      ))
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL TEN")
       (=ucs		  . #x2179)	; ⅹ
       ))
-    (chinese-gb2312	. #x227A)	; ø»„ˆ»
-    (=ks-x1001		. #x2539)	; ø»ˆ œ
-    (chinese-cns11643-1 . #x2434)	; ø»‘‡‰
-    (=jis-x0213-1-2000	. #x2D3E)	; ø»¢¥
-    (chinese-big5	. #xA2C2)	; ý¢€Š‹‚
-    (=jef-china3	. #x77E7)	; øº‡Ÿ§
-    (=ucs		. #x2169)	; Ⅹ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL ELEVEN")
@@ -320,14 +498,20 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 11)
-    (->decomposition	compat #x0058 #x0049)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN CAPITAL LETTER X")
+      (=ucs		  . #x0058)	; X
+      )
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      ))
+    (=ucs		. #x216A)	; Ⅺ
+    (=gb2312		. #x227B)	; &I-G0-227B; [02-91]
+    (=jis-x0213-1	. #x2D3F)	; &I-JX1-2D3F; [13-31]
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL ELEVEN")
       (=ucs		  . #x217A)	; ⅺ
       ))
-    (chinese-gb2312	. #x227B)	; ø»„ˆ¼
-    (=jis-x0213-1-2000	. #x2D3F)	; ø»¢¥‚
-    (=ucs		. #x216A)	; Ⅺ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL TWELVE")
@@ -335,14 +519,23 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 12)
-    (->decomposition	compat #x0058 #x0049 #x0049)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN CAPITAL LETTER X")
+      (=ucs		  . #x0058)	; X
+      )
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      )
+     ((name		  . "LATIN CAPITAL LETTER I")
+      (=ucs		  . #x0049)	; I
+      ))
+    (=ucs		. #x216B)	; Ⅻ
+    (=gb2312		. #x227C)	; &I-G0-227C; [02-92]
+    (=jis-x0213-1	. #x2D57)	; &I-JX1-2D57; [13-55]
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL TWELVE")
       (=ucs		  . #x217B)	; ⅻ
       ))
-    (chinese-gb2312	. #x227C)	; ø»„ˆ½
-    (=jis-x0213-1-2000	. #x2D57)	; ø»¢¥š
-    (=ucs		. #x216B)	; Ⅻ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL FIFTY")
@@ -350,12 +543,15 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 50)
-    (->decomposition	compat #x004C)
+    (=ucs		. #x216C)	; Ⅼ
+    (<-compat/Roman-Numeral
+     ((name		  . "LATIN CAPITAL LETTER L")
+      (=ucs		  . #x004C)	; L
+      ))
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL FIFTY")
       (=ucs		  . #x217C)	; ⅼ
       ))
-    (=ucs		. #x216C)	; Ⅼ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL ONE HUNDRED")
@@ -363,12 +559,15 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 100)
-    (->decomposition	compat #x0043)
+    (=ucs		. #x216D)	; Ⅽ
+    (<-compat/Roman-Numeral
+     ((name		  . "LATIN CAPITAL LETTER C")
+      (=ucs		  . #x0043)	; C
+      ))
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL ONE HUNDRED")
       (=ucs		  . #x217D)	; ⅽ
       ))
-    (=ucs		. #x216D)	; Ⅽ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL FIVE HUNDRED")
@@ -376,12 +575,15 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 500)
-    (->decomposition	compat #x0044)
+    (=ucs		. #x216E)	; Ⅾ
+    (<-compat/Roman-Numeral
+     ((name		  . "LATIN CAPITAL LETTER D")
+      (=ucs		  . #x0044)	; D
+      ))
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL FIVE HUNDRED")
       (=ucs		  . #x217E)	; ⅾ
       ))
-    (=ucs		. #x216E)	; Ⅾ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL ONE THOUSAND")
@@ -389,12 +591,15 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 1000)
-    (->decomposition	compat #x004D)
+    (=ucs		. #x216F)	; Ⅿ
+    (<-compat/Roman-Numeral
+     ((name		  . "LATIN CAPITAL LETTER M")
+      (=ucs		  . #x004D)	; M
+      ))
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL ONE THOUSAND")
       (=ucs		  . #x217F)	; ⅿ
       ))
-    (=ucs		. #x216F)	; Ⅿ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL ONE")
@@ -402,17 +607,20 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 1)
-    (->decomposition	compat #x0069)
+    (=ucs		. #x2170)	; ⅰ
+    (=ks-x1001		. #x2521)	; &I-K0-2521; [05-01]
+    (=cns11643-1	. #x2635)	; &I-C1-2635; [06-21]
+    (=jis-x0213-1	. #x2C35)	; &I-JX1-2C35; [12-21]
+    (=big5-eten		. #xC6B5)	; &I-B-C6B5;
+    (=jef-china3	. #x77EB)	; &I-JC3-77EB;
+    (<-compat/Roman-Numeral
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      ))
     (->uppercase
      ((name		  . "ROMAN NUMERAL ONE")
       (=ucs		  . #x2160)	; Ⅰ
       ))
-    (=ks-x1001		. #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")
@@ -420,17 +628,23 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 2)
-    (->decomposition	compat #x0069 #x0069)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      )
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      ))
+    (=ucs		. #x2171)	; ⅱ
+    (=ks-x1001		. #x2522)	; &I-K0-2522; [05-02]
+    (=cns11643-1	. #x2636)	; &I-C1-2636; [06-22]
+    (=jis-x0213-1	. #x2C36)	; &I-JX1-2C36; [12-22]
+    (=big5-eten		. #xC6B6)	; &I-B-C6B6;
+    (=jef-china3	. #x77EC)	; &I-JC3-77EC;
     (->uppercase
      ((name		  . "ROMAN NUMERAL TWO")
       (=ucs		  . #x2161)	; Ⅱ
       ))
-    (=ks-x1001		. #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")
@@ -438,17 +652,26 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 3)
-    (->decomposition	compat #x0069 #x0069 #x0069)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      )
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      )
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      ))
+    (=ucs		. #x2172)	; ⅲ
+    (=ks-x1001		. #x2523)	; &I-K0-2523; [05-03]
+    (=cns11643-1	. #x2637)	; &I-C1-2637; [06-23]
+    (=jis-x0213-1	. #x2C37)	; &I-JX1-2C37; [12-23]
+    (=big5-eten		. #xC6B7)	; &I-B-C6B7;
+    (=jef-china3	. #x77ED)	; &I-JC3-77ED;
     (->uppercase
      ((name		  . "ROMAN NUMERAL THREE")
       (=ucs		  . #x2162)	; Ⅲ
       ))
-    (=ks-x1001		. #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")
@@ -456,17 +679,23 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 4)
-    (->decomposition	compat #x0069 #x0076)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      )
+     ((name		  . "LATIN SMALL LETTER V")
+      (=ucs		  . #x0076)	; v
+      ))
+    (=ucs		. #x2173)	; ⅳ
+    (=ks-x1001		. #x2524)	; &I-K0-2524; [05-04]
+    (=cns11643-1	. #x2638)	; &I-C1-2638; [06-24]
+    (=jis-x0213-1	. #x2C38)	; &I-JX1-2C38; [12-24]
+    (=big5-eten		. #xC6B8)	; &I-B-C6B8;
+    (=jef-china3	. #x77EE)	; &I-JC3-77EE;
     (->uppercase
      ((name		  . "ROMAN NUMERAL FOUR")
       (=ucs		  . #x2163)	; Ⅳ
       ))
-    (=ks-x1001		. #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")
@@ -474,17 +703,20 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 5)
-    (->decomposition	compat #x0076)
+    (=ucs		. #x2174)	; ⅴ
+    (=ks-x1001		. #x2525)	; &I-K0-2525; [05-05]
+    (=cns11643-1	. #x2639)	; &I-C1-2639; [06-25]
+    (=jis-x0213-1	. #x2C39)	; &I-JX1-2C39; [12-25]
+    (=big5-eten		. #xC6B9)	; &I-B-C6B9;
+    (=jef-china3	. #x77EF)	; &I-JC3-77EF;
+    (<-compat/Roman-Numeral
+     ((name		  . "LATIN SMALL LETTER V")
+      (=ucs		  . #x0076)	; v
+      ))
     (->uppercase
      ((name		  . "ROMAN NUMERAL FIVE")
       (=ucs		  . #x2164)	; Ⅴ
       ))
-    (=ks-x1001		. #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")
@@ -492,17 +724,23 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 6)
-    (->decomposition	compat #x0076 #x0069)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN SMALL LETTER V")
+      (=ucs		  . #x0076)	; v
+      )
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      ))
+    (=ucs		. #x2175)	; ⅵ
+    (=ks-x1001		. #x2526)	; &I-K0-2526; [05-06]
+    (=cns11643-1	. #x263A)	; &I-C1-263A; [06-26]
+    (=jis-x0213-1	. #x2C3A)	; &I-JX1-2C3A; [12-26]
+    (=big5-eten		. #xC6BA)	; &I-B-C6BA;
+    (=jef-china3	. #x77F0)	; &I-JC3-77F0;
     (->uppercase
      ((name		  . "ROMAN NUMERAL SIX")
       (=ucs		  . #x2165)	; Ⅵ
       ))
-    (=ks-x1001		. #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")
@@ -510,17 +748,26 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 7)
-    (->decomposition	compat #x0076 #x0069 #x0069)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN SMALL LETTER V")
+      (=ucs		  . #x0076)	; v
+      )
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      )
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      ))
+    (=ucs		. #x2176)	; ⅶ
+    (=ks-x1001		. #x2527)	; &I-K0-2527; [05-07]
+    (=cns11643-1	. #x263B)	; &I-C1-263B; [06-27]
+    (=jis-x0213-1	. #x2C3B)	; &I-JX1-2C3B; [12-27]
+    (=big5-eten		. #xC6BB)	; &I-B-C6BB;
+    (=jef-china3	. #x77F1)	; &I-JC3-77F1;
     (->uppercase
      ((name		  . "ROMAN NUMERAL SEVEN")
       (=ucs		  . #x2166)	; Ⅶ
       ))
-    (=ks-x1001		. #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")
@@ -528,17 +775,29 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 8)
-    (->decomposition	compat #x0076 #x0069 #x0069 #x0069)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN SMALL LETTER V")
+      (=ucs		  . #x0076)	; v
+      )
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      )
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      )
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      ))
+    (=ucs		. #x2177)	; ⅷ
+    (=ks-x1001		. #x2528)	; &I-K0-2528; [05-08]
+    (=cns11643-1	. #x263C)	; &I-C1-263C; [06-28]
+    (=jis-x0213-1	. #x2C3C)	; &I-JX1-2C3C; [12-28]
+    (=big5-eten		. #xC6BC)	; &I-B-C6BC;
+    (=jef-china3	. #x77F2)	; &I-JC3-77F2;
     (->uppercase
      ((name		  . "ROMAN NUMERAL EIGHT")
       (=ucs		  . #x2167)	; Ⅷ
       ))
-    (=ks-x1001		. #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")
@@ -546,17 +805,23 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 9)
-    (->decomposition	compat #x0069 #x0078)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      )
+     ((name		  . "LATIN SMALL LETTER X")
+      (=ucs		  . #x0078)	; x
+      ))
+    (=ucs		. #x2178)	; ⅸ
+    (=ks-x1001		. #x2529)	; &I-K0-2529; [05-09]
+    (=cns11643-1	. #x263D)	; &I-C1-263D; [06-29]
+    (=jis-x0213-1	. #x2C3D)	; &I-JX1-2C3D; [12-29]
+    (=big5-eten		. #xC6BD)	; &I-B-C6BD;
+    (=jef-china3	. #x77F3)	; &I-JC3-77F3;
     (->uppercase
      ((name		  . "ROMAN NUMERAL NINE")
       (=ucs		  . #x2168)	; Ⅸ
       ))
-    (=ks-x1001		. #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")
@@ -564,17 +829,20 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 10)
-    (->decomposition	compat #x0078)
+    (=ucs		. #x2179)	; ⅹ
+    (=ks-x1001		. #x252A)	; &I-K0-252A; [05-10]
+    (=cns11643-1	. #x263E)	; &I-C1-263E; [06-30]
+    (=jis-x0213-1	. #x2C3E)	; &I-JX1-2C3E; [12-30]
+    (=big5-eten		. #xC6BE)	; &I-B-C6BE;
+    (=jef-china3	. #x77F4)	; &I-JC3-77F4;
+    (<-compat/Roman-Numeral
+     ((name		  . "LATIN SMALL LETTER X")
+      (=ucs		  . #x0078)	; x
+      ))
     (->uppercase
      ((name		  . "ROMAN NUMERAL TEN")
       (=ucs		  . #x2169)	; Ⅹ
       ))
-    (=ks-x1001		. #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")
@@ -582,13 +850,19 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 11)
-    (->decomposition	compat #x0078 #x0069)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN SMALL LETTER X")
+      (=ucs		  . #x0078)	; x
+      )
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      ))
+    (=ucs		. #x217A)	; ⅺ
+    (=jis-x0213-1	. #x2C3F)	; &I-JX1-2C3F; [12-31]
     (->uppercase
      ((name		  . "ROMAN NUMERAL ELEVEN")
       (=ucs		  . #x216A)	; Ⅺ
       ))
-    (=jis-x0213-1-2000	. #x2C3F)	; ø»¢£¤
-    (=ucs		. #x217A)	; ⅺ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL TWELVE")
@@ -596,13 +870,22 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 12)
-    (->decomposition	compat #x0078 #x0069 #x0069)
+    (=>decomposition@compat/Roman-Numeral
+     ((name		  . "LATIN SMALL LETTER X")
+      (=ucs		  . #x0078)	; x
+      )
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      )
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      ))
+    (=ucs		. #x217B)	; ⅻ
+    (=jis-x0213-1	. #x2C40)	; &I-JX1-2C40; [12-32]
     (->uppercase
      ((name		  . "ROMAN NUMERAL TWELVE")
       (=ucs		  . #x216B)	; Ⅻ
       ))
-    (=jis-x0213-1-2000	. #x2C40)	; ø»¢£¥
-    (=ucs		. #x217B)	; ⅻ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL FIFTY")
@@ -610,12 +893,15 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 50)
-    (->decomposition	compat #x006C)
+    (=ucs		. #x217C)	; ⅼ
+    (<-compat/Roman-Numeral
+     ((name		  . "LATIN SMALL LETTER L")
+      (=ucs		  . #x006C)	; l
+      ))
     (->uppercase
      ((name		  . "ROMAN NUMERAL FIFTY")
       (=ucs		  . #x216C)	; Ⅼ
       ))
-    (=ucs		. #x217C)	; ⅼ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL ONE HUNDRED")
@@ -623,12 +909,15 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 100)
-    (->decomposition	compat #x0063)
+    (=ucs		. #x217D)	; ⅽ
+    (<-compat/Roman-Numeral
+     ((name		  . "LATIN SMALL LETTER C")
+      (=ucs		  . #x0063)	; c
+      ))
     (->uppercase
      ((name		  . "ROMAN NUMERAL ONE HUNDRED")
       (=ucs		  . #x216D)	; Ⅽ
       ))
-    (=ucs		. #x217D)	; ⅽ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL FIVE HUNDRED")
@@ -636,12 +925,15 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 500)
-    (->decomposition	compat #x0064)
+    (=ucs		. #x217E)	; ⅾ
+    (<-compat/Roman-Numeral
+     ((name		  . "LATIN SMALL LETTER D")
+      (=ucs		  . #x0064)	; d
+      ))
     (->uppercase
      ((name		  . "ROMAN NUMERAL FIVE HUNDRED")
       (=ucs		  . #x216E)	; Ⅾ
       ))
-    (=ucs		. #x217E)	; ⅾ
     ))
 (define-char
   '((name		. "SMALL ROMAN NUMERAL ONE THOUSAND")
@@ -649,12 +941,15 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 1000)
-    (->decomposition	compat #x006D)
+    (=ucs		. #x217F)	; ⅿ
+    (<-compat/Roman-Numeral
+     ((name		  . "LATIN SMALL LETTER M")
+      (=ucs		  . #x006D)	; m
+      ))
     (->uppercase
      ((name		  . "ROMAN NUMERAL ONE THOUSAND")
       (=ucs		  . #x216F)	; Ⅿ
       ))
-    (=ucs		. #x217F)	; ⅿ
     ))
 (define-char
   '((name		. "ROMAN NUMERAL ONE THOUSAND C D")