X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fu02150-Number-Forms.el;h=c61fca1f42cfcf4237e43947954db97c60163439;hb=59483252003895f7e52f747b322c84073c676922;hp=26986d69e007d1a05980ede65912acbe70f432f7;hpb=61408c7517e44874d74e461eedfefdf6f96e55ee;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 26986d6..c61fca1 100644
--- a/lisp/utf-2000/u02150-Number-Forms.el
+++ b/lisp/utf-2000/u02150-Number-Forms.el
@@ -17,7 +17,7 @@
       ))
     (=ucs		. #x2153)	; ⅓
     (=ks-x1001		. #x2877)	; &I-K0-2877; [08-87]
-    (=jis-x0213-1-2000	. #x2778)	; &I-JX1-2778; [07-88]
+    (=jis-x0213-1	. #x2778)	; &I-JX1-2778; [07-88]
     ))
 (define-char
   '((name		. "VULGAR FRACTION TWO THIRDS")
@@ -37,7 +37,7 @@
       ))
     (=ucs		. #x2154)	; ⅔
     (=ks-x1001		. #x2878)	; &I-K0-2878; [08-88]
-    (=jis-x0213-1-2000	. #x2779)	; &I-JX1-2779; [07-89]
+    (=jis-x0213-1	. #x2779)	; &I-JX1-2779; [07-89]
     ))
 (define-char
   '((name		. "VULGAR FRACTION ONE FIFTH")
@@ -56,7 +56,7 @@
       (=ucs		  . #x0035)	; 5
       ))
     (=ucs		. #x2155)	; ⅕
-    (=jis-x0213-1-2000	. #x277A)	; &I-JX1-277A; [07-90]
+    (=jis-x0213-1	. #x277A)	; &I-JX1-277A; [07-90]
     ))
 (define-char
   '((name		. "VULGAR FRACTION TWO FIFTHS")
@@ -245,17 +245,17 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 1)
-    (<-compat/Roman-Numeral
-     ((name		  . "LATIN CAPITAL LETTER I")
-      (=ucs		  . #x0049)	; I
-      ))
     (=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-2000	. #x2D35)	; &I-JX1-2D35; [13-21]
+    (=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)	; ⅰ
@@ -278,7 +278,7 @@
     (=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-2000	. #x2D36)	; &I-JX1-2D36; [13-22]
+    (=jis-x0213-1	. #x2D36)	; &I-JX1-2D36; [13-22]
     (=big5		. #xA2BA)	; &I-B-A2BA;
     (=jef-china3	. #x77DF)	; &I-JC3-77DF;
     (->lowercase
@@ -306,7 +306,7 @@
     (=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-2000	. #x2D37)	; &I-JX1-2D37; [13-23]
+    (=jis-x0213-1	. #x2D37)	; &I-JX1-2D37; [13-23]
     (=big5		. #xA2BB)	; &I-B-A2BB;
     (=jef-china3	. #x77E0)	; &I-JC3-77E0;
     (->lowercase
@@ -331,7 +331,7 @@
     (=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-2000	. #x2D38)	; &I-JX1-2D38; [13-24]
+    (=jis-x0213-1	. #x2D38)	; &I-JX1-2D38; [13-24]
     (=big5		. #xA2BC)	; &I-B-A2BC;
     (=jef-china3	. #x77E1)	; &I-JC3-77E1;
     (->lowercase
@@ -345,17 +345,17 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 5)
-    (<-compat/Roman-Numeral
-     ((name		  . "LATIN CAPITAL LETTER V")
-      (=ucs		  . #x0056)	; V
-      ))
     (=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-2000	. #x2D39)	; &I-JX1-2D39; [13-25]
+    (=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)	; ⅴ
@@ -378,7 +378,7 @@
     (=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-2000	. #x2D3A)	; &I-JX1-2D3A; [13-26]
+    (=jis-x0213-1	. #x2D3A)	; &I-JX1-2D3A; [13-26]
     (=big5		. #xA2BE)	; &I-B-A2BE;
     (=jef-china3	. #x77E3)	; &I-JC3-77E3;
     (->lowercase
@@ -406,7 +406,7 @@
     (=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-2000	. #x2D3B)	; &I-JX1-2D3B; [13-27]
+    (=jis-x0213-1	. #x2D3B)	; &I-JX1-2D3B; [13-27]
     (=big5		. #xA2BF)	; &I-B-A2BF;
     (=jef-china3	. #x77E4)	; &I-JC3-77E4;
     (->lowercase
@@ -437,7 +437,7 @@
     (=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-2000	. #x2D3C)	; &I-JX1-2D3C; [13-28]
+    (=jis-x0213-1	. #x2D3C)	; &I-JX1-2D3C; [13-28]
     (=big5		. #xA2C0)	; &I-B-A2C0;
     (=jef-china3	. #x77E5)	; &I-JC3-77E5;
     (->lowercase
@@ -462,7 +462,7 @@
     (=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-2000	. #x2D3D)	; &I-JX1-2D3D; [13-29]
+    (=jis-x0213-1	. #x2D3D)	; &I-JX1-2D3D; [13-29]
     (=big5		. #xA2C1)	; &I-B-A2C1;
     (=jef-china3	. #x77E6)	; &I-JC3-77E6;
     (->lowercase
@@ -476,17 +476,17 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 10)
-    (<-compat/Roman-Numeral
-     ((name		  . "LATIN CAPITAL LETTER X")
-      (=ucs		  . #x0058)	; X
-      ))
     (=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-2000	. #x2D3E)	; &I-JX1-2D3E; [13-30]
+    (=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)	; ⅹ
@@ -507,7 +507,7 @@
       ))
     (=ucs		. #x216A)	; Ⅺ
     (=gb2312		. #x227B)	; &I-G0-227B; [02-91]
-    (=jis-x0213-1-2000	. #x2D3F)	; &I-JX1-2D3F; [13-31]
+    (=jis-x0213-1	. #x2D3F)	; &I-JX1-2D3F; [13-31]
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL ELEVEN")
       (=ucs		  . #x217A)	; ⅺ
@@ -531,7 +531,7 @@
       ))
     (=ucs		. #x216B)	; Ⅻ
     (=gb2312		. #x227C)	; &I-G0-227C; [02-92]
-    (=jis-x0213-1-2000	. #x2D57)	; &I-JX1-2D57; [13-55]
+    (=jis-x0213-1	. #x2D57)	; &I-JX1-2D57; [13-55]
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL TWELVE")
       (=ucs		  . #x217B)	; ⅻ
@@ -543,11 +543,11 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 50)
+    (=ucs		. #x216C)	; Ⅼ
     (<-compat/Roman-Numeral
      ((name		  . "LATIN CAPITAL LETTER L")
       (=ucs		  . #x004C)	; L
       ))
-    (=ucs		. #x216C)	; Ⅼ
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL FIFTY")
       (=ucs		  . #x217C)	; ⅼ
@@ -559,11 +559,11 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 100)
+    (=ucs		. #x216D)	; Ⅽ
     (<-compat/Roman-Numeral
      ((name		  . "LATIN CAPITAL LETTER C")
       (=ucs		  . #x0043)	; C
       ))
-    (=ucs		. #x216D)	; Ⅽ
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL ONE HUNDRED")
       (=ucs		  . #x217D)	; ⅽ
@@ -575,11 +575,11 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 500)
+    (=ucs		. #x216E)	; Ⅾ
     (<-compat/Roman-Numeral
      ((name		  . "LATIN CAPITAL LETTER D")
       (=ucs		  . #x0044)	; D
       ))
-    (=ucs		. #x216E)	; Ⅾ
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL FIVE HUNDRED")
       (=ucs		  . #x217E)	; ⅾ
@@ -591,11 +591,11 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 1000)
+    (=ucs		. #x216F)	; Ⅿ
     (<-compat/Roman-Numeral
      ((name		  . "LATIN CAPITAL LETTER M")
       (=ucs		  . #x004D)	; M
       ))
-    (=ucs		. #x216F)	; Ⅿ
     (->lowercase
      ((name		  . "SMALL ROMAN NUMERAL ONE THOUSAND")
       (=ucs		  . #x217F)	; ⅿ
@@ -607,16 +607,16 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 1)
-    (<-compat/Roman-Numeral
-     ((name		  . "LATIN SMALL LETTER I")
-      (=ucs		  . #x0069)	; i
-      ))
     (=ucs		. #x2170)	; ⅰ
     (=ks-x1001		. #x2521)	; &I-K0-2521; [05-01]
     (=cns11643-1	. #x2635)	; &I-C1-2635; [06-21]
-    (=jis-x0213-1-2000	. #x2C35)	; &I-JX1-2C35; [12-21]
-    (=big5-eten		. #xC6B5)	; &B-C6B5;
+    (=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)	; Ⅰ
@@ -638,8 +638,8 @@
     (=ucs		. #x2171)	; ⅱ
     (=ks-x1001		. #x2522)	; &I-K0-2522; [05-02]
     (=cns11643-1	. #x2636)	; &I-C1-2636; [06-22]
-    (=jis-x0213-1-2000	. #x2C36)	; &I-JX1-2C36; [12-22]
-    (=big5-eten		. #xC6B6)	; &B-C6B6;
+    (=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")
@@ -665,8 +665,8 @@
     (=ucs		. #x2172)	; ⅲ
     (=ks-x1001		. #x2523)	; &I-K0-2523; [05-03]
     (=cns11643-1	. #x2637)	; &I-C1-2637; [06-23]
-    (=jis-x0213-1-2000	. #x2C37)	; &I-JX1-2C37; [12-23]
-    (=big5-eten		. #xC6B7)	; &B-C6B7;
+    (=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")
@@ -689,8 +689,8 @@
     (=ucs		. #x2173)	; ⅳ
     (=ks-x1001		. #x2524)	; &I-K0-2524; [05-04]
     (=cns11643-1	. #x2638)	; &I-C1-2638; [06-24]
-    (=jis-x0213-1-2000	. #x2C38)	; &I-JX1-2C38; [12-24]
-    (=big5-eten		. #xC6B8)	; &B-C6B8;
+    (=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")
@@ -703,16 +703,16 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 5)
-    (<-compat/Roman-Numeral
-     ((name		  . "LATIN SMALL LETTER V")
-      (=ucs		  . #x0076)	; v
-      ))
     (=ucs		. #x2174)	; ⅴ
     (=ks-x1001		. #x2525)	; &I-K0-2525; [05-05]
     (=cns11643-1	. #x2639)	; &I-C1-2639; [06-25]
-    (=jis-x0213-1-2000	. #x2C39)	; &I-JX1-2C39; [12-25]
-    (=big5-eten		. #xC6B9)	; &B-C6B9;
+    (=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)	; Ⅴ
@@ -734,8 +734,8 @@
     (=ucs		. #x2175)	; ⅵ
     (=ks-x1001		. #x2526)	; &I-K0-2526; [05-06]
     (=cns11643-1	. #x263A)	; &I-C1-263A; [06-26]
-    (=jis-x0213-1-2000	. #x2C3A)	; &I-JX1-2C3A; [12-26]
-    (=big5-eten		. #xC6BA)	; &B-C6BA;
+    (=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")
@@ -761,8 +761,8 @@
     (=ucs		. #x2176)	; ⅶ
     (=ks-x1001		. #x2527)	; &I-K0-2527; [05-07]
     (=cns11643-1	. #x263B)	; &I-C1-263B; [06-27]
-    (=jis-x0213-1-2000	. #x2C3B)	; &I-JX1-2C3B; [12-27]
-    (=big5-eten		. #xC6BB)	; &B-C6BB;
+    (=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")
@@ -791,8 +791,8 @@
     (=ucs		. #x2177)	; ⅷ
     (=ks-x1001		. #x2528)	; &I-K0-2528; [05-08]
     (=cns11643-1	. #x263C)	; &I-C1-263C; [06-28]
-    (=jis-x0213-1-2000	. #x2C3C)	; &I-JX1-2C3C; [12-28]
-    (=big5-eten		. #xC6BC)	; &B-C6BC;
+    (=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")
@@ -815,8 +815,8 @@
     (=ucs		. #x2178)	; ⅸ
     (=ks-x1001		. #x2529)	; &I-K0-2529; [05-09]
     (=cns11643-1	. #x263D)	; &I-C1-263D; [06-29]
-    (=jis-x0213-1-2000	. #x2C3D)	; &I-JX1-2C3D; [12-29]
-    (=big5-eten		. #xC6BD)	; &B-C6BD;
+    (=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")
@@ -829,16 +829,16 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 10)
-    (<-compat/Roman-Numeral
-     ((name		  . "LATIN SMALL LETTER X")
-      (=ucs		  . #x0078)	; x
-      ))
     (=ucs		. #x2179)	; ⅹ
     (=ks-x1001		. #x252A)	; &I-K0-252A; [05-10]
     (=cns11643-1	. #x263E)	; &I-C1-263E; [06-30]
-    (=jis-x0213-1-2000	. #x2C3E)	; &I-JX1-2C3E; [12-30]
-    (=big5-eten		. #xC6BE)	; &B-C6BE;
+    (=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)	; Ⅹ
@@ -858,7 +858,7 @@
       (=ucs		  . #x0069)	; i
       ))
     (=ucs		. #x217A)	; ⅺ
-    (=jis-x0213-1-2000	. #x2C3F)	; &I-JX1-2C3F; [12-31]
+    (=jis-x0213-1	. #x2C3F)	; &I-JX1-2C3F; [12-31]
     (->uppercase
      ((name		  . "ROMAN NUMERAL ELEVEN")
       (=ucs		  . #x216A)	; Ⅺ
@@ -881,7 +881,7 @@
       (=ucs		  . #x0069)	; i
       ))
     (=ucs		. #x217B)	; ⅻ
-    (=jis-x0213-1-2000	. #x2C40)	; &I-JX1-2C40; [12-32]
+    (=jis-x0213-1	. #x2C40)	; &I-JX1-2C40; [12-32]
     (->uppercase
      ((name		  . "ROMAN NUMERAL TWELVE")
       (=ucs		  . #x216B)	; Ⅻ
@@ -893,11 +893,11 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 50)
+    (=ucs		. #x217C)	; ⅼ
     (<-compat/Roman-Numeral
      ((name		  . "LATIN SMALL LETTER L")
       (=ucs		  . #x006C)	; l
       ))
-    (=ucs		. #x217C)	; ⅼ
     (->uppercase
      ((name		  . "ROMAN NUMERAL FIFTY")
       (=ucs		  . #x216C)	; Ⅼ
@@ -909,11 +909,11 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 100)
+    (=ucs		. #x217D)	; ⅽ
     (<-compat/Roman-Numeral
      ((name		  . "LATIN SMALL LETTER C")
       (=ucs		  . #x0063)	; c
       ))
-    (=ucs		. #x217D)	; ⅽ
     (->uppercase
      ((name		  . "ROMAN NUMERAL ONE HUNDRED")
       (=ucs		  . #x216D)	; Ⅽ
@@ -925,11 +925,11 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 500)
+    (=ucs		. #x217E)	; ⅾ
     (<-compat/Roman-Numeral
      ((name		  . "LATIN SMALL LETTER D")
       (=ucs		  . #x0064)	; d
       ))
-    (=ucs		. #x217E)	; ⅾ
     (->uppercase
      ((name		  . "ROMAN NUMERAL FIVE HUNDRED")
       (=ucs		  . #x216E)	; Ⅾ
@@ -941,11 +941,11 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (numeric-value	. 1000)
+    (=ucs		. #x217F)	; ⅿ
     (<-compat/Roman-Numeral
      ((name		  . "LATIN SMALL LETTER M")
       (=ucs		  . #x006D)	; m
       ))
-    (=ucs		. #x217F)	; ⅿ
     (->uppercase
      ((name		  . "ROMAN NUMERAL ONE THOUSAND")
       (=ucs		  . #x216F)	; Ⅿ