From: tomo <tomo>
Date: Mon, 22 Aug 2005 14:18:39 +0000 (+0000)
Subject: Reformatted.
X-Git-Tag: r21-4-17-chise-0_22-4^20~226
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=a522427bbe0f9fa5d10b43083b0caceee85d9e98;p=chise%2Fxemacs-chise.git

Reformatted.
---

diff --git a/lisp/utf-2000/u00020-Basic-Latin.el b/lisp/utf-2000/u00020-Basic-Latin.el
index 2b46afa..7bd0385 100644
--- a/lisp/utf-2000/u00020-Basic-Latin.el
+++ b/lisp/utf-2000/u00020-Basic-Latin.el
@@ -15,214 +15,214 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH EXCLAMATION MARK")
-      (=ucs		  . #xFF01)	; ！
-      ))
     (=ucs		. #x0021)	; !
     (ascii		. #x21)	; !
     (latin-jisx0201	. #x21)	; &I-LATINJ-21;
     (latin-viscii	. #x21)	; !
     (arabic-1-column	. #x22)	; &I-MULE-ARB1-22;
+    (->fullwidth
+     ((name		  . "FULLWIDTH EXCLAMATION MARK")
+      (=ucs		  . #xFF01)	; ！
+      ))
     ))
 (define-char
   '((name		. "QUOTATION MARK")
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH QUOTATION MARK")
-      (=ucs		  . #xFF02)	; ＂
-      ))
     (=ucs		. #x0022)	; "
     (ascii		. #x22)	; "
     (latin-jisx0201	. #x22)	; &I-LATINJ-22;
     (latin-viscii	. #x22)	; "
+    (->fullwidth
+     ((name		  . "FULLWIDTH QUOTATION MARK")
+      (=ucs		  . #xFF02)	; ＂
+      ))
     ))
 (define-char
   '((name		. "NUMBER SIGN")
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH NUMBER SIGN")
-      (=ucs		  . #xFF03)	; ＃
-      ))
     (=ucs		. #x0023)	; #
     (ascii		. #x23)	; #
     (latin-jisx0201	. #x23)	; &I-LATINJ-23;
     (latin-viscii	. #x23)	; #
+    (->fullwidth
+     ((name		  . "FULLWIDTH NUMBER SIGN")
+      (=ucs		  . #xFF03)	; ＃
+      ))
     ))
 (define-char
   '((name		. "DOLLAR SIGN")
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH DOLLAR SIGN")
-      (=ucs		  . #xFF04)	; ＄
-      ))
     (=ucs		. #x0024)	; $
     (ascii		. #x24)	; $
     (latin-jisx0201	. #x24)	; &I-LATINJ-24;
     (latin-viscii	. #x24)	; $
+    (->fullwidth
+     ((name		  . "FULLWIDTH DOLLAR SIGN")
+      (=ucs		  . #xFF04)	; ＄
+      ))
     ))
 (define-char
   '((name		. "PERCENT SIGN")
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH PERCENT SIGN")
-      (=ucs		  . #xFF05)	; ％
-      ))
     (=ucs		. #x0025)	; %
     (ascii		. #x25)	; %
     (latin-jisx0201	. #x25)	; &I-LATINJ-25;
     (latin-viscii	. #x25)	; %
+    (->fullwidth
+     ((name		  . "FULLWIDTH PERCENT SIGN")
+      (=ucs		  . #xFF05)	; ％
+      ))
     ))
 (define-char
   '((name		. "AMPERSAND")
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH AMPERSAND")
-      (=ucs		  . #xFF06)	; ＆
-      ))
     (=ucs		. #x0026)	; &
     (ascii		. #x26)	; &
     (latin-jisx0201	. #x26)	; &I-LATINJ-26;
     (latin-viscii	. #x26)	; &
+    (->fullwidth
+     ((name		  . "FULLWIDTH AMPERSAND")
+      (=ucs		  . #xFF06)	; ＆
+      ))
     ))
 (define-char
   '((name		. "APOSTROPHE")
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH APOSTROPHE")
-      (=ucs		  . #xFF07)	; ＇
-      ))
     (=ucs		. #x0027)	; '
     (ascii		. #x27)	; '
     (latin-jisx0201	. #x27)	; &I-LATINJ-27;
     (latin-viscii	. #x27)	; '
+    (->fullwidth
+     ((name		  . "FULLWIDTH APOSTROPHE")
+      (=ucs		  . #xFF07)	; ＇
+      ))
     ))
 (define-char
   '((name		. "LEFT PARENTHESIS")
     (general-category	punctuation open) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. t)
-    (->fullwidth
-     ((name		  . "FULLWIDTH LEFT PARENTHESIS")
-      (=ucs		  . #xFF08)	; （
-      ))
     (=ucs		. #x0028)	; (
     (ascii		. #x28)	; (
     (latin-jisx0201	. #x28)	; &I-LATINJ-28;
     (latin-viscii	. #x28)	; (
     (arabic-1-column	. #x24)	; &I-MULE-ARB1-24;
+    (->fullwidth
+     ((name		  . "FULLWIDTH LEFT PARENTHESIS")
+      (=ucs		  . #xFF08)	; （
+      ))
     ))
 (define-char
   '((name		. "RIGHT PARENTHESIS")
     (general-category	punctuation close) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. t)
-    (->fullwidth
-     ((name		  . "FULLWIDTH RIGHT PARENTHESIS")
-      (=ucs		  . #xFF09)	; ）
-      ))
     (=ucs		. #x0029)	; )
     (ascii		. #x29)	; )
     (latin-jisx0201	. #x29)	; &I-LATINJ-29;
     (latin-viscii	. #x29)	; )
     (arabic-1-column	. #x23)	; &I-MULE-ARB1-23;
+    (->fullwidth
+     ((name		  . "FULLWIDTH RIGHT PARENTHESIS")
+      (=ucs		  . #xFF09)	; ）
+      ))
     ))
 (define-char
   '((name		. "ASTERISK")
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH ASTERISK")
-      (=ucs		  . #xFF0A)	; ＊
-      ))
     (=ucs		. #x002A)	; *
     (ascii		. #x2A)	; *
     (latin-jisx0201	. #x2A)	; &I-LATINJ-2A;
     (latin-viscii	. #x2A)	; *
+    (->fullwidth
+     ((name		  . "FULLWIDTH ASTERISK")
+      (=ucs		  . #xFF0A)	; ＊
+      ))
     ))
 (define-char
   '((name		. "PLUS SIGN")
     (general-category	symbol math) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH PLUS SIGN")
-      (=ucs		  . #xFF0B)	; ＋
-      ))
     (=ucs		. #x002B)	; +
     (ascii		. #x2B)	; +
     (latin-jisx0201	. #x2B)	; &I-LATINJ-2B;
     (latin-viscii	. #x2B)	; +
+    (->fullwidth
+     ((name		  . "FULLWIDTH PLUS SIGN")
+      (=ucs		  . #xFF0B)	; ＋
+      ))
     ))
 (define-char
   '((name		. "COMMA")
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "CS")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH COMMA")
-      (=ucs		  . #xFF0C)	; ，
-      ))
     (=ucs		. #x002C)	; ,
     (ascii		. #x2C)	; ,
     (latin-jisx0201	. #x2C)	; &I-LATINJ-2C;
     (latin-viscii	. #x2C)	; ,
+    (->fullwidth
+     ((name		  . "FULLWIDTH COMMA")
+      (=ucs		  . #xFF0C)	; ，
+      ))
     ))
 (define-char
   '((name		. "HYPHEN-MINUS")
     (general-category	punctuation dash) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH HYPHEN-MINUS")
-      (=ucs		  . #xFF0D)	; －
-      ))
     (=ucs		. #x002D)	; -
     (ascii		. #x2D)	; -
     (latin-jisx0201	. #x2D)	; &I-LATINJ-2D;
     (latin-viscii	. #x2D)	; -
+    (->fullwidth
+     ((name		  . "FULLWIDTH HYPHEN-MINUS")
+      (=ucs		  . #xFF0D)	; －
+      ))
     ))
 (define-char
   '((name		. "FULL STOP")
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "CS")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH FULL STOP")
-      (=ucs		  . #xFF0E)	; ．
-      ))
     (=ucs		. #x002E)	; .
     (ascii		. #x2E)	; .
     (latin-jisx0201	. #x2E)	; &I-LATINJ-2E;
     (latin-viscii	. #x2E)	; .
     (arabic-1-column	. #x26)	; &I-MULE-ARB1-26;
+    (->fullwidth
+     ((name		  . "FULLWIDTH FULL STOP")
+      (=ucs		  . #xFF0E)	; ．
+      ))
     ))
 (define-char
   '((name		. "SOLIDUS")
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ES")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH SOLIDUS")
-      (=ucs		  . #xFF0F)	; ／
-      ))
     (=ucs		. #x002F)	; /
     (ascii		. #x2F)	; /
     (latin-jisx0201	. #x2F)	; &I-LATINJ-2F;
     (latin-viscii	. #x2F)	; /
+    (->fullwidth
+     ((name		  . "FULLWIDTH SOLIDUS")
+      (=ucs		  . #xFF0F)	; ／
+      ))
     ))
 (define-char
   '((name		. "DIGIT ZERO")
@@ -232,14 +232,14 @@
     (decimal-digit-value . 0)
     (digit-value	 . 0)
     (numeric-value	 . 0)
-    (->fullwidth
-     ((name		  . "FULLWIDTH DIGIT ZERO")
-      (=ucs		  . #xFF10)	; ０
-      ))
     (=ucs		. #x0030)	; 0
     (ascii		. #x30)	; 0
     (latin-jisx0201	. #x30)	; &I-LATINJ-30;
     (latin-viscii	. #x30)	; 0
+    (->fullwidth
+     ((name		  . "FULLWIDTH DIGIT ZERO")
+      (=ucs		  . #xFF10)	; ０
+      ))
     ))
 (define-char
   '((name		. "DIGIT ONE")
@@ -249,14 +249,14 @@
     (decimal-digit-value . 1)
     (digit-value	 . 1)
     (numeric-value	 . 1)
-    (->fullwidth
-     ((name		  . "FULLWIDTH DIGIT ONE")
-      (=ucs		  . #xFF11)	; １
-      ))
     (=ucs		. #x0031)	; 1
     (ascii		. #x31)	; 1
     (latin-jisx0201	. #x31)	; &I-LATINJ-31;
     (latin-viscii	. #x31)	; 1
+    (->fullwidth
+     ((name		  . "FULLWIDTH DIGIT ONE")
+      (=ucs		  . #xFF11)	; １
+      ))
     ))
 (define-char
   '((name		. "DIGIT TWO")
@@ -266,14 +266,14 @@
     (decimal-digit-value . 2)
     (digit-value	 . 2)
     (numeric-value	 . 2)
-    (->fullwidth
-     ((name		  . "FULLWIDTH DIGIT TWO")
-      (=ucs		  . #xFF12)	; ２
-      ))
     (=ucs		. #x0032)	; 2
     (ascii		. #x32)	; 2
     (latin-jisx0201	. #x32)	; &I-LATINJ-32;
     (latin-viscii	. #x32)	; 2
+    (->fullwidth
+     ((name		  . "FULLWIDTH DIGIT TWO")
+      (=ucs		  . #xFF12)	; ２
+      ))
     ))
 (define-char
   '((name		. "DIGIT THREE")
@@ -283,14 +283,14 @@
     (decimal-digit-value . 3)
     (digit-value	 . 3)
     (numeric-value	 . 3)
-    (->fullwidth
-     ((name		  . "FULLWIDTH DIGIT THREE")
-      (=ucs		  . #xFF13)	; ３
-      ))
     (=ucs		. #x0033)	; 3
     (ascii		. #x33)	; 3
     (latin-jisx0201	. #x33)	; &I-LATINJ-33;
     (latin-viscii	. #x33)	; 3
+    (->fullwidth
+     ((name		  . "FULLWIDTH DIGIT THREE")
+      (=ucs		  . #xFF13)	; ３
+      ))
     ))
 (define-char
   '((name		. "DIGIT FOUR")
@@ -300,14 +300,14 @@
     (decimal-digit-value . 4)
     (digit-value	 . 4)
     (numeric-value	 . 4)
-    (->fullwidth
-     ((name		  . "FULLWIDTH DIGIT FOUR")
-      (=ucs		  . #xFF14)	; ４
-      ))
     (=ucs		. #x0034)	; 4
     (ascii		. #x34)	; 4
     (latin-jisx0201	. #x34)	; &I-LATINJ-34;
     (latin-viscii	. #x34)	; 4
+    (->fullwidth
+     ((name		  . "FULLWIDTH DIGIT FOUR")
+      (=ucs		  . #xFF14)	; ４
+      ))
     ))
 (define-char
   '((name		. "DIGIT FIVE")
@@ -317,14 +317,14 @@
     (decimal-digit-value . 5)
     (digit-value	 . 5)
     (numeric-value	 . 5)
-    (->fullwidth
-     ((name		  . "FULLWIDTH DIGIT FIVE")
-      (=ucs		  . #xFF15)	; ５
-      ))
     (=ucs		. #x0035)	; 5
     (ascii		. #x35)	; 5
     (latin-jisx0201	. #x35)	; &I-LATINJ-35;
     (latin-viscii	. #x35)	; 5
+    (->fullwidth
+     ((name		  . "FULLWIDTH DIGIT FIVE")
+      (=ucs		  . #xFF15)	; ５
+      ))
     ))
 (define-char
   '((name		. "DIGIT SIX")
@@ -334,14 +334,14 @@
     (decimal-digit-value . 6)
     (digit-value	 . 6)
     (numeric-value	 . 6)
-    (->fullwidth
-     ((name		  . "FULLWIDTH DIGIT SIX")
-      (=ucs		  . #xFF16)	; ６
-      ))
     (=ucs		. #x0036)	; 6
     (ascii		. #x36)	; 6
     (latin-jisx0201	. #x36)	; &I-LATINJ-36;
     (latin-viscii	. #x36)	; 6
+    (->fullwidth
+     ((name		  . "FULLWIDTH DIGIT SIX")
+      (=ucs		  . #xFF16)	; ６
+      ))
     ))
 (define-char
   '((name		. "DIGIT SEVEN")
@@ -351,14 +351,14 @@
     (decimal-digit-value . 7)
     (digit-value	 . 7)
     (numeric-value	 . 7)
-    (->fullwidth
-     ((name		  . "FULLWIDTH DIGIT SEVEN")
-      (=ucs		  . #xFF17)	; ７
-      ))
     (=ucs		. #x0037)	; 7
     (ascii		. #x37)	; 7
     (latin-jisx0201	. #x37)	; &I-LATINJ-37;
     (latin-viscii	. #x37)	; 7
+    (->fullwidth
+     ((name		  . "FULLWIDTH DIGIT SEVEN")
+      (=ucs		  . #xFF17)	; ７
+      ))
     ))
 (define-char
   '((name		. "DIGIT EIGHT")
@@ -368,14 +368,14 @@
     (decimal-digit-value . 8)
     (digit-value	 . 8)
     (numeric-value	 . 8)
-    (->fullwidth
-     ((name		  . "FULLWIDTH DIGIT EIGHT")
-      (=ucs		  . #xFF18)	; ８
-      ))
     (=ucs		. #x0038)	; 8
     (ascii		. #x38)	; 8
     (latin-jisx0201	. #x38)	; &I-LATINJ-38;
     (latin-viscii	. #x38)	; 8
+    (->fullwidth
+     ((name		  . "FULLWIDTH DIGIT EIGHT")
+      (=ucs		  . #xFF18)	; ８
+      ))
     ))
 (define-char
   '((name		. "DIGIT NINE")
@@ -385,119 +385,123 @@
     (decimal-digit-value . 9)
     (digit-value	 . 9)
     (numeric-value	 . 9)
-    (->fullwidth
-     ((name		  . "FULLWIDTH DIGIT NINE")
-      (=ucs		  . #xFF19)	; ９
-      ))
     (=ucs		. #x0039)	; 9
     (ascii		. #x39)	; 9
     (latin-jisx0201	. #x39)	; &I-LATINJ-39;
     (latin-viscii	. #x39)	; 9
+    (->fullwidth
+     ((name		  . "FULLWIDTH DIGIT NINE")
+      (=ucs		  . #xFF19)	; ９
+      ))
     ))
 (define-char
   '((name		. "COLON")
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "CS")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH COLON")
-      (=ucs		  . #xFF1A)	; ：
-      ))
     (=ucs		. #x003A)	; :
     (ascii		. #x3A)	; :
     (latin-jisx0201	. #x3A)	; &I-LATINJ-3A;
     (latin-viscii	. #x3A)	; :
     (arabic-1-column	. #x27)	; &I-MULE-ARB1-27;
+    (->fullwidth
+     ((name		  . "FULLWIDTH COLON")
+      (=ucs		  . #xFF1A)	; ：
+      ))
     ))
 (define-char
   '((name		. "SEMICOLON")
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH SEMICOLON")
-      (=ucs		  . #xFF1B)	; ；
-      ))
     (=ucs		. #x003B)	; ;
     (ascii		. #x3B)	; ;
     (latin-jisx0201	. #x3B)	; &I-LATINJ-3B;
     (latin-viscii	. #x3B)	; ;
+    (->fullwidth
+     ((name		  . "FULLWIDTH SEMICOLON")
+      (=ucs		  . #xFF1B)	; ；
+      ))
     ))
 (define-char
   '((name		. "LESS-THAN SIGN")
     (general-category	symbol math) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. t)
-    (->fullwidth
-     ((name		  . "FULLWIDTH LESS-THAN SIGN")
-      (=ucs		  . #xFF1C)	; ＜
-      ))
     (=ucs		. #x003C)	; <
     (ascii		. #x3C)	; <
     (latin-jisx0201	. #x3C)	; &I-LATINJ-3C;
     (latin-viscii	. #x3C)	; <
+    (->fullwidth
+     ((name		  . "FULLWIDTH LESS-THAN SIGN")
+      (=ucs		  . #xFF1C)	; ＜
+      ))
     ))
 (define-char
   '((name		. "EQUALS SIGN")
     (general-category	symbol math) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH EQUALS SIGN")
-      (=ucs		  . #xFF1D)	; ＝
-      ))
     (=ucs		. #x003D)	; =
     (ascii		. #x3D)	; =
     (latin-jisx0201	. #x3D)	; &I-LATINJ-3D;
     (latin-viscii	. #x3D)	; =
+    (->fullwidth
+     ((name		  . "FULLWIDTH EQUALS SIGN")
+      (=ucs		  . #xFF1D)	; ＝
+      ))
     ))
 (define-char
   '((name		. "GREATER-THAN SIGN")
     (general-category	symbol math) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. t)
-    (->fullwidth
-     ((name		  . "FULLWIDTH GREATER-THAN SIGN")
-      (=ucs		  . #xFF1E)	; ＞
-      ))
     (=ucs		. #x003E)	; >
     (ascii		. #x3E)	; >
     (latin-jisx0201	. #x3E)	; &I-LATINJ-3E;
     (latin-viscii	. #x3E)	; >
+    (->fullwidth
+     ((name		  . "FULLWIDTH GREATER-THAN SIGN")
+      (=ucs		  . #xFF1E)	; ＞
+      ))
     ))
 (define-char
   '((name		. "QUESTION MARK")
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH QUESTION MARK")
-      (=ucs		  . #xFF1F)	; ？
-      ))
     (=ucs		. #x003F)	; ?
     (ascii		. #x3F)	; ?
     (latin-jisx0201	. #x3F)	; &I-LATINJ-3F;
     (latin-viscii	. #x3F)	; ?
+    (->fullwidth
+     ((name		  . "FULLWIDTH QUESTION MARK")
+      (=ucs		  . #xFF1F)	; ？
+      ))
     ))
 (define-char
   '((name		. "COMMERCIAL AT")
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH COMMERCIAL AT")
-      (=ucs		  . #xFF20)	; ï¼ 
-      ))
     (=ucs		. #x0040)	; @
     (ascii		. #x40)	; @
     (latin-jisx0201	. #x40)	; &I-LATINJ-40;
     (latin-viscii	. #x40)	; @
+    (->fullwidth
+     ((name		  . "FULLWIDTH COMMERCIAL AT")
+      (=ucs		  . #xFF20)	; ï¼ 
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0041)	; A
+    (ascii		. #x41)	; A
+    (latin-jisx0201	. #x41)	; &I-LATINJ-41;
+    (latin-viscii	. #x41)	; A
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER A")
       (=ucs		  . #xFF21)	; Ａ
@@ -506,16 +510,16 @@
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
       ))
-    (=ucs		. #x0041)	; A
-    (ascii		. #x41)	; A
-    (latin-jisx0201	. #x41)	; &I-LATINJ-41;
-    (latin-viscii	. #x41)	; A
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER B")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0042)	; B
+    (ascii		. #x42)	; B
+    (latin-jisx0201	. #x42)	; &I-LATINJ-42;
+    (latin-viscii	. #x42)	; B
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER B")
       (=ucs		  . #xFF22)	; ï¼¢
@@ -524,16 +528,16 @@
      ((name		  . "LATIN SMALL LETTER B")
       (=ucs		  . #x0062)	; b
       ))
-    (=ucs		. #x0042)	; B
-    (ascii		. #x42)	; B
-    (latin-jisx0201	. #x42)	; &I-LATINJ-42;
-    (latin-viscii	. #x42)	; B
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER C")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0043)	; C
+    (ascii		. #x43)	; C
+    (latin-jisx0201	. #x43)	; &I-LATINJ-43;
+    (latin-viscii	. #x43)	; C
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER C")
       (=ucs		  . #xFF23)	; ï¼£
@@ -542,16 +546,16 @@
      ((name		  . "LATIN SMALL LETTER C")
       (=ucs		  . #x0063)	; c
       ))
-    (=ucs		. #x0043)	; C
-    (ascii		. #x43)	; C
-    (latin-jisx0201	. #x43)	; &I-LATINJ-43;
-    (latin-viscii	. #x43)	; C
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER D")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0044)	; D
+    (ascii		. #x44)	; D
+    (latin-jisx0201	. #x44)	; &I-LATINJ-44;
+    (latin-viscii	. #x44)	; D
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER D")
       (=ucs		  . #xFF24)	; Ｄ
@@ -560,16 +564,16 @@
      ((name		  . "LATIN SMALL LETTER D")
       (=ucs		  . #x0064)	; d
       ))
-    (=ucs		. #x0044)	; D
-    (ascii		. #x44)	; D
-    (latin-jisx0201	. #x44)	; &I-LATINJ-44;
-    (latin-viscii	. #x44)	; D
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0045)	; E
+    (ascii		. #x45)	; E
+    (latin-jisx0201	. #x45)	; &I-LATINJ-45;
+    (latin-viscii	. #x45)	; E
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER E")
       (=ucs		  . #xFF25)	; ï¼¥
@@ -578,16 +582,16 @@
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
       ))
-    (=ucs		. #x0045)	; E
-    (ascii		. #x45)	; E
-    (latin-jisx0201	. #x45)	; &I-LATINJ-45;
-    (latin-viscii	. #x45)	; E
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER F")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0046)	; F
+    (ascii		. #x46)	; F
+    (latin-jisx0201	. #x46)	; &I-LATINJ-46;
+    (latin-viscii	. #x46)	; F
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER F")
       (=ucs		  . #xFF26)	; Ｆ
@@ -596,16 +600,16 @@
      ((name		  . "LATIN SMALL LETTER F")
       (=ucs		  . #x0066)	; f
       ))
-    (=ucs		. #x0046)	; F
-    (ascii		. #x46)	; F
-    (latin-jisx0201	. #x46)	; &I-LATINJ-46;
-    (latin-viscii	. #x46)	; F
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER G")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0047)	; G
+    (ascii		. #x47)	; G
+    (latin-jisx0201	. #x47)	; &I-LATINJ-47;
+    (latin-viscii	. #x47)	; G
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER G")
       (=ucs		  . #xFF27)	; Ｇ
@@ -614,16 +618,16 @@
      ((name		  . "LATIN SMALL LETTER G")
       (=ucs		  . #x0067)	; g
       ))
-    (=ucs		. #x0047)	; G
-    (ascii		. #x47)	; G
-    (latin-jisx0201	. #x47)	; &I-LATINJ-47;
-    (latin-viscii	. #x47)	; G
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER H")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0048)	; H
+    (ascii		. #x48)	; H
+    (latin-jisx0201	. #x48)	; &I-LATINJ-48;
+    (latin-viscii	. #x48)	; H
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER H")
       (=ucs		  . #xFF28)	; Ｈ
@@ -632,16 +636,16 @@
      ((name		  . "LATIN SMALL LETTER H")
       (=ucs		  . #x0068)	; h
       ))
-    (=ucs		. #x0048)	; H
-    (ascii		. #x48)	; H
-    (latin-jisx0201	. #x48)	; &I-LATINJ-48;
-    (latin-viscii	. #x48)	; H
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0049)	; I
+    (ascii		. #x49)	; I
+    (latin-jisx0201	. #x49)	; &I-LATINJ-49;
+    (latin-viscii	. #x49)	; I
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER I")
       (=ucs		  . #xFF29)	; Ｉ
@@ -650,16 +654,16 @@
      ((name		  . "LATIN SMALL LETTER I")
       (=ucs		  . #x0069)	; i
       ))
-    (=ucs		. #x0049)	; I
-    (ascii		. #x49)	; I
-    (latin-jisx0201	. #x49)	; &I-LATINJ-49;
-    (latin-viscii	. #x49)	; I
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER J")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x004A)	; J
+    (ascii		. #x4A)	; J
+    (latin-jisx0201	. #x4A)	; &I-LATINJ-4A;
+    (latin-viscii	. #x4A)	; J
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER J")
       (=ucs		  . #xFF2A)	; Ｊ
@@ -668,16 +672,16 @@
      ((name		  . "LATIN SMALL LETTER J")
       (=ucs		  . #x006A)	; j
       ))
-    (=ucs		. #x004A)	; J
-    (ascii		. #x4A)	; J
-    (latin-jisx0201	. #x4A)	; &I-LATINJ-4A;
-    (latin-viscii	. #x4A)	; J
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER K")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x004B)	; K
+    (ascii		. #x4B)	; K
+    (latin-jisx0201	. #x4B)	; &I-LATINJ-4B;
+    (latin-viscii	. #x4B)	; K
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER K")
       (=ucs		  . #xFF2B)	; Ｋ
@@ -686,16 +690,16 @@
      ((name		  . "LATIN SMALL LETTER K")
       (=ucs		  . #x006B)	; k
       ))
-    (=ucs		. #x004B)	; K
-    (ascii		. #x4B)	; K
-    (latin-jisx0201	. #x4B)	; &I-LATINJ-4B;
-    (latin-viscii	. #x4B)	; K
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER L")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x004C)	; L
+    (ascii		. #x4C)	; L
+    (latin-jisx0201	. #x4C)	; &I-LATINJ-4C;
+    (latin-viscii	. #x4C)	; L
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER L")
       (=ucs		  . #xFF2C)	; Ｌ
@@ -704,16 +708,16 @@
      ((name		  . "LATIN SMALL LETTER L")
       (=ucs		  . #x006C)	; l
       ))
-    (=ucs		. #x004C)	; L
-    (ascii		. #x4C)	; L
-    (latin-jisx0201	. #x4C)	; &I-LATINJ-4C;
-    (latin-viscii	. #x4C)	; L
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER M")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x004D)	; M
+    (ascii		. #x4D)	; M
+    (latin-jisx0201	. #x4D)	; &I-LATINJ-4D;
+    (latin-viscii	. #x4D)	; M
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER M")
       (=ucs		  . #xFF2D)	; ï¼­
@@ -722,16 +726,16 @@
      ((name		  . "LATIN SMALL LETTER M")
       (=ucs		  . #x006D)	; m
       ))
-    (=ucs		. #x004D)	; M
-    (ascii		. #x4D)	; M
-    (latin-jisx0201	. #x4D)	; &I-LATINJ-4D;
-    (latin-viscii	. #x4D)	; M
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER N")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x004E)	; N
+    (ascii		. #x4E)	; N
+    (latin-jisx0201	. #x4E)	; &I-LATINJ-4E;
+    (latin-viscii	. #x4E)	; N
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER N")
       (=ucs		  . #xFF2E)	; ï¼®
@@ -740,16 +744,16 @@
      ((name		  . "LATIN SMALL LETTER N")
       (=ucs		  . #x006E)	; n
       ))
-    (=ucs		. #x004E)	; N
-    (ascii		. #x4E)	; N
-    (latin-jisx0201	. #x4E)	; &I-LATINJ-4E;
-    (latin-viscii	. #x4E)	; N
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x004F)	; O
+    (ascii		. #x4F)	; O
+    (latin-jisx0201	. #x4F)	; &I-LATINJ-4F;
+    (latin-viscii	. #x4F)	; O
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER O")
       (=ucs		  . #xFF2F)	; Ｏ
@@ -758,16 +762,16 @@
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
       ))
-    (=ucs		. #x004F)	; O
-    (ascii		. #x4F)	; O
-    (latin-jisx0201	. #x4F)	; &I-LATINJ-4F;
-    (latin-viscii	. #x4F)	; O
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER P")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0050)	; P
+    (ascii		. #x50)	; P
+    (latin-jisx0201	. #x50)	; &I-LATINJ-50;
+    (latin-viscii	. #x50)	; P
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER P")
       (=ucs		  . #xFF30)	; ï¼°
@@ -776,16 +780,16 @@
      ((name		  . "LATIN SMALL LETTER P")
       (=ucs		  . #x0070)	; p
       ))
-    (=ucs		. #x0050)	; P
-    (ascii		. #x50)	; P
-    (latin-jisx0201	. #x50)	; &I-LATINJ-50;
-    (latin-viscii	. #x50)	; P
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Q")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0051)	; Q
+    (ascii		. #x51)	; Q
+    (latin-jisx0201	. #x51)	; &I-LATINJ-51;
+    (latin-viscii	. #x51)	; Q
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER Q")
       (=ucs		  . #xFF31)	; ï¼±
@@ -794,16 +798,16 @@
      ((name		  . "LATIN SMALL LETTER Q")
       (=ucs		  . #x0071)	; q
       ))
-    (=ucs		. #x0051)	; Q
-    (ascii		. #x51)	; Q
-    (latin-jisx0201	. #x51)	; &I-LATINJ-51;
-    (latin-viscii	. #x51)	; Q
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER R")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0052)	; R
+    (ascii		. #x52)	; R
+    (latin-jisx0201	. #x52)	; &I-LATINJ-52;
+    (latin-viscii	. #x52)	; R
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER R")
       (=ucs		  . #xFF32)	; ï¼²
@@ -812,16 +816,16 @@
      ((name		  . "LATIN SMALL LETTER R")
       (=ucs		  . #x0072)	; r
       ))
-    (=ucs		. #x0052)	; R
-    (ascii		. #x52)	; R
-    (latin-jisx0201	. #x52)	; &I-LATINJ-52;
-    (latin-viscii	. #x52)	; R
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER S")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0053)	; S
+    (ascii		. #x53)	; S
+    (latin-jisx0201	. #x53)	; &I-LATINJ-53;
+    (latin-viscii	. #x53)	; S
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER S")
       (=ucs		  . #xFF33)	; ï¼³
@@ -830,16 +834,16 @@
      ((name		  . "LATIN SMALL LETTER S")
       (=ucs		  . #x0073)	; s
       ))
-    (=ucs		. #x0053)	; S
-    (ascii		. #x53)	; S
-    (latin-jisx0201	. #x53)	; &I-LATINJ-53;
-    (latin-viscii	. #x53)	; S
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER T")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0054)	; T
+    (ascii		. #x54)	; T
+    (latin-jisx0201	. #x54)	; &I-LATINJ-54;
+    (latin-viscii	. #x54)	; T
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER T")
       (=ucs		  . #xFF34)	; ï¼´
@@ -848,16 +852,16 @@
      ((name		  . "LATIN SMALL LETTER T")
       (=ucs		  . #x0074)	; t
       ))
-    (=ucs		. #x0054)	; T
-    (ascii		. #x54)	; T
-    (latin-jisx0201	. #x54)	; &I-LATINJ-54;
-    (latin-viscii	. #x54)	; T
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0055)	; U
+    (ascii		. #x55)	; U
+    (latin-jisx0201	. #x55)	; &I-LATINJ-55;
+    (latin-viscii	. #x55)	; U
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER U")
       (=ucs		  . #xFF35)	; ï¼µ
@@ -866,16 +870,16 @@
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
       ))
-    (=ucs		. #x0055)	; U
-    (ascii		. #x55)	; U
-    (latin-jisx0201	. #x55)	; &I-LATINJ-55;
-    (latin-viscii	. #x55)	; U
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER V")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0056)	; V
+    (ascii		. #x56)	; V
+    (latin-jisx0201	. #x56)	; &I-LATINJ-56;
+    (latin-viscii	. #x56)	; V
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER V")
       (=ucs		  . #xFF36)	; Ｖ
@@ -884,16 +888,16 @@
      ((name		  . "LATIN SMALL LETTER V")
       (=ucs		  . #x0076)	; v
       ))
-    (=ucs		. #x0056)	; V
-    (ascii		. #x56)	; V
-    (latin-jisx0201	. #x56)	; &I-LATINJ-56;
-    (latin-viscii	. #x56)	; V
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER W")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0057)	; W
+    (ascii		. #x57)	; W
+    (latin-jisx0201	. #x57)	; &I-LATINJ-57;
+    (latin-viscii	. #x57)	; W
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER W")
       (=ucs		  . #xFF37)	; ï¼·
@@ -902,16 +906,16 @@
      ((name		  . "LATIN SMALL LETTER W")
       (=ucs		  . #x0077)	; w
       ))
-    (=ucs		. #x0057)	; W
-    (ascii		. #x57)	; W
-    (latin-jisx0201	. #x57)	; &I-LATINJ-57;
-    (latin-viscii	. #x57)	; W
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER X")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0058)	; X
+    (ascii		. #x58)	; X
+    (latin-jisx0201	. #x58)	; &I-LATINJ-58;
+    (latin-viscii	. #x58)	; X
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER X")
       (=ucs		  . #xFF38)	; Ｘ
@@ -920,16 +924,16 @@
      ((name		  . "LATIN SMALL LETTER X")
       (=ucs		  . #x0078)	; x
       ))
-    (=ucs		. #x0058)	; X
-    (ascii		. #x58)	; X
-    (latin-jisx0201	. #x58)	; &I-LATINJ-58;
-    (latin-viscii	. #x58)	; X
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Y")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0059)	; Y
+    (ascii		. #x59)	; Y
+    (latin-jisx0201	. #x59)	; &I-LATINJ-59;
+    (latin-viscii	. #x59)	; Y
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER Y")
       (=ucs		  . #xFF39)	; ï¼¹
@@ -938,16 +942,16 @@
      ((name		  . "LATIN SMALL LETTER Y")
       (=ucs		  . #x0079)	; y
       ))
-    (=ucs		. #x0059)	; Y
-    (ascii		. #x59)	; Y
-    (latin-jisx0201	. #x59)	; &I-LATINJ-59;
-    (latin-viscii	. #x59)	; Y
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Z")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x005A)	; Z
+    (ascii		. #x5A)	; Z
+    (latin-jisx0201	. #x5A)	; &I-LATINJ-5A;
+    (latin-viscii	. #x5A)	; Z
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN CAPITAL LETTER Z")
       (=ucs		  . #xFF3A)	; Ｚ
@@ -956,99 +960,100 @@
      ((name		  . "LATIN SMALL LETTER Z")
       (=ucs		  . #x007A)	; z
       ))
-    (=ucs		. #x005A)	; Z
-    (ascii		. #x5A)	; Z
-    (latin-jisx0201	. #x5A)	; &I-LATINJ-5A;
-    (latin-viscii	. #x5A)	; Z
     ))
 (define-char
   '((name		. "LEFT SQUARE BRACKET")
     (general-category	punctuation open) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. t)
-    (->fullwidth
-     ((name		  . "FULLWIDTH LEFT SQUARE BRACKET")
-      (=ucs		  . #xFF3B)	; ï¼»
-      ))
     (=ucs		. #x005B)	; [
     (ascii		. #x5B)	; [
     (latin-jisx0201	. #x5B)	; &I-LATINJ-5B;
     (latin-viscii	. #x5B)	; [
+    (->fullwidth
+     ((name		  . "FULLWIDTH LEFT SQUARE BRACKET")
+      (=ucs		  . #xFF3B)	; ï¼»
+      ))
     ))
 (define-char
   '((name		. "REVERSE SOLIDUS")
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (=ucs		. #x005C)	; \
+    (ascii		. #x5C)	; \
+    (latin-viscii	. #x5C)	; \
     (->fullwidth
      ((name		  . "FULLWIDTH REVERSE SOLIDUS")
       (=ucs		  . #xFF3C)	; ï¼¼
       ))
-    (=ucs		. #x005C)	; \
-    (ascii		. #x5C)	; \
-    (latin-viscii	. #x5C)	; \
     ))
 (define-char
   '((name		. "RIGHT SQUARE BRACKET")
     (general-category	punctuation close) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. t)
-    (->fullwidth
-     ((name		  . "FULLWIDTH RIGHT SQUARE BRACKET")
-      (=ucs		  . #xFF3D)	; ï¼½
-      ))
     (=ucs		. #x005D)	; ]
     (ascii		. #x5D)	; ]
     (latin-jisx0201	. #x5D)	; &I-LATINJ-5D;
     (latin-viscii	. #x5D)	; ]
+    (->fullwidth
+     ((name		  . "FULLWIDTH RIGHT SQUARE BRACKET")
+      (=ucs		  . #xFF3D)	; ï¼½
+      ))
     ))
 (define-char
   '((name		. "CIRCUMFLEX ACCENT")
     (general-category	symbol modifier) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH CIRCUMFLEX ACCENT")
-      (=ucs		  . #xFF3E)	; ï¼¾
-      ))
     (=ucs		. #x005E)	; ^
     (ascii		. #x5E)	; ^
     (latin-jisx0201	. #x5E)	; &I-LATINJ-5E;
     (latin-viscii	. #x5E)	; ^
+    (->fullwidth
+     ((name		  . "FULLWIDTH CIRCUMFLEX ACCENT")
+      (=ucs		  . #xFF3E)	; ï¼¾
+      ))
     ))
 (define-char
   '((name		. "LOW LINE")
     (general-category	punctuation connector) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH LOW LINE")
-      (=ucs		  . #xFF3F)	; ＿
-      ))
     (=ucs		. #x005F)	; _
     (ascii		. #x5F)	; _
     (latin-jisx0201	. #x5F)	; &I-LATINJ-5F;
     (latin-viscii	. #x5F)	; _
+    (->fullwidth
+     ((name		  . "FULLWIDTH LOW LINE")
+      (=ucs		  . #xFF3F)	; ＿
+      ))
     ))
 (define-char
   '((name		. "GRAVE ACCENT")
     (general-category	symbol modifier) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH GRAVE ACCENT")
-      (=ucs		  . #xFF40)	; ｀
-      ))
     (=ucs		. #x0060)	; `
     (ascii		. #x60)	; `
     (latin-jisx0201	. #x60)	; &I-LATINJ-60;
     (latin-viscii	. #x60)	; `
+    (->fullwidth
+     ((name		  . "FULLWIDTH GRAVE ACCENT")
+      (=ucs		  . #xFF40)	; ｀
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0061)	; a
+    (ascii		. #x61)	; a
+    (latin-jisx0201	. #x61)	; &I-LATINJ-61;
+    (latin-viscii	. #x61)	; a
+    (ipa		. #xA5)	; &I-MULE-IPA-25;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER A")
       (=ucs		  . #xFF41)	; ａ
@@ -1057,17 +1062,17 @@
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
       ))
-    (=ucs		. #x0061)	; a
-    (ascii		. #x61)	; a
-    (latin-jisx0201	. #x61)	; &I-LATINJ-61;
-    (latin-viscii	. #x61)	; a
-    (ipa		. #xA5)	; &I-MULE-IPA-25;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER B")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0062)	; b
+    (ascii		. #x62)	; b
+    (latin-jisx0201	. #x62)	; &I-LATINJ-62;
+    (latin-viscii	. #x62)	; b
+    (ipa		. #xC1)	; &I-MULE-IPA-41;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER B")
       (=ucs		  . #xFF42)	; ｂ
@@ -1076,17 +1081,16 @@
      ((name		  . "LATIN CAPITAL LETTER B")
       (=ucs		  . #x0042)	; B
       ))
-    (=ucs		. #x0062)	; b
-    (ascii		. #x62)	; b
-    (latin-jisx0201	. #x62)	; &I-LATINJ-62;
-    (latin-viscii	. #x62)	; b
-    (ipa		. #xC1)	; &I-MULE-IPA-41;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER C")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0063)	; c
+    (ascii		. #x63)	; c
+    (latin-jisx0201	. #x63)	; &I-LATINJ-63;
+    (latin-viscii	. #x63)	; c
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER C")
       (=ucs		  . #xFF43)	; ｃ
@@ -1095,16 +1099,17 @@
      ((name		  . "LATIN CAPITAL LETTER C")
       (=ucs		  . #x0043)	; C
       ))
-    (=ucs		. #x0063)	; c
-    (ascii		. #x63)	; c
-    (latin-jisx0201	. #x63)	; &I-LATINJ-63;
-    (latin-viscii	. #x63)	; c
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER D")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0064)	; d
+    (ascii		. #x64)	; d
+    (latin-jisx0201	. #x64)	; &I-LATINJ-64;
+    (latin-viscii	. #x64)	; d
+    (ipa		. #xC3)	; &I-MULE-IPA-43;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER D")
       (=ucs		  . #xFF44)	; ｄ
@@ -1113,17 +1118,17 @@
      ((name		  . "LATIN CAPITAL LETTER D")
       (=ucs		  . #x0044)	; D
       ))
-    (=ucs		. #x0064)	; d
-    (ascii		. #x64)	; d
-    (latin-jisx0201	. #x64)	; &I-LATINJ-64;
-    (latin-viscii	. #x64)	; d
-    (ipa		. #xC3)	; &I-MULE-IPA-43;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0065)	; e
+    (ascii		. #x65)	; e
+    (latin-jisx0201	. #x65)	; &I-LATINJ-65;
+    (latin-viscii	. #x65)	; e
+    (ipa		. #xA2)	; &I-MULE-IPA-22;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER E")
       (=ucs		  . #xFF45)	; ｅ
@@ -1132,17 +1137,17 @@
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
       ))
-    (=ucs		. #x0065)	; e
-    (ascii		. #x65)	; e
-    (latin-jisx0201	. #x65)	; &I-LATINJ-65;
-    (latin-viscii	. #x65)	; e
-    (ipa		. #xA2)	; &I-MULE-IPA-22;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER F")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0066)	; f
+    (ascii		. #x66)	; f
+    (latin-jisx0201	. #x66)	; &I-LATINJ-66;
+    (latin-viscii	. #x66)	; f
+    (ipa		. #xC6)	; &I-MULE-IPA-46;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER F")
       (=ucs		  . #xFF46)	; ｆ
@@ -1151,17 +1156,17 @@
      ((name		  . "LATIN CAPITAL LETTER F")
       (=ucs		  . #x0046)	; F
       ))
-    (=ucs		. #x0066)	; f
-    (ascii		. #x66)	; f
-    (latin-jisx0201	. #x66)	; &I-LATINJ-66;
-    (latin-viscii	. #x66)	; f
-    (ipa		. #xC6)	; &I-MULE-IPA-46;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER G")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0067)	; g
+    (ascii		. #x67)	; g
+    (latin-jisx0201	. #x67)	; &I-LATINJ-67;
+    (latin-viscii	. #x67)	; g
+    (ipa		. #xC5)	; &I-MULE-IPA-45;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER G")
       (=ucs		  . #xFF47)	; ｇ
@@ -1170,17 +1175,17 @@
      ((name		  . "LATIN CAPITAL LETTER G")
       (=ucs		  . #x0047)	; G
       ))
-    (=ucs		. #x0067)	; g
-    (ascii		. #x67)	; g
-    (latin-jisx0201	. #x67)	; &I-LATINJ-67;
-    (latin-viscii	. #x67)	; g
-    (ipa		. #xC5)	; &I-MULE-IPA-45;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER H")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0068)	; h
+    (ascii		. #x68)	; h
+    (latin-jisx0201	. #x68)	; &I-LATINJ-68;
+    (latin-viscii	. #x68)	; h
+    (ipa		. #xD1)	; &I-MULE-IPA-51;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER H")
       (=ucs		  . #xFF48)	; ｈ
@@ -1189,17 +1194,17 @@
      ((name		  . "LATIN CAPITAL LETTER H")
       (=ucs		  . #x0048)	; H
       ))
-    (=ucs		. #x0068)	; h
-    (ascii		. #x68)	; h
-    (latin-jisx0201	. #x68)	; &I-LATINJ-68;
-    (latin-viscii	. #x68)	; h
-    (ipa		. #xD1)	; &I-MULE-IPA-51;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER I")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0069)	; i
+    (ascii		. #x69)	; i
+    (latin-jisx0201	. #x69)	; &I-LATINJ-69;
+    (latin-viscii	. #x69)	; i
+    (ipa		. #xA0)	; &I-MULE-IPA-20;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER I")
       (=ucs		  . #xFF49)	; ｉ
@@ -1208,17 +1213,17 @@
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
       ))
-    (=ucs		. #x0069)	; i
-    (ascii		. #x69)	; i
-    (latin-jisx0201	. #x69)	; &I-LATINJ-69;
-    (latin-viscii	. #x69)	; i
-    (ipa		. #xA0)	; &I-MULE-IPA-20;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER J")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x006A)	; j
+    (ascii		. #x6A)	; j
+    (latin-jisx0201	. #x6A)	; &I-LATINJ-6A;
+    (latin-viscii	. #x6A)	; j
+    (ipa		. #xD9)	; &I-MULE-IPA-59;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER J")
       (=ucs		  . #xFF4A)	; ｊ
@@ -1227,17 +1232,17 @@
      ((name		  . "LATIN CAPITAL LETTER J")
       (=ucs		  . #x004A)	; J
       ))
-    (=ucs		. #x006A)	; j
-    (ascii		. #x6A)	; j
-    (latin-jisx0201	. #x6A)	; &I-LATINJ-6A;
-    (latin-viscii	. #x6A)	; j
-    (ipa		. #xD9)	; &I-MULE-IPA-59;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER K")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x006B)	; k
+    (ascii		. #x6B)	; k
+    (latin-jisx0201	. #x6B)	; &I-LATINJ-6B;
+    (latin-viscii	. #x6B)	; k
+    (ipa		. #xC4)	; &I-MULE-IPA-44;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER K")
       (=ucs		  . #xFF4B)	; ｋ
@@ -1246,17 +1251,17 @@
      ((name		  . "LATIN CAPITAL LETTER K")
       (=ucs		  . #x004B)	; K
       ))
-    (=ucs		. #x006B)	; k
-    (ascii		. #x6B)	; k
-    (latin-jisx0201	. #x6B)	; &I-LATINJ-6B;
-    (latin-viscii	. #x6B)	; k
-    (ipa		. #xC4)	; &I-MULE-IPA-44;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER L")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x006C)	; l
+    (ascii		. #x6C)	; l
+    (latin-jisx0201	. #x6C)	; &I-LATINJ-6C;
+    (latin-viscii	. #x6C)	; l
+    (ipa		. #xDA)	; &I-MULE-IPA-5A;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER L")
       (=ucs		  . #xFF4C)	; ｌ
@@ -1265,17 +1270,17 @@
      ((name		  . "LATIN CAPITAL LETTER L")
       (=ucs		  . #x004C)	; L
       ))
-    (=ucs		. #x006C)	; l
-    (ascii		. #x6C)	; l
-    (latin-jisx0201	. #x6C)	; &I-LATINJ-6C;
-    (latin-viscii	. #x6C)	; l
-    (ipa		. #xDA)	; &I-MULE-IPA-5A;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER M")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x006D)	; m
+    (ascii		. #x6D)	; m
+    (latin-jisx0201	. #x6D)	; &I-LATINJ-6D;
+    (latin-viscii	. #x6D)	; m
+    (ipa		. #xD2)	; &I-MULE-IPA-52;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER M")
       (=ucs		  . #xFF4D)	; ｍ
@@ -1284,17 +1289,17 @@
      ((name		  . "LATIN CAPITAL LETTER M")
       (=ucs		  . #x004D)	; M
       ))
-    (=ucs		. #x006D)	; m
-    (ascii		. #x6D)	; m
-    (latin-jisx0201	. #x6D)	; &I-LATINJ-6D;
-    (latin-viscii	. #x6D)	; m
-    (ipa		. #xD2)	; &I-MULE-IPA-52;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER N")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x006E)	; n
+    (ascii		. #x6E)	; n
+    (latin-jisx0201	. #x6E)	; &I-LATINJ-6E;
+    (latin-viscii	. #x6E)	; n
+    (ipa		. #xD3)	; &I-MULE-IPA-53;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER N")
       (=ucs		  . #xFF4E)	; ｎ
@@ -1303,17 +1308,17 @@
      ((name		  . "LATIN CAPITAL LETTER N")
       (=ucs		  . #x004E)	; N
       ))
-    (=ucs		. #x006E)	; n
-    (ascii		. #x6E)	; n
-    (latin-jisx0201	. #x6E)	; &I-LATINJ-6E;
-    (latin-viscii	. #x6E)	; n
-    (ipa		. #xD3)	; &I-MULE-IPA-53;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x006F)	; o
+    (ascii		. #x6F)	; o
+    (latin-jisx0201	. #x6F)	; &I-LATINJ-6F;
+    (latin-viscii	. #x6F)	; o
+    (ipa		. #xB6)	; &I-MULE-IPA-36;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER O")
       (=ucs		  . #xFF4F)	; ｏ
@@ -1322,17 +1327,17 @@
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
       ))
-    (=ucs		. #x006F)	; o
-    (ascii		. #x6F)	; o
-    (latin-jisx0201	. #x6F)	; &I-LATINJ-6F;
-    (latin-viscii	. #x6F)	; o
-    (ipa		. #xB6)	; &I-MULE-IPA-36;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER P")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0070)	; p
+    (ascii		. #x70)	; p
+    (latin-jisx0201	. #x70)	; &I-LATINJ-70;
+    (latin-viscii	. #x70)	; p
+    (ipa		. #xC0)	; &I-MULE-IPA-40;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER P")
       (=ucs		  . #xFF50)	; ｐ
@@ -1341,17 +1346,16 @@
      ((name		  . "LATIN CAPITAL LETTER P")
       (=ucs		  . #x0050)	; P
       ))
-    (=ucs		. #x0070)	; p
-    (ascii		. #x70)	; p
-    (latin-jisx0201	. #x70)	; &I-LATINJ-70;
-    (latin-viscii	. #x70)	; p
-    (ipa		. #xC0)	; &I-MULE-IPA-40;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Q")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0071)	; q
+    (ascii		. #x71)	; q
+    (latin-jisx0201	. #x71)	; &I-LATINJ-71;
+    (latin-viscii	. #x71)	; q
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER Q")
       (=ucs		  . #xFF51)	; ｑ
@@ -1360,16 +1364,17 @@
      ((name		  . "LATIN CAPITAL LETTER Q")
       (=ucs		  . #x0051)	; Q
       ))
-    (=ucs		. #x0071)	; q
-    (ascii		. #x71)	; q
-    (latin-jisx0201	. #x71)	; &I-LATINJ-71;
-    (latin-viscii	. #x71)	; q
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER R")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0072)	; r
+    (ascii		. #x72)	; r
+    (latin-jisx0201	. #x72)	; &I-LATINJ-72;
+    (latin-viscii	. #x72)	; r
+    (ipa		. #xD6)	; &I-MULE-IPA-56;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER R")
       (=ucs		  . #xFF52)	; ｒ
@@ -1378,17 +1383,17 @@
      ((name		  . "LATIN CAPITAL LETTER R")
       (=ucs		  . #x0052)	; R
       ))
-    (=ucs		. #x0072)	; r
-    (ascii		. #x72)	; r
-    (latin-jisx0201	. #x72)	; &I-LATINJ-72;
-    (latin-viscii	. #x72)	; r
-    (ipa		. #xD6)	; &I-MULE-IPA-56;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER S")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0073)	; s
+    (ascii		. #x73)	; s
+    (latin-jisx0201	. #x73)	; &I-LATINJ-73;
+    (latin-viscii	. #x73)	; s
+    (ipa		. #xCA)	; &I-MULE-IPA-4A;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER S")
       (=ucs		  . #xFF53)	; ｓ
@@ -1397,17 +1402,17 @@
      ((name		  . "LATIN CAPITAL LETTER S")
       (=ucs		  . #x0053)	; S
       ))
-    (=ucs		. #x0073)	; s
-    (ascii		. #x73)	; s
-    (latin-jisx0201	. #x73)	; &I-LATINJ-73;
-    (latin-viscii	. #x73)	; s
-    (ipa		. #xCA)	; &I-MULE-IPA-4A;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER T")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0074)	; t
+    (ascii		. #x74)	; t
+    (latin-jisx0201	. #x74)	; &I-LATINJ-74;
+    (latin-viscii	. #x74)	; t
+    (ipa		. #xC2)	; &I-MULE-IPA-42;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER T")
       (=ucs		  . #xFF54)	; ｔ
@@ -1416,17 +1421,17 @@
      ((name		  . "LATIN CAPITAL LETTER T")
       (=ucs		  . #x0054)	; T
       ))
-    (=ucs		. #x0074)	; t
-    (ascii		. #x74)	; t
-    (latin-jisx0201	. #x74)	; &I-LATINJ-74;
-    (latin-viscii	. #x74)	; t
-    (ipa		. #xC2)	; &I-MULE-IPA-42;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0075)	; u
+    (ascii		. #x75)	; u
+    (latin-jisx0201	. #x75)	; &I-LATINJ-75;
+    (latin-viscii	. #x75)	; u
+    (ipa		. #xB4)	; &I-MULE-IPA-34;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER U")
       (=ucs		  . #xFF55)	; ｕ
@@ -1435,17 +1440,17 @@
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
       ))
-    (=ucs		. #x0075)	; u
-    (ascii		. #x75)	; u
-    (latin-jisx0201	. #x75)	; &I-LATINJ-75;
-    (latin-viscii	. #x75)	; u
-    (ipa		. #xB4)	; &I-MULE-IPA-34;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER V")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0076)	; v
+    (ascii		. #x76)	; v
+    (latin-jisx0201	. #x76)	; &I-LATINJ-76;
+    (latin-viscii	. #x76)	; v
+    (ipa		. #xC7)	; &I-MULE-IPA-47;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER V")
       (=ucs		  . #xFF56)	; ｖ
@@ -1454,17 +1459,17 @@
      ((name		  . "LATIN CAPITAL LETTER V")
       (=ucs		  . #x0056)	; V
       ))
-    (=ucs		. #x0076)	; v
-    (ascii		. #x76)	; v
-    (latin-jisx0201	. #x76)	; &I-LATINJ-76;
-    (latin-viscii	. #x76)	; v
-    (ipa		. #xC7)	; &I-MULE-IPA-47;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER W")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0077)	; w
+    (ascii		. #x77)	; w
+    (latin-jisx0201	. #x77)	; &I-LATINJ-77;
+    (latin-viscii	. #x77)	; w
+    (ipa		. #xDE)	; &I-MULE-IPA-5E;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER W")
       (=ucs		  . #xFF57)	; ｗ
@@ -1473,17 +1478,17 @@
      ((name		  . "LATIN CAPITAL LETTER W")
       (=ucs		  . #x0057)	; W
       ))
-    (=ucs		. #x0077)	; w
-    (ascii		. #x77)	; w
-    (latin-jisx0201	. #x77)	; &I-LATINJ-77;
-    (latin-viscii	. #x77)	; w
-    (ipa		. #xDE)	; &I-MULE-IPA-5E;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER X")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0078)	; x
+    (ascii		. #x78)	; x
+    (latin-jisx0201	. #x78)	; &I-LATINJ-78;
+    (latin-viscii	. #x78)	; x
+    (ipa		. #xCF)	; &I-MULE-IPA-4F;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER X")
       (=ucs		  . #xFF58)	; ｘ
@@ -1492,17 +1497,17 @@
      ((name		  . "LATIN CAPITAL LETTER X")
       (=ucs		  . #x0058)	; X
       ))
-    (=ucs		. #x0078)	; x
-    (ascii		. #x78)	; x
-    (latin-jisx0201	. #x78)	; &I-LATINJ-78;
-    (latin-viscii	. #x78)	; x
-    (ipa		. #xCF)	; &I-MULE-IPA-4F;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Y")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0079)	; y
+    (ascii		. #x79)	; y
+    (latin-jisx0201	. #x79)	; &I-LATINJ-79;
+    (latin-viscii	. #x79)	; y
+    (ipa		. #xAD)	; &I-MULE-IPA-2D;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER Y")
       (=ucs		  . #xFF59)	; ｙ
@@ -1511,17 +1516,17 @@
      ((name		  . "LATIN CAPITAL LETTER Y")
       (=ucs		  . #x0059)	; Y
       ))
-    (=ucs		. #x0079)	; y
-    (ascii		. #x79)	; y
-    (latin-jisx0201	. #x79)	; &I-LATINJ-79;
-    (latin-viscii	. #x79)	; y
-    (ipa		. #xAD)	; &I-MULE-IPA-2D;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Z")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x007A)	; z
+    (ascii		. #x7A)	; z
+    (latin-jisx0201	. #x7A)	; &I-LATINJ-7A;
+    (latin-viscii	. #x7A)	; z
+    (ipa		. #xCB)	; &I-MULE-IPA-4B;
     (->fullwidth
      ((name		  . "FULLWIDTH LATIN SMALL LETTER Z")
       (=ucs		  . #xFF5A)	; ｚ
@@ -1530,66 +1535,61 @@
      ((name		  . "LATIN CAPITAL LETTER Z")
       (=ucs		  . #x005A)	; Z
       ))
-    (=ucs		. #x007A)	; z
-    (ascii		. #x7A)	; z
-    (latin-jisx0201	. #x7A)	; &I-LATINJ-7A;
-    (latin-viscii	. #x7A)	; z
-    (ipa		. #xCB)	; &I-MULE-IPA-4B;
     ))
 (define-char
   '((name		. "LEFT CURLY BRACKET")
     (general-category	punctuation open) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. t)
-    (->fullwidth
-     ((name		  . "FULLWIDTH LEFT CURLY BRACKET")
-      (=ucs		  . #xFF5B)	; ｛
-      ))
     (=ucs		. #x007B)	; {
     (ascii		. #x7B)	; {
     (latin-jisx0201	. #x7B)	; &I-LATINJ-7B;
     (latin-viscii	. #x7B)	; {
+    (->fullwidth
+     ((name		  . "FULLWIDTH LEFT CURLY BRACKET")
+      (=ucs		  . #xFF5B)	; ｛
+      ))
     ))
 (define-char
   '((name		. "VERTICAL LINE")
     (general-category	symbol math) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH VERTICAL LINE")
-      (=ucs		  . #xFF5C)	; ｜
-      ))
     (=ucs		. #x007C)	; |
     (ascii		. #x7C)	; |
     (latin-jisx0201	. #x7C)	; &I-LATINJ-7C;
     (latin-viscii	. #x7C)	; |
+    (->fullwidth
+     ((name		  . "FULLWIDTH VERTICAL LINE")
+      (=ucs		  . #xFF5C)	; ｜
+      ))
     ))
 (define-char
   '((name		. "RIGHT CURLY BRACKET")
     (general-category	punctuation close) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. t)
-    (->fullwidth
-     ((name		  . "FULLWIDTH RIGHT CURLY BRACKET")
-      (=ucs		  . #xFF5D)	; ｝
-      ))
     (=ucs		. #x007D)	; }
     (ascii		. #x7D)	; }
     (latin-jisx0201	. #x7D)	; &I-LATINJ-7D;
     (latin-viscii	. #x7D)	; }
+    (->fullwidth
+     ((name		  . "FULLWIDTH RIGHT CURLY BRACKET")
+      (=ucs		  . #xFF5D)	; ｝
+      ))
     ))
 (define-char
   '((name		. "TILDE")
     (general-category	symbol math) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (=ucs		. #x007E)	; ~
+    (ascii		. #x7E)	; ~
+    (latin-viscii	. #x7E)	; ~
     (->fullwidth
      ((name		  . "FULLWIDTH TILDE")
       (=ucs		  . #xFF5E)	; ～
       ))
-    (=ucs		. #x007E)	; ~
-    (ascii		. #x7E)	; ~
-    (latin-viscii	. #x7E)	; ~
     ))
 (define-char
   '((name		. "DELETE")
diff --git a/lisp/utf-2000/u000A0-Latin-1-Supplement.el b/lisp/utf-2000/u000A0-Latin-1-Supplement.el
index 0bb2030..2e45748 100755
--- a/lisp/utf-2000/u000A0-Latin-1-Supplement.el
+++ b/lisp/utf-2000/u000A0-Latin-1-Supplement.el
@@ -59,30 +59,30 @@
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH CENT SIGN")
-      (=ucs		  . #xFFE0)	; ï¿ 
-      ))
     (=ucs		. #x00A2)	; ¢
     (latin-iso8859-1	. #xA2)	; &I-LATIN1-22;
     (hebrew-iso8859-8	. #xA2)	; &I-HEBREW-22;
     (latin-iso8859-9	. #xA2)	; &I-LATIN5-22;
+    (->fullwidth
+     ((name		  . "FULLWIDTH CENT SIGN")
+      (=ucs		  . #xFFE0)	; ï¿ 
+      ))
     ))
 (define-char
   '((name		. "POUND SIGN")
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH POUND SIGN")
-      (=ucs		  . #xFFE1)	; ï¿¡
-      ))
     (=ucs		. #x00A3)	; £
     (latin-iso8859-1	. #xA3)	; &I-LATIN1-23;
     (latin-iso8859-3	. #xA3)	; &I-LATIN3-23;
     (greek-iso8859-7	. #xA3)	; &I-GREEK-23;
     (hebrew-iso8859-8	. #xA3)	; &I-HEBREW-23;
     (latin-iso8859-9	. #xA3)	; &I-LATIN5-23;
+    (->fullwidth
+     ((name		  . "FULLWIDTH POUND SIGN")
+      (=ucs		  . #xFFE1)	; ï¿¡
+      ))
     ))
 (define-char
   '((name		. "CURRENCY SIGN")
@@ -118,30 +118,30 @@
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH YEN SIGN")
-      (=ucs		  . #xFFE5)	; ï¿¥
-      ))
     (=ucs		. #x00A5)	; ¥
     (latin-jisx0201	. #x5C)	; &I-LATINJ-5C;
     (latin-iso8859-1	. #xA5)	; &I-LATIN1-25;
     (hebrew-iso8859-8	. #xA5)	; &I-HEBREW-25;
     (latin-iso8859-9	. #xA5)	; &I-LATIN5-25;
+    (->fullwidth
+     ((name		  . "FULLWIDTH YEN SIGN")
+      (=ucs		  . #xFFE5)	; ï¿¥
+      ))
     ))
 (define-char
   '((name		. "BROKEN BAR")
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH BROKEN BAR")
-      (=ucs		  . #xFFE4)	; ￤
-      ))
     (=ucs		. #x00A6)	; ¦
     (latin-iso8859-1	. #xA6)	; &I-LATIN1-26;
     (greek-iso8859-7	. #xA6)	; &I-GREEK-26;
     (hebrew-iso8859-8	. #xA6)	; &I-HEBREW-26;
     (latin-iso8859-9	. #xA6)	; &I-LATIN5-26;
+    (->fullwidth
+     ((name		  . "FULLWIDTH BROKEN BAR")
+      (=ucs		  . #xFFE4)	; ￤
+      ))
     ))
 (define-char
   '((name		. "SECTION SIGN")
@@ -293,15 +293,15 @@
     (general-category	symbol math) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH NOT SIGN")
-      (=ucs		  . #xFFE2)	; ï¿¢
-      ))
     (=ucs		. #x00AC)	; ¬
     (latin-iso8859-1	. #xAC)	; &I-LATIN1-2C;
     (greek-iso8859-7	. #xAC)	; &I-GREEK-2C;
     (hebrew-iso8859-8	. #xAC)	; &I-HEBREW-2C;
     (latin-iso8859-9	. #xAC)	; &I-LATIN5-2C;
+    (->fullwidth
+     ((name		  . "FULLWIDTH NOT SIGN")
+      (=ucs		  . #xFFE2)	; ï¿¢
+      ))
     ))
 (define-char
   '((name		. "SOFT HYPHEN")
@@ -360,10 +360,6 @@
     (general-category	symbol modifier) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->fullwidth
-     ((name		  . "FULLWIDTH MACRON")
-      (=ucs		  . #xFFE3)	; ï¿£
-      ))
     (=>decomposition@compat
      ((name		  . "SPACE")
       (=ucs		  . #x0020)	;
@@ -375,6 +371,10 @@
     (latin-iso8859-1	. #xAF)	; &I-LATIN1-2F;
     (latin-iso8859-4	. #xAF)	; &I-LATIN4-2F;
     (latin-iso8859-9	. #xAF)	; &I-LATIN5-2F;
+    (->fullwidth
+     ((name		  . "FULLWIDTH MACRON")
+      (=ucs		  . #xFFE3)	; ï¿£
+      ))
     ))
 (define-char
   '((name		. "DEGREE SIGN")
@@ -847,10 +847,6 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH GRAVE")
-      (=ucs		  . #x00E0)	; à
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
@@ -864,17 +860,16 @@
     (latin-iso8859-9	. #xC0)	; &I-LATIN5-40;
     (latin-viscii	. #xC0)	; &I-MULE-VIET-U-60;
     (latin-viscii-upper . #xE0)	; &I-MULE-VIET-U-60;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH GRAVE")
+      (=ucs		  . #x00E0)	; à
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER A WITH GRAVE")
       (=ucs		  . #x00C0)	; À
       ))
-    (->lowercase
-     ((=gb2312		  . #x2824)	; &JX1-2956; [08-04]
-      (=jis-x0212	  . #x2B22)	; &I-JSP-2B22; [11-02]
-      (=jis-x0213-1-2000  . #x2956)	; &I-JX1-2956; [09-54]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER A WITH GRAVE")
       (=ucs		  . #x00C0)	; À
@@ -890,16 +885,17 @@
     (=jis-x0213-1-2000	. #x2937)	; &I-JX1-2937; [09-23]
     (=jef-china3	. #x85B9)	; &I-JC3-85B9;
     (=ucs@jis/fw	. #x00C0)	; &JX1-2937;
+    (->lowercase
+     ((=gb2312		  . #x2824)	; &JX1-2956; [08-04]
+      (=jis-x0212	  . #x2B22)	; &I-JSP-2B22; [11-02]
+      (=jis-x0213-1-2000  . #x2956)	; &I-JX1-2956; [09-54]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A WITH ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH ACUTE")
-      (=ucs		  . #x00E1)	; á
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
@@ -915,17 +911,16 @@
     (latin-iso8859-9	. #xC1)	; &I-LATIN5-41;
     (latin-viscii	. #xC1)	; &I-MULE-VIET-U-61;
     (latin-viscii-upper . #xE1)	; &I-MULE-VIET-U-61;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH ACUTE")
+      (=ucs		  . #x00E1)	; á
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER A WITH ACUTE")
       (=ucs		  . #x00C1)	; Á
       ))
-    (->lowercase
-     ((=gb2312		  . #x2822)	; &JX1-2957; [08-02]
-      (=jis-x0212	  . #x2B21)	; &I-JSP-2B21; [11-01]
-      (=jis-x0213-1-2000  . #x2957)	; &I-JX1-2957; [09-55]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER A WITH ACUTE")
       (=ucs		  . #x00C1)	; Á
@@ -941,16 +936,17 @@
     (=jis-x0213-1-2000	. #x2938)	; &I-JX1-2938; [09-24]
     (=jef-china3	. #x85D5)	; &I-JC3-85D5;
     (=ucs@jis/fw	. #x00C1)	; &JX1-2938;
+    (->lowercase
+     ((=gb2312		  . #x2822)	; &JX1-2957; [08-02]
+      (=jis-x0212	  . #x2B21)	; &I-JSP-2B21; [11-01]
+      (=jis-x0213-1-2000  . #x2957)	; &I-JX1-2957; [09-55]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A WITH CIRCUMFLEX")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH CIRCUMFLEX")
-      (=ucs		  . #x00E2)	; â
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
@@ -967,16 +963,16 @@
     (latin-tcvn5712	. #xA2)	; &I-VSCII2-22;
     (latin-viscii	. #xC2)	; &I-MULE-VIET-U-62;
     (latin-viscii-upper . #xE2)	; &I-MULE-VIET-U-62;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH CIRCUMFLEX")
+      (=ucs		  . #x00E2)	; â
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX")
       (=ucs		  . #x00C2)	; Â
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B24)	; &JX1-2958; [11-04]
-      (=jis-x0213-1-2000  . #x2958)	; &I-JX1-2958; [09-56]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX")
       (=ucs		  . #x00C2)	; Â
@@ -992,16 +988,16 @@
     (=jis-x0213-1-2000	. #x2939)	; &I-JX1-2939; [09-25]
     (=jef-china3	. #x86B7)	; &I-JC3-86B7;
     (=ucs@jis/fw	. #x00C2)	; &JX1-2939;
+    (->lowercase
+     ((=jis-x0212	  . #x2B24)	; &JX1-2958; [11-04]
+      (=jis-x0213-1-2000  . #x2958)	; &I-JX1-2958; [09-56]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A WITH TILDE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH TILDE")
-      (=ucs		  . #x00E3)	; ã
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
@@ -1015,16 +1011,16 @@
     (latin-iso8859-9	. #xC3)	; &I-LATIN5-43;
     (latin-viscii	. #xC3)	; &I-MULE-VIET-U-63;
     (latin-viscii-upper . #xE3)	; &I-MULE-VIET-U-63;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH TILDE")
+      (=ucs		  . #x00E3)	; ã
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER A WITH TILDE")
       (=ucs		  . #x00C3)	; Ã
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B2A)	; &JX1-2959; [11-10]
-      (=jis-x0213-1-2000  . #x2959)	; &I-JX1-2959; [09-57]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER A WITH TILDE")
       (=ucs		  . #x00C3)	; Ã
@@ -1040,16 +1036,16 @@
     (=jis-x0213-1-2000	. #x293A)	; &I-JX1-293A; [09-26]
     (=jef-china3	. #x86E2)	; &I-JC3-86E2;
     (=ucs@jis/fw	. #x00C3)	; &JX1-293A;
+    (->lowercase
+     ((=jis-x0212	  . #x2B2A)	; &JX1-2959; [11-10]
+      (=jis-x0213-1-2000  . #x2959)	; &I-JX1-2959; [09-57]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH DIAERESIS")
-      (=ucs		  . #x00E4)	; ä
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
@@ -1063,16 +1059,16 @@
     (latin-iso8859-3	. #xC4)	; &I-LATIN3-44;
     (latin-iso8859-4	. #xC4)	; &I-LATIN4-44;
     (latin-iso8859-9	. #xC4)	; &I-LATIN5-44;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH DIAERESIS")
+      (=ucs		  . #x00E4)	; ä
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER A WITH DIAERESIS")
       (=ucs		  . #x00C4)	; Ä
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B23)	; &JX1-295A; [11-03]
-      (=jis-x0213-1-2000  . #x295A)	; &I-JX1-295A; [09-58]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER A WITH DIAERESIS")
       (=ucs		  . #x00C4)	; Ä
@@ -1088,16 +1084,16 @@
     (=jis-x0213-1-2000	. #x293B)	; &I-JX1-293B; [09-27]
     (=jef-china3	. #x88C5)	; &I-JC3-88C5;
     (=ucs@jis/fw	. #x00C4)	; &JX1-293B;
+    (->lowercase
+     ((=jis-x0212	  . #x2B23)	; &JX1-295A; [11-03]
+      (=jis-x0213-1-2000  . #x295A)	; &I-JX1-295A; [09-58]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A WITH RING ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH RING ABOVE")
-      (=ucs		  . #x00E5)	; å
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
@@ -1109,16 +1105,16 @@
     (latin-iso8859-1	. #xC5)	; &I-LATIN1-45;
     (latin-iso8859-4	. #xC5)	; &I-LATIN4-45;
     (latin-iso8859-9	. #xC5)	; &I-LATIN5-45;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH RING ABOVE")
+      (=ucs		  . #x00E5)	; å
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER A WITH RING ABOVE")
       (=ucs		  . #x00C5)	; Å
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B29)	; &JX1-295B; [11-09]
-      (=jis-x0213-1-2000  . #x295B)	; &I-JX1-295B; [09-59]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER A WITH RING ABOVE")
       (=ucs		  . #x00C5)	; Å
@@ -1134,6 +1130,10 @@
     (=jis-x0213-1-2000	. #x293C)	; &I-JX1-293C; [09-28]
     (=jef-china3	. #x88FD)	; &I-JC3-88FD;
     (=ucs@jis/fw	. #x00C5)	; &JX1-293C;
+    (->lowercase
+     ((=jis-x0212	  . #x2B29)	; &JX1-295B; [11-09]
+      (=jis-x0213-1-2000  . #x295B)	; &I-JX1-295B; [09-59]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER AE")
@@ -1141,25 +1141,20 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "ash *")
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER AE")
-      (=ucs		  . #x00E6)	; æ
-      ))
     (=ucs		. #x00C6)	; Æ
     (latin-iso8859-1	. #xC6)	; &I-LATIN1-46;
     (latin-iso8859-4	. #xC6)	; &I-LATIN4-46;
     (latin-iso8859-9	. #xC6)	; &I-LATIN5-46;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER AE")
+      (=ucs		  . #x00E6)	; æ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER AE")
       (=ucs		  . #x00C6)	; Æ
       ))
-    (->lowercase
-     ((=ks-x1001	  . #x2921)	; &JX1-295C; [09-01]
-      (=jis-x0212	  . #x2941)	; &I-JSP-2941; [09-33]
-      (=jis-x0213-1-2000  . #x295C)	; &I-JX1-295C; [09-60]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER AE")
       (=ucs		  . #x00C6)	; Æ
@@ -1169,16 +1164,17 @@
     (=jis-x0213-1-2000	. #x293D)	; &I-JX1-293D; [09-29]
     (=jef-china3	. #x83A5)	; &I-JC3-83A5;
     (=ucs@jis/fw	. #x00C6)	; &JX1-293D;
+    (->lowercase
+     ((=ks-x1001	  . #x2921)	; &JX1-295C; [09-01]
+      (=jis-x0212	  . #x2941)	; &I-JSP-2941; [09-33]
+      (=jis-x0213-1-2000  . #x295C)	; &I-JX1-295C; [09-60]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER C WITH CEDILLA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER C WITH CEDILLA")
-      (=ucs		  . #x00E7)	; ç
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER C")
       (=ucs		  . #x0043)	; C
@@ -1191,16 +1187,16 @@
     (latin-iso8859-2	. #xC7)	; &I-LATIN2-47;
     (latin-iso8859-3	. #xC7)	; &I-LATIN3-47;
     (latin-iso8859-9	. #xC7)	; &I-LATIN5-47;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER C WITH CEDILLA")
+      (=ucs		  . #x00E7)	; ç
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER C WITH CEDILLA")
       (=ucs		  . #x00C7)	; Ç
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B2E)	; &JX1-295D; [11-14]
-      (=jis-x0213-1-2000  . #x295D)	; &I-JX1-295D; [09-61]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER C WITH CEDILLA")
       (=ucs		  . #x00C7)	; Ç
@@ -1216,16 +1212,16 @@
     (=jis-x0213-1-2000	. #x293E)	; &I-JX1-293E; [09-30]
     (=jef-china3	. #x89F5)	; &I-JC3-89F5;
     (=ucs@jis/fw	. #x00C7)	; &JX1-293E;
+    (->lowercase
+     ((=jis-x0212	  . #x2B2E)	; &JX1-295D; [11-14]
+      (=jis-x0213-1-2000  . #x295D)	; &I-JX1-295D; [09-61]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH GRAVE")
-      (=ucs		  . #x00E8)	; è
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -1239,17 +1235,16 @@
     (latin-iso8859-9	. #xC8)	; &I-LATIN5-48;
     (latin-viscii	. #xC8)	; &I-MULE-VIET-U-68;
     (latin-viscii-upper . #xE8)	; &I-MULE-VIET-U-68;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH GRAVE")
+      (=ucs		  . #x00E8)	; è
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER E WITH GRAVE")
       (=ucs		  . #x00C8)	; È
       ))
-    (->lowercase
-     ((=gb2312		  . #x2828)	; &JX1-295E; [08-08]
-      (=jis-x0212	  . #x2B32)	; &I-JSP-2B32; [11-18]
-      (=jis-x0213-1-2000  . #x295E)	; &I-JX1-295E; [09-62]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER E WITH GRAVE")
       (=ucs		  . #x00C8)	; È
@@ -1265,16 +1260,17 @@
     (=jis-x0213-1-2000	. #x293F)	; &I-JX1-293F; [09-31]
     (=jef-china3	. #x85BA)	; &I-JC3-85BA;
     (=ucs@jis/fw	. #x00C8)	; &JX1-293F;
+    (->lowercase
+     ((=gb2312		  . #x2828)	; &JX1-295E; [08-08]
+      (=jis-x0212	  . #x2B32)	; &I-JSP-2B32; [11-18]
+      (=jis-x0213-1-2000  . #x295E)	; &I-JX1-295E; [09-62]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH ACUTE")
-      (=ucs		  . #x00E9)	; é
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -1290,17 +1286,16 @@
     (latin-iso8859-9	. #xC9)	; &I-LATIN5-49;
     (latin-viscii	. #xC9)	; &I-MULE-VIET-U-69;
     (latin-viscii-upper . #xE9)	; &I-MULE-VIET-U-69;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH ACUTE")
+      (=ucs		  . #x00E9)	; é
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER E WITH ACUTE")
       (=ucs		  . #x00C9)	; É
       ))
-    (->lowercase
-     ((=gb2312		  . #x2826)	; &JX1-295F; [08-06]
-      (=jis-x0212	  . #x2B31)	; &I-JSP-2B31; [11-17]
-      (=jis-x0213-1-2000  . #x295F)	; &I-JX1-295F; [09-63]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER E WITH ACUTE")
       (=ucs		  . #x00C9)	; É
@@ -1316,16 +1311,17 @@
     (=jis-x0213-1-2000	. #x2940)	; &I-JX1-2940; [09-32]
     (=jef-china3	. #x85D8)	; &I-JC3-85D8;
     (=ucs@jis/fw	. #x00C9)	; &JX1-2940;
+    (->lowercase
+     ((=gb2312		  . #x2826)	; &JX1-295F; [08-06]
+      (=jis-x0212	  . #x2B31)	; &I-JSP-2B31; [11-17]
+      (=jis-x0213-1-2000  . #x295F)	; &I-JX1-295F; [09-63]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH CIRCUMFLEX")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH CIRCUMFLEX")
-      (=ucs		  . #x00EA)	; ê
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -1340,17 +1336,16 @@
     (latin-tcvn5712	. #xA3)	; &I-VSCII2-23;
     (latin-viscii	. #xCA)	; &I-MULE-VIET-U-6A;
     (latin-viscii-upper . #xEA)	; &I-MULE-VIET-U-6A;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH CIRCUMFLEX")
+      (=ucs		  . #x00EA)	; ê
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX")
       (=ucs		  . #x00CA)	; Ê
       ))
-    (->lowercase
-     ((=gb2312		  . #x283A)	; &JX1-2960; [08-26]
-      (=jis-x0212	  . #x2B34)	; &I-JSP-2B34; [11-20]
-      (=jis-x0213-1-2000  . #x2960)	; &I-JX1-2960; [09-64]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX")
       (=ucs		  . #x00CA)	; Ê
@@ -1366,16 +1361,17 @@
     (=jis-x0213-1-2000	. #x2941)	; &I-JX1-2941; [09-33]
     (=jef-china3	. #x86B9)	; &I-JC3-86B9;
     (=ucs@jis/fw	. #x00CA)	; &JX1-2941;
+    (->lowercase
+     ((=gb2312		  . #x283A)	; &JX1-2960; [08-26]
+      (=jis-x0212	  . #x2B34)	; &I-JSP-2B34; [11-20]
+      (=jis-x0213-1-2000  . #x2960)	; &I-JX1-2960; [09-64]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH DIAERESIS")
-      (=ucs		  . #x00EB)	; ë
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -1389,16 +1385,16 @@
     (latin-iso8859-3	. #xCB)	; &I-LATIN3-4B;
     (latin-iso8859-4	. #xCB)	; &I-LATIN4-4B;
     (latin-iso8859-9	. #xCB)	; &I-LATIN5-4B;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH DIAERESIS")
+      (=ucs		  . #x00EB)	; ë
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER E WITH DIAERESIS")
       (=ucs		  . #x00CB)	; Ë
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B33)	; &JX1-2961; [11-19]
-      (=jis-x0213-1-2000  . #x2961)	; &I-JX1-2961; [09-65]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER E WITH DIAERESIS")
       (=ucs		  . #x00CB)	; Ë
@@ -1414,16 +1410,16 @@
     (=jis-x0213-1-2000	. #x2942)	; &I-JX1-2942; [09-34]
     (=jef-china3	. #x88C7)	; &I-JC3-88C7;
     (=ucs@jis/fw	. #x00CB)	; &JX1-2942;
+    (->lowercase
+     ((=jis-x0212	  . #x2B33)	; &JX1-2961; [11-19]
+      (=jis-x0213-1-2000  . #x2961)	; &I-JX1-2961; [09-65]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I WITH GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER I WITH GRAVE")
-      (=ucs		  . #x00EC)	; ì
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
@@ -1437,17 +1433,16 @@
     (latin-iso8859-9	. #xCC)	; &I-LATIN5-4C;
     (latin-viscii	. #xCC)	; &I-MULE-VIET-U-6C;
     (latin-viscii-upper . #xEC)	; &I-MULE-VIET-U-6C;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER I WITH GRAVE")
+      (=ucs		  . #x00EC)	; ì
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER I WITH GRAVE")
       (=ucs		  . #x00CC)	; Ì
       ))
-    (->lowercase
-     ((=gb2312		  . #x282C)	; &JX1-2962; [08-12]
-      (=jis-x0212	  . #x2B40)	; &I-JSP-2B40; [11-32]
-      (=jis-x0213-1-2000  . #x2962)	; &I-JX1-2962; [09-66]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER I WITH GRAVE")
       (=ucs		  . #x00CC)	; Ì
@@ -1463,16 +1458,17 @@
     (=jis-x0213-1-2000	. #x2943)	; &I-JX1-2943; [09-35]
     (=jef-china3	. #x85BB)	; &I-JC3-85BB;
     (=ucs@jis/fw	. #x00CC)	; &JX1-2943;
+    (->lowercase
+     ((=gb2312		  . #x282C)	; &JX1-2962; [08-12]
+      (=jis-x0212	  . #x2B40)	; &I-JSP-2B40; [11-32]
+      (=jis-x0213-1-2000  . #x2962)	; &I-JX1-2962; [09-66]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I WITH ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER I WITH ACUTE")
-      (=ucs		  . #x00ED)	; í
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
@@ -1488,17 +1484,16 @@
     (latin-iso8859-9	. #xCD)	; &I-LATIN5-4D;
     (latin-viscii	. #xCD)	; &I-MULE-VIET-U-6D;
     (latin-viscii-upper . #xED)	; &I-MULE-VIET-U-6D;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER I WITH ACUTE")
+      (=ucs		  . #x00ED)	; í
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER I WITH ACUTE")
       (=ucs		  . #x00CD)	; Í
       ))
-    (->lowercase
-     ((=gb2312		  . #x282A)	; &JX1-2963; [08-10]
-      (=jis-x0212	  . #x2B3F)	; &I-JSP-2B3F; [11-31]
-      (=jis-x0213-1-2000  . #x2963)	; &I-JX1-2963; [09-67]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER I WITH ACUTE")
       (=ucs		  . #x00CD)	; Í
@@ -1514,16 +1509,17 @@
     (=jis-x0213-1-2000	. #x2944)	; &I-JX1-2944; [09-36]
     (=jef-china3	. #x85DB)	; &I-JC3-85DB;
     (=ucs@jis/fw	. #x00CD)	; &JX1-2944;
+    (->lowercase
+     ((=gb2312		  . #x282A)	; &JX1-2963; [08-10]
+      (=jis-x0212	  . #x2B3F)	; &I-JSP-2B3F; [11-31]
+      (=jis-x0213-1-2000  . #x2963)	; &I-JX1-2963; [09-67]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I WITH CIRCUMFLEX")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER I WITH CIRCUMFLEX")
-      (=ucs		  . #x00EE)	; î
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
@@ -1537,16 +1533,16 @@
     (latin-iso8859-3	. #xCE)	; &I-LATIN3-4E;
     (latin-iso8859-4	. #xCE)	; &I-LATIN4-4E;
     (latin-iso8859-9	. #xCE)	; &I-LATIN5-4E;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER I WITH CIRCUMFLEX")
+      (=ucs		  . #x00EE)	; î
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER I WITH CIRCUMFLEX")
       (=ucs		  . #x00CE)	; Î
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B42)	; &JX1-2964; [11-34]
-      (=jis-x0213-1-2000  . #x2964)	; &I-JX1-2964; [09-68]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER I WITH CIRCUMFLEX")
       (=ucs		  . #x00CE)	; Î
@@ -1562,16 +1558,16 @@
     (=jis-x0213-1-2000	. #x2945)	; &I-JX1-2945; [09-37]
     (=jef-china3	. #x86BC)	; &I-JC3-86BC;
     (=ucs@jis/fw	. #x00CE)	; &JX1-2945;
+    (->lowercase
+     ((=jis-x0212	  . #x2B42)	; &JX1-2964; [11-34]
+      (=jis-x0213-1-2000  . #x2964)	; &I-JX1-2964; [09-68]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER I WITH DIAERESIS")
-      (=ucs		  . #x00EF)	; ï
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
@@ -1583,16 +1579,16 @@
     (latin-iso8859-1	. #xCF)	; &I-LATIN1-4F;
     (latin-iso8859-3	. #xCF)	; &I-LATIN3-4F;
     (latin-iso8859-9	. #xCF)	; &I-LATIN5-4F;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER I WITH DIAERESIS")
+      (=ucs		  . #x00EF)	; ï
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER I WITH DIAERESIS")
       (=ucs		  . #x00CF)	; Ï
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B41)	; &JX1-2965; [11-33]
-      (=jis-x0213-1-2000  . #x2965)	; &I-JX1-2965; [09-69]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER I WITH DIAERESIS")
       (=ucs		  . #x00CF)	; Ï
@@ -1608,6 +1604,10 @@
     (=jis-x0213-1-2000	. #x2946)	; &I-JX1-2946; [09-38]
     (=jef-china3	. #x88C9)	; &I-JC3-88C9;
     (=ucs@jis/fw	. #x00CF)	; &JX1-2946;
+    (->lowercase
+     ((=jis-x0212	  . #x2B41)	; &JX1-2965; [11-33]
+      (=jis-x0213-1-2000  . #x2965)	; &I-JX1-2965; [09-69]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER ETH")
@@ -1615,23 +1615,18 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Icelandic")
+    (=ucs		. #x00D0)	; Ð
+    (latin-iso8859-1	. #xD0)	; &I-LATIN1-50;
     (->lowercase
      ((name		  . "LATIN SMALL LETTER ETH")
       (=ucs		  . #x00F0)	; ð
       ))
-    (=ucs		. #x00D0)	; Ð
-    (latin-iso8859-1	. #xD0)	; &I-LATIN1-50;
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER ETH")
       (=ucs		  . #x00D0)	; Ð
       ))
-    (->lowercase
-     ((=ks-x1001	  . #x2923)	; &JX1-2966; [09-03]
-      (=jis-x0212	  . #x2943)	; &I-JSP-2943; [09-35]
-      (=jis-x0213-1-2000  . #x2966)	; &I-JX1-2966; [09-70]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER ETH")
       (=ucs		  . #x00D0)	; Ð
@@ -1639,16 +1634,17 @@
     (=ks-x1001		. #x2822)	; &JX1-2947; [08-02]
     (=jis-x0213-1-2000	. #x2947)	; &I-JX1-2947; [09-39]
     (=ucs@jis/fw	. #x00D0)	; &JX1-2947;
+    (->lowercase
+     ((=ks-x1001	  . #x2923)	; &JX1-2966; [09-03]
+      (=jis-x0212	  . #x2943)	; &I-JSP-2943; [09-35]
+      (=jis-x0213-1-2000  . #x2966)	; &I-JX1-2966; [09-70]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER N WITH TILDE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER N WITH TILDE")
-      (=ucs		  . #x00F1)	; ñ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER N")
       (=ucs		  . #x004E)	; N
@@ -1660,16 +1656,16 @@
     (latin-iso8859-1	. #xD1)	; &I-LATIN1-51;
     (latin-iso8859-3	. #xD1)	; &I-LATIN3-51;
     (latin-iso8859-9	. #xD1)	; &I-LATIN5-51;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER N WITH TILDE")
+      (=ucs		  . #x00F1)	; ñ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER N WITH TILDE")
       (=ucs		  . #x00D1)	; Ñ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B50)	; &JX1-2967; [11-48]
-      (=jis-x0213-1-2000  . #x2967)	; &I-JX1-2967; [09-71]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER N WITH TILDE")
       (=ucs		  . #x00D1)	; Ñ
@@ -1685,16 +1681,16 @@
     (=jis-x0213-1-2000	. #x2948)	; &I-JX1-2948; [09-40]
     (=jef-china3	. #x86E6)	; &I-JC3-86E6;
     (=ucs@jis/fw	. #x00D1)	; &JX1-2948;
+    (->lowercase
+     ((=jis-x0212	  . #x2B50)	; &JX1-2967; [11-48]
+      (=jis-x0213-1-2000  . #x2967)	; &I-JX1-2967; [09-71]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH GRAVE")
-      (=ucs		  . #x00F2)	; ò
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
@@ -1708,17 +1704,16 @@
     (latin-iso8859-9	. #xD2)	; &I-LATIN5-52;
     (latin-viscii	. #xD2)	; &I-MULE-VIET-U-72;
     (latin-viscii-upper . #xF2)	; &I-MULE-VIET-U-72;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH GRAVE")
+      (=ucs		  . #x00F2)	; ò
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER O WITH GRAVE")
       (=ucs		  . #x00D2)	; Ò
       ))
-    (->lowercase
-     ((=gb2312		  . #x2830)	; &JX1-2968; [08-16]
-      (=jis-x0212	  . #x2B52)	; &I-JSP-2B52; [11-50]
-      (=jis-x0213-1-2000  . #x2968)	; &I-JX1-2968; [09-72]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER O WITH GRAVE")
       (=ucs		  . #x00D2)	; Ò
@@ -1734,16 +1729,17 @@
     (=jis-x0213-1-2000	. #x2949)	; &I-JX1-2949; [09-41]
     (=jef-china3	. #x85BD)	; &I-JC3-85BD;
     (=ucs@jis/fw	. #x00D2)	; &JX1-2949;
+    (->lowercase
+     ((=gb2312		  . #x2830)	; &JX1-2968; [08-16]
+      (=jis-x0212	  . #x2B52)	; &I-JSP-2B52; [11-50]
+      (=jis-x0213-1-2000  . #x2968)	; &I-JX1-2968; [09-72]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH ACUTE")
-      (=ucs		  . #x00F3)	; ó
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
@@ -1758,17 +1754,16 @@
     (latin-iso8859-9	. #xD3)	; &I-LATIN5-53;
     (latin-viscii	. #xD3)	; &I-MULE-VIET-U-73;
     (latin-viscii-upper . #xF3)	; &I-MULE-VIET-U-73;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH ACUTE")
+      (=ucs		  . #x00F3)	; ó
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER O WITH ACUTE")
       (=ucs		  . #x00D3)	; Ó
       ))
-    (->lowercase
-     ((=gb2312		  . #x282E)	; &JX1-2969; [08-14]
-      (=jis-x0212	  . #x2B51)	; &I-JSP-2B51; [11-49]
-      (=jis-x0213-1-2000  . #x2969)	; &I-JX1-2969; [09-73]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER O WITH ACUTE")
       (=ucs		  . #x00D3)	; Ó
@@ -1784,16 +1779,17 @@
     (=jis-x0213-1-2000	. #x294A)	; &I-JX1-294A; [09-42]
     (=jef-china3	. #x85E0)	; &I-JC3-85E0;
     (=ucs@jis/fw	. #x00D3)	; &JX1-294A;
+    (->lowercase
+     ((=gb2312		  . #x282E)	; &JX1-2969; [08-14]
+      (=jis-x0212	  . #x2B51)	; &I-JSP-2B51; [11-49]
+      (=jis-x0213-1-2000  . #x2969)	; &I-JX1-2969; [09-73]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH CIRCUMFLEX")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH CIRCUMFLEX")
-      (=ucs		  . #x00F4)	; ô
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
@@ -1810,16 +1806,16 @@
     (latin-tcvn5712	. #xA4)	; &I-VSCII2-24;
     (latin-viscii	. #xD4)	; &I-MULE-VIET-U-74;
     (latin-viscii-upper . #xF4)	; &I-MULE-VIET-U-74;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH CIRCUMFLEX")
+      (=ucs		  . #x00F4)	; ô
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX")
       (=ucs		  . #x00D4)	; Ô
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B54)	; &JX1-296A; [11-52]
-      (=jis-x0213-1-2000  . #x296A)	; &I-JX1-296A; [09-74]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX")
       (=ucs		  . #x00D4)	; Ô
@@ -1835,16 +1831,16 @@
     (=jis-x0213-1-2000	. #x294B)	; &I-JX1-294B; [09-43]
     (=jef-china3	. #x86BF)	; &I-JC3-86BF;
     (=ucs@jis/fw	. #x00D4)	; &JX1-294B;
+    (->lowercase
+     ((=jis-x0212	  . #x2B54)	; &JX1-296A; [11-52]
+      (=jis-x0213-1-2000  . #x296A)	; &I-JX1-296A; [09-74]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH TILDE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH TILDE")
-      (=ucs		  . #x00F5)	; õ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
@@ -1858,16 +1854,16 @@
     (latin-iso8859-9	. #xD5)	; &I-LATIN5-55;
     (latin-viscii	. #xA0)	; &I-MULE-VIET-U-75;
     (latin-viscii-upper . #xF5)	; &I-MULE-VIET-U-75;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH TILDE")
+      (=ucs		  . #x00F5)	; õ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER O WITH TILDE")
       (=ucs		  . #x00D5)	; Õ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B58)	; &JX1-296B; [11-56]
-      (=jis-x0213-1-2000  . #x296B)	; &I-JX1-296B; [09-75]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER O WITH TILDE")
       (=ucs		  . #x00D5)	; Õ
@@ -1883,16 +1879,16 @@
     (=jis-x0213-1-2000	. #x294C)	; &I-JX1-294C; [09-44]
     (=jef-china3	. #x86E7)	; &I-JC3-86E7;
     (=ucs@jis/fw	. #x00D5)	; &JX1-294C;
+    (->lowercase
+     ((=jis-x0212	  . #x2B58)	; &JX1-296B; [11-56]
+      (=jis-x0213-1-2000  . #x296B)	; &I-JX1-296B; [09-75]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH DIAERESIS")
-      (=ucs		  . #x00F6)	; ö
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
@@ -1906,16 +1902,16 @@
     (latin-iso8859-3	. #xD6)	; &I-LATIN3-56;
     (latin-iso8859-4	. #xD6)	; &I-LATIN4-56;
     (latin-iso8859-9	. #xD6)	; &I-LATIN5-56;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH DIAERESIS")
+      (=ucs		  . #x00F6)	; ö
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER O WITH DIAERESIS")
       (=ucs		  . #x00D6)	; Ö
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B53)	; &JX1-296C; [11-51]
-      (=jis-x0213-1-2000  . #x296C)	; &I-JX1-296C; [09-76]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER O WITH DIAERESIS")
       (=ucs		  . #x00D6)	; Ö
@@ -1931,6 +1927,10 @@
     (=jis-x0213-1-2000	. #x294D)	; &I-JX1-294D; [09-45]
     (=jef-china3	. #x88CB)	; &I-JC3-88CB;
     (=ucs@jis/fw	. #x00D6)	; &JX1-294D;
+    (->lowercase
+     ((=jis-x0212	  . #x2B53)	; &JX1-296C; [11-51]
+      (=jis-x0213-1-2000  . #x296C)	; &I-JX1-296C; [09-76]
+      ))
     ))
 (define-char
   '((name		. "MULTIPLICATION SIGN")
@@ -1967,25 +1967,20 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH STROKE")
-      (=ucs		  . #x00F8)	; ø
-      ))
     (=ucs		. #x00D8)	; Ø
     (latin-iso8859-1	. #xD8)	; &I-LATIN1-58;
     (latin-iso8859-4	. #xD8)	; &I-LATIN4-58;
     (latin-iso8859-9	. #xD8)	; &I-LATIN5-58;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH STROKE")
+      (=ucs		  . #x00F8)	; ø
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER O WITH STROKE")
       (=ucs		  . #x00D8)	; Ø
       ))
-    (->lowercase
-     ((=ks-x1001	  . #x292A)	; &JX1-296D; [09-10]
-      (=jis-x0212	  . #x294C)	; &I-JSP-294C; [09-44]
-      (=jis-x0213-1-2000  . #x296D)	; &I-JX1-296D; [09-77]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER O WITH STROKE")
       (=ucs		  . #x00D8)	; Ø
@@ -1995,16 +1990,17 @@
     (=jis-x0213-1-2000	. #x294E)	; &I-JX1-294E; [09-46]
     (=jef-china3	. #x83A2)	; &I-JC3-83A2;
     (=ucs@jis/fw	. #x00D8)	; &JX1-294E;
+    (->lowercase
+     ((=ks-x1001	  . #x292A)	; &JX1-296D; [09-10]
+      (=jis-x0212	  . #x294C)	; &I-JSP-294C; [09-44]
+      (=jis-x0213-1-2000  . #x296D)	; &I-JX1-296D; [09-77]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH GRAVE")
-      (=ucs		  . #x00F9)	; ù
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -2018,17 +2014,16 @@
     (latin-iso8859-9	. #xD9)	; &I-LATIN5-59;
     (latin-viscii	. #xD9)	; &I-MULE-VIET-U-79;
     (latin-viscii-upper . #xF9)	; &I-MULE-VIET-U-79;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH GRAVE")
+      (=ucs		  . #x00F9)	; ù
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER U WITH GRAVE")
       (=ucs		  . #x00D9)	; Ù
       ))
-    (->lowercase
-     ((=gb2312		  . #x2834)	; &JX1-296E; [08-20]
-      (=jis-x0212	  . #x2B63)	; &I-JSP-2B63; [11-67]
-      (=jis-x0213-1-2000  . #x296E)	; &I-JX1-296E; [09-78]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER U WITH GRAVE")
       (=ucs		  . #x00D9)	; Ù
@@ -2044,16 +2039,17 @@
     (=jis-x0213-1-2000	. #x294F)	; &I-JX1-294F; [09-47]
     (=jef-china3	. #x85BF)	; &I-JC3-85BF;
     (=ucs@jis/fw	. #x00D9)	; &JX1-294F;
+    (->lowercase
+     ((=gb2312		  . #x2834)	; &JX1-296E; [08-20]
+      (=jis-x0212	  . #x2B63)	; &I-JSP-2B63; [11-67]
+      (=jis-x0213-1-2000  . #x296E)	; &I-JX1-296E; [09-78]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH ACUTE")
-      (=ucs		  . #x00FA)	; ú
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -2069,17 +2065,16 @@
     (latin-iso8859-9	. #xDA)	; &I-LATIN5-5A;
     (latin-viscii	. #xDA)	; &I-MULE-VIET-U-7A;
     (latin-viscii-upper . #xFA)	; &I-MULE-VIET-U-7A;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH ACUTE")
+      (=ucs		  . #x00FA)	; ú
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER U WITH ACUTE")
       (=ucs		  . #x00DA)	; Ú
       ))
-    (->lowercase
-     ((=gb2312		  . #x2832)	; &JX1-296F; [08-18]
-      (=jis-x0212	  . #x2B62)	; &I-JSP-2B62; [11-66]
-      (=jis-x0213-1-2000  . #x296F)	; &I-JX1-296F; [09-79]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER U WITH ACUTE")
       (=ucs		  . #x00DA)	; Ú
@@ -2095,16 +2090,17 @@
     (=jis-x0213-1-2000	. #x2950)	; &I-JX1-2950; [09-48]
     (=jef-china3	. #x85E6)	; &I-JC3-85E6;
     (=ucs@jis/fw	. #x00DA)	; &JX1-2950;
+    (->lowercase
+     ((=gb2312		  . #x2832)	; &JX1-296F; [08-18]
+      (=jis-x0212	  . #x2B62)	; &I-JSP-2B62; [11-66]
+      (=jis-x0213-1-2000  . #x296F)	; &I-JX1-296F; [09-79]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH CIRCUMFLEX")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH CIRCUMFLEX")
-      (=ucs		  . #x00FB)	; û
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -2117,16 +2113,16 @@
     (latin-iso8859-3	. #xDB)	; &I-LATIN3-5B;
     (latin-iso8859-4	. #xDB)	; &I-LATIN4-5B;
     (latin-iso8859-9	. #xDB)	; &I-LATIN5-5B;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH CIRCUMFLEX")
+      (=ucs		  . #x00FB)	; û
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER U WITH CIRCUMFLEX")
       (=ucs		  . #x00DB)	; Û
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B65)	; &JX1-2970; [11-69]
-      (=jis-x0213-1-2000  . #x2970)	; &I-JX1-2970; [09-80]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER U WITH CIRCUMFLEX")
       (=ucs		  . #x00DB)	; Û
@@ -2142,16 +2138,16 @@
     (=jis-x0213-1-2000	. #x2951)	; &I-JX1-2951; [09-49]
     (=jef-china3	. #x86C1)	; &I-JC3-86C1;
     (=ucs@jis/fw	. #x00DB)	; &JX1-2951;
+    (->lowercase
+     ((=jis-x0212	  . #x2B65)	; &JX1-2970; [11-69]
+      (=jis-x0213-1-2000  . #x2970)	; &I-JX1-2970; [09-80]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH DIAERESIS")
-      (=ucs		  . #x00FC)	; ü
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -2165,17 +2161,16 @@
     (latin-iso8859-3	. #xDC)	; &I-LATIN3-5C;
     (latin-iso8859-4	. #xDC)	; &I-LATIN4-5C;
     (latin-iso8859-9	. #xDC)	; &I-LATIN5-5C;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH DIAERESIS")
+      (=ucs		  . #x00FC)	; ü
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER U WITH DIAERESIS")
       (=ucs		  . #x00DC)	; Ü
       ))
-    (->lowercase
-     ((=gb2312		  . #x2839)	; &JX1-2971; [08-25]
-      (=jis-x0212	  . #x2B64)	; &I-JSP-2B64; [11-68]
-      (=jis-x0213-1-2000  . #x2971)	; &I-JX1-2971; [09-81]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER U WITH DIAERESIS")
       (=ucs		  . #x00DC)	; Ü
@@ -2191,16 +2186,17 @@
     (=jis-x0213-1-2000	. #x2952)	; &I-JX1-2952; [09-50]
     (=jef-china3	. #x88CE)	; &I-JC3-88CE;
     (=ucs@jis/fw	. #x00DC)	; &JX1-2952;
+    (->lowercase
+     ((=gb2312		  . #x2839)	; &JX1-2971; [08-25]
+      (=jis-x0212	  . #x2B64)	; &I-JSP-2B64; [11-68]
+      (=jis-x0213-1-2000  . #x2971)	; &I-JX1-2971; [09-81]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Y WITH ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER Y WITH ACUTE")
-      (=ucs		  . #x00FD)	; ý
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER Y")
       (=ucs		  . #x0059)	; Y
@@ -2213,16 +2209,16 @@
     (latin-iso8859-2	. #xDD)	; &I-LATIN2-5D;
     (latin-viscii	. #xDD)	; &I-MULE-VIET-U-7D;
     (latin-viscii-upper . #xFD)	; &I-MULE-VIET-U-7D;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER Y WITH ACUTE")
+      (=ucs		  . #x00FD)	; ý
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER Y WITH ACUTE")
       (=ucs		  . #x00DD)	; Ý
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B72)	; &JX1-2972; [11-82]
-      (=jis-x0213-1-2000  . #x2972)	; &I-JX1-2972; [09-82]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER Y WITH ACUTE")
       (=ucs		  . #x00DD)	; Ý
@@ -2238,6 +2234,10 @@
     (=jis-x0213-1-2000	. #x2953)	; &I-JX1-2953; [09-51]
     (=jef-china3	. #x85E9)	; &I-JC3-85E9;
     (=ucs@jis/fw	. #x00DD)	; &JX1-2953;
+    (->lowercase
+     ((=jis-x0212	  . #x2B72)	; &JX1-2972; [11-82]
+      (=jis-x0213-1-2000  . #x2972)	; &I-JX1-2972; [09-82]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER THORN")
@@ -2245,23 +2245,18 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Icelandic")
+    (=ucs		. #x00DE)	; Þ
+    (latin-iso8859-1	. #xDE)	; &I-LATIN1-5E;
     (->lowercase
      ((name		  . "LATIN SMALL LETTER THORN")
       (=ucs		  . #x00FE)	; þ
       ))
-    (=ucs		. #x00DE)	; Þ
-    (latin-iso8859-1	. #xDE)	; &I-LATIN1-5E;
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER THORN")
       (=ucs		  . #x00DE)	; Þ
       ))
-    (->lowercase
-     ((=ks-x1001	  . #x292D)	; &JX1-2973; [09-13]
-      (=jis-x0212	  . #x2950)	; &I-JSP-2950; [09-48]
-      (=jis-x0213-1-2000  . #x2973)	; &I-JX1-2973; [09-83]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER THORN")
       (=ucs		  . #x00DE)	; Þ
@@ -2271,6 +2266,11 @@
     (=jis-x0213-1-2000	. #x2954)	; &I-JX1-2954; [09-52]
     (=jef-china3	. #x83A4)	; &I-JC3-83A4;
     (=ucs@jis/fw	. #x00DE)	; &JX1-2954;
+    (->lowercase
+     ((=ks-x1001	  . #x292D)	; &JX1-2973; [09-13]
+      (=jis-x0212	  . #x2950)	; &I-JSP-2950; [09-48]
+      (=jis-x0213-1-2000  . #x2973)	; &I-JX1-2973; [09-83]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER SHARP S")
@@ -2305,10 +2305,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER A WITH GRAVE")
-      (=ucs		  . #x00C0)	; À
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
@@ -2323,16 +2319,16 @@
     (latin-tcvn5712	. #xB5)	; &I-VSCII2-35;
     (latin-viscii	. #xE0)	; &I-MULE-VIET-L-60;
     (latin-viscii-lower . #xE0)	; &I-MULE-VIET-L-60;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER A WITH GRAVE")
+      (=ucs		  . #x00C0)	; À
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER A WITH GRAVE")
       (=ucs		  . #x00E0)	; à
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A22)	; &JX1-2937; [10-02]
-      (=jis-x0213-1-2000  . #x2937)	; &I-JX1-2937; [09-23]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER A WITH GRAVE")
       (=ucs		  . #x00E0)	; à
@@ -2350,16 +2346,16 @@
     (=jef-china3	. #x85C1)	; &I-JC3-85C1;
     (=ucs@gb/fw		. #x00E0)	; &JX1-2956;
     (=ucs@jis/fw	. #x00E0)	; &JX1-2956;
+    (->uppercase
+     ((=jis-x0212	  . #x2A22)	; &JX1-2937; [10-02]
+      (=jis-x0213-1-2000  . #x2937)	; &I-JX1-2937; [09-23]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER A WITH ACUTE")
-      (=ucs		  . #x00C1)	; Á
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
@@ -2376,16 +2372,16 @@
     (latin-tcvn5712	. #xB8)	; &I-VSCII2-38;
     (latin-viscii	. #xE1)	; &I-MULE-VIET-L-61;
     (latin-viscii-lower . #xE1)	; &I-MULE-VIET-L-61;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER A WITH ACUTE")
+      (=ucs		  . #x00C1)	; Á
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER A WITH ACUTE")
       (=ucs		  . #x00E1)	; á
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A21)	; &JX1-2938; [10-01]
-      (=jis-x0213-1-2000  . #x2938)	; &I-JX1-2938; [09-24]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER A WITH ACUTE")
       (=ucs		  . #x00E1)	; á
@@ -2403,16 +2399,16 @@
     (=jef-china3	. #x85EB)	; &I-JC3-85EB;
     (=ucs@gb/fw		. #x00E1)	; &JX1-2957;
     (=ucs@jis/fw	. #x00E1)	; &JX1-2957;
+    (->uppercase
+     ((=jis-x0212	  . #x2A21)	; &JX1-2938; [10-01]
+      (=jis-x0213-1-2000  . #x2938)	; &I-JX1-2938; [09-24]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH CIRCUMFLEX")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX")
-      (=ucs		  . #x00C2)	; Â
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
@@ -2429,16 +2425,16 @@
     (latin-tcvn5712	. #xA9)	; &I-VSCII2-29;
     (latin-viscii	. #xE2)	; &I-MULE-VIET-L-62;
     (latin-viscii-lower . #xE2)	; &I-MULE-VIET-L-62;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX")
+      (=ucs		  . #x00C2)	; Â
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER A WITH CIRCUMFLEX")
       (=ucs		  . #x00E2)	; â
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A24)	; &JX1-2939; [10-04]
-      (=jis-x0213-1-2000  . #x2939)	; &I-JX1-2939; [09-25]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER A WITH CIRCUMFLEX")
       (=ucs		  . #x00E2)	; â
@@ -2454,16 +2450,16 @@
     (=jis-x0213-1-2000	. #x2958)	; &I-JX1-2958; [09-56]
     (=jef-china3	. #x86C4)	; &I-JC3-86C4;
     (=ucs@jis/fw	. #x00E2)	; &JX1-2958;
+    (->uppercase
+     ((=jis-x0212	  . #x2A24)	; &JX1-2939; [10-04]
+      (=jis-x0213-1-2000  . #x2939)	; &I-JX1-2939; [09-25]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH TILDE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER A WITH TILDE")
-      (=ucs		  . #x00C3)	; Ã
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
@@ -2478,16 +2474,16 @@
     (latin-tcvn5712	. #xB7)	; &I-VSCII2-37;
     (latin-viscii	. #xE3)	; &I-MULE-VIET-L-63;
     (latin-viscii-lower . #xE3)	; &I-MULE-VIET-L-63;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER A WITH TILDE")
+      (=ucs		  . #x00C3)	; Ã
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER A WITH TILDE")
       (=ucs		  . #x00E3)	; ã
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A2A)	; &JX1-293A; [10-10]
-      (=jis-x0213-1-2000  . #x293A)	; &I-JX1-293A; [09-26]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER A WITH TILDE")
       (=ucs		  . #x00E3)	; ã
@@ -2503,16 +2499,16 @@
     (=jis-x0213-1-2000	. #x2959)	; &I-JX1-2959; [09-57]
     (=jef-china3	. #x86EF)	; &I-JC3-86EF;
     (=ucs@jis/fw	. #x00E3)	; &JX1-2959;
+    (->uppercase
+     ((=jis-x0212	  . #x2A2A)	; &JX1-293A; [10-10]
+      (=jis-x0213-1-2000  . #x293A)	; &I-JX1-293A; [09-26]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER A WITH DIAERESIS")
-      (=ucs		  . #x00C4)	; Ä
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
@@ -2526,16 +2522,16 @@
     (latin-iso8859-3	. #xE4)	; &I-LATIN3-64;
     (latin-iso8859-4	. #xE4)	; &I-LATIN4-64;
     (latin-iso8859-9	. #xE4)	; &I-LATIN5-64;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER A WITH DIAERESIS")
+      (=ucs		  . #x00C4)	; Ä
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER A WITH DIAERESIS")
       (=ucs		  . #x00E4)	; ä
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A23)	; &JX1-293B; [10-03]
-      (=jis-x0213-1-2000  . #x293B)	; &I-JX1-293B; [09-27]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER A WITH DIAERESIS")
       (=ucs		  . #x00E4)	; ä
@@ -2551,16 +2547,16 @@
     (=jis-x0213-1-2000	. #x295A)	; &I-JX1-295A; [09-58]
     (=jef-china3	. #x88D2)	; &I-JC3-88D2;
     (=ucs@jis/fw	. #x00E4)	; &JX1-295A;
+    (->uppercase
+     ((=jis-x0212	  . #x2A23)	; &JX1-293B; [10-03]
+      (=jis-x0213-1-2000  . #x293B)	; &I-JX1-293B; [09-27]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH RING ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER A WITH RING ABOVE")
-      (=ucs		  . #x00C5)	; Å
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
@@ -2572,16 +2568,16 @@
     (latin-iso8859-1	. #xE5)	; &I-LATIN1-65;
     (latin-iso8859-4	. #xE5)	; &I-LATIN4-65;
     (latin-iso8859-9	. #xE5)	; &I-LATIN5-65;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER A WITH RING ABOVE")
+      (=ucs		  . #x00C5)	; Å
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER A WITH RING ABOVE")
       (=ucs		  . #x00E5)	; å
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A29)	; &JX1-293C; [10-09]
-      (=jis-x0213-1-2000  . #x293C)	; &I-JX1-293C; [09-28]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER A WITH RING ABOVE")
       (=ucs		  . #x00E5)	; å
@@ -2597,6 +2593,10 @@
     (=jis-x0213-1-2000	. #x295B)	; &I-JX1-295B; [09-59]
     (=jef-china3	. #x89A7)	; &I-JC3-89A7;
     (=ucs@jis/fw	. #x00E5)	; &JX1-295B;
+    (->uppercase
+     ((=jis-x0212	  . #x2A29)	; &JX1-293C; [10-09]
+      (=jis-x0213-1-2000  . #x293C)	; &I-JX1-293C; [09-28]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER AE")
@@ -2604,26 +2604,21 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "ash *")
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER AE")
-      (=ucs		  . #x00C6)	; Æ
-      ))
     (=ucs		. #x00E6)	; æ
     (latin-iso8859-1	. #xE6)	; &I-LATIN1-66;
     (latin-iso8859-4	. #xE6)	; &I-LATIN4-66;
     (latin-iso8859-9	. #xE6)	; &I-LATIN5-66;
     (ipa		. #xA4)	; &I-MULE-IPA-24;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER AE")
+      (=ucs		  . #x00C6)	; Æ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER AE")
       (=ucs		  . #x00E6)	; æ
       ))
-    (->uppercase
-     ((=ks-x1001	  . #x2821)	; &JX1-293D; [08-01]
-      (=jis-x0212	  . #x2921)	; &I-JSP-2921; [09-01]
-      (=jis-x0213-1-2000  . #x293D)	; &I-JX1-293D; [09-29]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER AE")
       (=ucs		  . #x00E6)	; æ
@@ -2633,16 +2628,17 @@
     (=jis-x0213-1-2000	. #x295C)	; &I-JX1-295C; [09-60]
     (=jef-china3	. #x83B0)	; &I-JC3-83B0;
     (=ucs@jis/fw	. #x00E6)	; &JX1-295C;
+    (->uppercase
+     ((=ks-x1001	  . #x2821)	; &JX1-293D; [08-01]
+      (=jis-x0212	  . #x2921)	; &I-JSP-2921; [09-01]
+      (=jis-x0213-1-2000  . #x293D)	; &I-JX1-293D; [09-29]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER C WITH CEDILLA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER C WITH CEDILLA")
-      (=ucs		  . #x00C7)	; Ç
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER C")
       (=ucs		  . #x0063)	; c
@@ -2656,16 +2652,16 @@
     (latin-iso8859-3	. #xE7)	; &I-LATIN3-67;
     (latin-iso8859-9	. #xE7)	; &I-LATIN5-67;
     (ipa		. #xCE)	; &I-MULE-IPA-4E;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER C WITH CEDILLA")
+      (=ucs		  . #x00C7)	; Ç
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER C WITH CEDILLA")
       (=ucs		  . #x00E7)	; ç
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A2E)	; &JX1-293E; [10-14]
-      (=jis-x0213-1-2000  . #x293E)	; &I-JX1-293E; [09-30]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER C WITH CEDILLA")
       (=ucs		  . #x00E7)	; ç
@@ -2681,16 +2677,16 @@
     (=jis-x0213-1-2000	. #x295D)	; &I-JX1-295D; [09-61]
     (=jef-china3	. #x89FB)	; &I-JC3-89FB;
     (=ucs@jis/fw	. #x00E7)	; &JX1-295D;
+    (->uppercase
+     ((=jis-x0212	  . #x2A2E)	; &JX1-293E; [10-14]
+      (=jis-x0213-1-2000  . #x293E)	; &I-JX1-293E; [09-30]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER E WITH GRAVE")
-      (=ucs		  . #x00C8)	; È
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -2705,16 +2701,16 @@
     (latin-tcvn5712	. #xCC)	; &I-VSCII2-4C;
     (latin-viscii	. #xE8)	; &I-MULE-VIET-L-68;
     (latin-viscii-lower . #xE8)	; &I-MULE-VIET-L-68;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER E WITH GRAVE")
+      (=ucs		  . #x00C8)	; È
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER E WITH GRAVE")
       (=ucs		  . #x00E8)	; è
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A32)	; &JX1-293F; [10-18]
-      (=jis-x0213-1-2000  . #x293F)	; &I-JX1-293F; [09-31]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER E WITH GRAVE")
       (=ucs		  . #x00E8)	; è
@@ -2732,16 +2728,16 @@
     (=jef-china3	. #x85C2)	; &I-JC3-85C2;
     (=ucs@gb/fw		. #x00E8)	; &JX1-295E;
     (=ucs@jis/fw	. #x00E8)	; &JX1-295E;
+    (->uppercase
+     ((=jis-x0212	  . #x2A32)	; &JX1-293F; [10-18]
+      (=jis-x0213-1-2000  . #x293F)	; &I-JX1-293F; [09-31]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER E WITH ACUTE")
-      (=ucs		  . #x00C9)	; É
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -2758,16 +2754,16 @@
     (latin-tcvn5712	. #xD0)	; &I-VSCII2-50;
     (latin-viscii	. #xE9)	; &I-MULE-VIET-L-69;
     (latin-viscii-lower . #xE9)	; &I-MULE-VIET-L-69;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER E WITH ACUTE")
+      (=ucs		  . #x00C9)	; É
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER E WITH ACUTE")
       (=ucs		  . #x00E9)	; é
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A31)	; &JX1-2940; [10-17]
-      (=jis-x0213-1-2000  . #x2940)	; &I-JX1-2940; [09-32]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER E WITH ACUTE")
       (=ucs		  . #x00E9)	; é
@@ -2785,16 +2781,16 @@
     (=jef-china3	. #x85EE)	; &I-JC3-85EE;
     (=ucs@gb/fw		. #x00E9)	; &JX1-295F;
     (=ucs@jis/fw	. #x00E9)	; &JX1-295F;
+    (->uppercase
+     ((=jis-x0212	  . #x2A31)	; &JX1-2940; [10-17]
+      (=jis-x0213-1-2000  . #x2940)	; &I-JX1-2940; [09-32]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH CIRCUMFLEX")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX")
-      (=ucs		  . #x00CA)	; Ê
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -2809,16 +2805,16 @@
     (latin-tcvn5712	. #xAA)	; &I-VSCII2-2A;
     (latin-viscii	. #xEA)	; &I-MULE-VIET-L-6A;
     (latin-viscii-lower . #xEA)	; &I-MULE-VIET-L-6A;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX")
+      (=ucs		  . #x00CA)	; Ê
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER E WITH CIRCUMFLEX")
       (=ucs		  . #x00EA)	; ê
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A34)	; &JX1-2941; [10-20]
-      (=jis-x0213-1-2000  . #x2941)	; &I-JX1-2941; [09-33]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER E WITH CIRCUMFLEX")
       (=ucs		  . #x00EA)	; ê
@@ -2836,16 +2832,16 @@
     (=jef-china3	. #x86C6)	; &I-JC3-86C6;
     (=ucs@gb/fw		. #x00EA)	; &JX1-2960;
     (=ucs@jis/fw	. #x00EA)	; &JX1-2960;
+    (->uppercase
+     ((=jis-x0212	  . #x2A34)	; &JX1-2941; [10-20]
+      (=jis-x0213-1-2000  . #x2941)	; &I-JX1-2941; [09-33]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER E WITH DIAERESIS")
-      (=ucs		  . #x00CB)	; Ë
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -2859,16 +2855,16 @@
     (latin-iso8859-3	. #xEB)	; &I-LATIN3-6B;
     (latin-iso8859-4	. #xEB)	; &I-LATIN4-6B;
     (latin-iso8859-9	. #xEB)	; &I-LATIN5-6B;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER E WITH DIAERESIS")
+      (=ucs		  . #x00CB)	; Ë
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER E WITH DIAERESIS")
       (=ucs		  . #x00EB)	; ë
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A33)	; &JX1-2942; [10-19]
-      (=jis-x0213-1-2000  . #x2942)	; &I-JX1-2942; [09-34]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER E WITH DIAERESIS")
       (=ucs		  . #x00EB)	; ë
@@ -2884,16 +2880,16 @@
     (=jis-x0213-1-2000	. #x2961)	; &I-JX1-2961; [09-65]
     (=jef-china3	. #x88D4)	; &I-JC3-88D4;
     (=ucs@jis/fw	. #x00EB)	; &JX1-2961;
+    (->uppercase
+     ((=jis-x0212	  . #x2A33)	; &JX1-2942; [10-19]
+      (=jis-x0213-1-2000  . #x2942)	; &I-JX1-2942; [09-34]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER I WITH GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER I WITH GRAVE")
-      (=ucs		  . #x00CC)	; Ì
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER I")
       (=ucs		  . #x0069)	; i
@@ -2908,16 +2904,16 @@
     (latin-tcvn5712	. #xD7)	; &I-VSCII2-57;
     (latin-viscii	. #xEC)	; &I-MULE-VIET-L-6C;
     (latin-viscii-lower . #xEC)	; &I-MULE-VIET-L-6C;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER I WITH GRAVE")
+      (=ucs		  . #x00CC)	; Ì
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER I WITH GRAVE")
       (=ucs		  . #x00EC)	; ì
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A40)	; &JX1-2943; [10-32]
-      (=jis-x0213-1-2000  . #x2943)	; &I-JX1-2943; [09-35]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER I WITH GRAVE")
       (=ucs		  . #x00EC)	; ì
@@ -2934,16 +2930,16 @@
     (=jis-x0213-1-2000	. #x2962)	; &I-JX1-2962; [09-66]
     (=ucs@gb/fw		. #x00EC)	; &JX1-2962;
     (=ucs@jis/fw	. #x00EC)	; &JX1-2962;
+    (->uppercase
+     ((=jis-x0212	  . #x2A40)	; &JX1-2943; [10-32]
+      (=jis-x0213-1-2000  . #x2943)	; &I-JX1-2943; [09-35]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER I WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER I WITH ACUTE")
-      (=ucs		  . #x00CD)	; Í
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER I")
       (=ucs		  . #x0069)	; i
@@ -2960,16 +2956,16 @@
     (latin-tcvn5712	. #xDD)	; &I-VSCII2-5D;
     (latin-viscii	. #xED)	; &I-MULE-VIET-L-6D;
     (latin-viscii-lower . #xED)	; &I-MULE-VIET-L-6D;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER I WITH ACUTE")
+      (=ucs		  . #x00CD)	; Í
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER I WITH ACUTE")
       (=ucs		  . #x00ED)	; í
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A3F)	; &JX1-2944; [10-31]
-      (=jis-x0213-1-2000  . #x2944)	; &I-JX1-2944; [09-36]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER I WITH ACUTE")
       (=ucs		  . #x00ED)	; í
@@ -2986,16 +2982,16 @@
     (=jis-x0213-1-2000	. #x2963)	; &I-JX1-2963; [09-67]
     (=ucs@gb/fw		. #x00ED)	; &JX1-2963;
     (=ucs@jis/fw	. #x00ED)	; &JX1-2963;
+    (->uppercase
+     ((=jis-x0212	  . #x2A3F)	; &JX1-2944; [10-31]
+      (=jis-x0213-1-2000  . #x2944)	; &I-JX1-2944; [09-36]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER I WITH CIRCUMFLEX")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER I WITH CIRCUMFLEX")
-      (=ucs		  . #x00CE)	; Î
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER I")
       (=ucs		  . #x0069)	; i
@@ -3009,16 +3005,16 @@
     (latin-iso8859-3	. #xEE)	; &I-LATIN3-6E;
     (latin-iso8859-4	. #xEE)	; &I-LATIN4-6E;
     (latin-iso8859-9	. #xEE)	; &I-LATIN5-6E;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER I WITH CIRCUMFLEX")
+      (=ucs		  . #x00CE)	; Î
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER I WITH CIRCUMFLEX")
       (=ucs		  . #x00EE)	; î
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A42)	; &JX1-2945; [10-34]
-      (=jis-x0213-1-2000  . #x2945)	; &I-JX1-2945; [09-37]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER I WITH CIRCUMFLEX")
       (=ucs		  . #x00EE)	; î
@@ -3033,16 +3029,16 @@
     (=jis-x0212		. #x2B42)	; &JX1-2964; [11-34]
     (=jis-x0213-1-2000	. #x2964)	; &I-JX1-2964; [09-68]
     (=ucs@jis/fw	. #x00EE)	; &JX1-2964;
+    (->uppercase
+     ((=jis-x0212	  . #x2A42)	; &JX1-2945; [10-34]
+      (=jis-x0213-1-2000  . #x2945)	; &I-JX1-2945; [09-37]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER I WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER I WITH DIAERESIS")
-      (=ucs		  . #x00CF)	; Ï
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER I")
       (=ucs		  . #x0069)	; i
@@ -3054,16 +3050,16 @@
     (latin-iso8859-1	. #xEF)	; &I-LATIN1-6F;
     (latin-iso8859-3	. #xEF)	; &I-LATIN3-6F;
     (latin-iso8859-9	. #xEF)	; &I-LATIN5-6F;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER I WITH DIAERESIS")
+      (=ucs		  . #x00CF)	; Ï
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER I WITH DIAERESIS")
       (=ucs		  . #x00EF)	; ï
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A41)	; &JX1-2946; [10-33]
-      (=jis-x0213-1-2000  . #x2946)	; &I-JX1-2946; [09-38]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER I WITH DIAERESIS")
       (=ucs		  . #x00EF)	; ï
@@ -3079,6 +3075,10 @@
     (=jis-x0213-1-2000	. #x2965)	; &I-JX1-2965; [09-69]
     (=jef-china3	. #x88D6)	; &I-JC3-88D6;
     (=ucs@jis/fw	. #x00EF)	; &JX1-2965;
+    (->uppercase
+     ((=jis-x0212	  . #x2A41)	; &JX1-2946; [10-33]
+      (=jis-x0213-1-2000  . #x2946)	; &I-JX1-2946; [09-38]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER ETH")
@@ -3086,23 +3086,19 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Icelandic")
+    (=ucs		. #x00F0)	; ð
+    (latin-iso8859-1	. #xF0)	; &I-LATIN1-70;
+    (ipa		. #xC9)	; &I-MULE-IPA-49;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER ETH")
       (=ucs		  . #x00D0)	; Ð
       ))
-    (=ucs		. #x00F0)	; ð
-    (latin-iso8859-1	. #xF0)	; &I-LATIN1-70;
-    (ipa		. #xC9)	; &I-MULE-IPA-49;
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER ETH")
       (=ucs		  . #x00F0)	; ð
       ))
-    (->uppercase
-     ((=ks-x1001	  . #x2822)	; &JX1-2947; [08-02]
-      (=jis-x0213-1-2000  . #x2947)	; &I-JX1-2947; [09-39]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER ETH")
       (=ucs		  . #x00F0)	; ð
@@ -3112,16 +3108,16 @@
     (=jis-x0213-1-2000	. #x2966)	; &I-JX1-2966; [09-70]
     (=jef-china3	. #x83B4)	; &I-JC3-83B4;
     (=ucs@jis/fw	. #x00F0)	; &JX1-2966;
+    (->uppercase
+     ((=ks-x1001	  . #x2822)	; &JX1-2947; [08-02]
+      (=jis-x0213-1-2000  . #x2947)	; &I-JX1-2947; [09-39]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER N WITH TILDE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER N WITH TILDE")
-      (=ucs		  . #x00D1)	; Ñ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER N")
       (=ucs		  . #x006E)	; n
@@ -3133,16 +3129,16 @@
     (latin-iso8859-1	. #xF1)	; &I-LATIN1-71;
     (latin-iso8859-3	. #xF1)	; &I-LATIN3-71;
     (latin-iso8859-9	. #xF1)	; &I-LATIN5-71;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER N WITH TILDE")
+      (=ucs		  . #x00D1)	; Ñ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER N WITH TILDE")
       (=ucs		  . #x00F1)	; ñ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A50)	; &JX1-2948; [10-48]
-      (=jis-x0213-1-2000  . #x2948)	; &I-JX1-2948; [09-40]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER N WITH TILDE")
       (=ucs		  . #x00F1)	; ñ
@@ -3158,16 +3154,16 @@
     (=jis-x0213-1-2000	. #x2967)	; &I-JX1-2967; [09-71]
     (=jef-china3	. #x86F3)	; &I-JC3-86F3;
     (=ucs@jis/fw	. #x00F1)	; &JX1-2967;
+    (->uppercase
+     ((=jis-x0212	  . #x2A50)	; &JX1-2948; [10-48]
+      (=jis-x0213-1-2000  . #x2948)	; &I-JX1-2948; [09-40]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH GRAVE")
-      (=ucs		  . #x00D2)	; Ò
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
@@ -3182,16 +3178,16 @@
     (latin-tcvn5712	. #xDF)	; &I-VSCII2-5F;
     (latin-viscii	. #xF2)	; &I-MULE-VIET-L-72;
     (latin-viscii-lower . #xF2)	; &I-MULE-VIET-L-72;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH GRAVE")
+      (=ucs		  . #x00D2)	; Ò
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER O WITH GRAVE")
       (=ucs		  . #x00F2)	; ò
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A52)	; &JX1-2949; [10-50]
-      (=jis-x0213-1-2000  . #x2949)	; &I-JX1-2949; [09-41]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER O WITH GRAVE")
       (=ucs		  . #x00F2)	; ò
@@ -3209,16 +3205,16 @@
     (=jef-china3	. #x85C5)	; &I-JC3-85C5;
     (=ucs@gb/fw		. #x00F2)	; &JX1-2968;
     (=ucs@jis/fw	. #x00F2)	; &JX1-2968;
+    (->uppercase
+     ((=jis-x0212	  . #x2A52)	; &JX1-2949; [10-50]
+      (=jis-x0213-1-2000  . #x2949)	; &I-JX1-2949; [09-41]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH ACUTE")
-      (=ucs		  . #x00D3)	; Ó
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
@@ -3234,16 +3230,16 @@
     (latin-tcvn5712	. #xE3)	; &I-VSCII2-63;
     (latin-viscii	. #xF3)	; &I-MULE-VIET-L-73;
     (latin-viscii-lower . #xF3)	; &I-MULE-VIET-L-73;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH ACUTE")
+      (=ucs		  . #x00D3)	; Ó
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER O WITH ACUTE")
       (=ucs		  . #x00F3)	; ó
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A51)	; &JX1-294A; [10-49]
-      (=jis-x0213-1-2000  . #x294A)	; &I-JX1-294A; [09-42]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER O WITH ACUTE")
       (=ucs		  . #x00F3)	; ó
@@ -3261,16 +3257,16 @@
     (=jef-china3	. #x85F6)	; &I-JC3-85F6;
     (=ucs@gb/fw		. #x00F3)	; &JX1-2969;
     (=ucs@jis/fw	. #x00F3)	; &JX1-2969;
+    (->uppercase
+     ((=jis-x0212	  . #x2A51)	; &JX1-294A; [10-49]
+      (=jis-x0213-1-2000  . #x294A)	; &I-JX1-294A; [09-42]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH CIRCUMFLEX")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX")
-      (=ucs		  . #x00D4)	; Ô
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
@@ -3287,16 +3283,16 @@
     (latin-tcvn5712	. #xAB)	; &I-VSCII2-2B;
     (latin-viscii	. #xF4)	; &I-MULE-VIET-L-74;
     (latin-viscii-lower . #xF4)	; &I-MULE-VIET-L-74;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX")
+      (=ucs		  . #x00D4)	; Ô
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER O WITH CIRCUMFLEX")
       (=ucs		  . #x00F4)	; ô
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A54)	; &JX1-294B; [10-52]
-      (=jis-x0213-1-2000  . #x294B)	; &I-JX1-294B; [09-43]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER O WITH CIRCUMFLEX")
       (=ucs		  . #x00F4)	; ô
@@ -3312,16 +3308,16 @@
     (=jis-x0213-1-2000	. #x296A)	; &I-JX1-296A; [09-74]
     (=jef-china3	. #x86CC)	; &I-JC3-86CC;
     (=ucs@jis/fw	. #x00F4)	; &JX1-296A;
+    (->uppercase
+     ((=jis-x0212	  . #x2A54)	; &JX1-294B; [10-52]
+      (=jis-x0213-1-2000  . #x294B)	; &I-JX1-294B; [09-43]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH TILDE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH TILDE")
-      (=ucs		  . #x00D5)	; Õ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
@@ -3336,16 +3332,16 @@
     (latin-tcvn5712	. #xE2)	; &I-VSCII2-62;
     (latin-viscii	. #xF5)	; &I-MULE-VIET-L-75;
     (latin-viscii-lower . #xF5)	; &I-MULE-VIET-L-75;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH TILDE")
+      (=ucs		  . #x00D5)	; Õ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER O WITH TILDE")
       (=ucs		  . #x00F5)	; õ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A58)	; &JX1-294C; [10-56]
-      (=jis-x0213-1-2000  . #x294C)	; &I-JX1-294C; [09-44]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER O WITH TILDE")
       (=ucs		  . #x00F5)	; õ
@@ -3361,16 +3357,16 @@
     (=jis-x0213-1-2000	. #x296B)	; &I-JX1-296B; [09-75]
     (=jef-china3	. #x86F4)	; &I-JC3-86F4;
     (=ucs@jis/fw	. #x00F5)	; &JX1-296B;
+    (->uppercase
+     ((=jis-x0212	  . #x2A58)	; &JX1-294C; [10-56]
+      (=jis-x0213-1-2000  . #x294C)	; &I-JX1-294C; [09-44]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH DIAERESIS")
-      (=ucs		  . #x00D6)	; Ö
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
@@ -3384,16 +3380,16 @@
     (latin-iso8859-3	. #xF6)	; &I-LATIN3-76;
     (latin-iso8859-4	. #xF6)	; &I-LATIN4-76;
     (latin-iso8859-9	. #xF6)	; &I-LATIN5-76;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH DIAERESIS")
+      (=ucs		  . #x00D6)	; Ö
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER O WITH DIAERESIS")
       (=ucs		  . #x00F6)	; ö
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A53)	; &JX1-294D; [10-51]
-      (=jis-x0213-1-2000  . #x294D)	; &I-JX1-294D; [09-45]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER O WITH DIAERESIS")
       (=ucs		  . #x00F6)	; ö
@@ -3409,6 +3405,10 @@
     (=jis-x0213-1-2000	. #x296C)	; &I-JX1-296C; [09-76]
     (=jef-china3	. #x88D8)	; &I-JC3-88D8;
     (=ucs@jis/fw	. #x00F6)	; &JX1-296C;
+    (->uppercase
+     ((=jis-x0212	  . #x2A53)	; &JX1-294D; [10-51]
+      (=jis-x0213-1-2000  . #x294D)	; &I-JX1-294D; [09-45]
+      ))
     ))
 (define-char
   '((name		. "DIVISION SIGN")
@@ -3445,26 +3445,21 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH STROKE")
-      (=ucs		  . #x00D8)	; Ø
-      ))
     (=ucs		. #x00F8)	; ø
     (latin-iso8859-1	. #xF8)	; &I-LATIN1-78;
     (latin-iso8859-4	. #xF8)	; &I-LATIN4-78;
     (latin-iso8859-9	. #xF8)	; &I-LATIN5-78;
     (ipa		. #xAF)	; &I-MULE-IPA-2F;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH STROKE")
+      (=ucs		  . #x00D8)	; Ø
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER O WITH STROKE")
       (=ucs		  . #x00F8)	; ø
       ))
-    (->uppercase
-     ((=ks-x1001	  . #x282A)	; &JX1-294E; [08-10]
-      (=jis-x0212	  . #x292C)	; &I-JSP-292C; [09-12]
-      (=jis-x0213-1-2000  . #x294E)	; &I-JX1-294E; [09-46]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER O WITH STROKE")
       (=ucs		  . #x00F8)	; ø
@@ -3474,16 +3469,17 @@
     (=jis-x0213-1-2000	. #x296D)	; &I-JX1-296D; [09-77]
     (=jef-china3	. #x83AD)	; &I-JC3-83AD;
     (=ucs@jis/fw	. #x00F8)	; &JX1-296D;
+    (->uppercase
+     ((=ks-x1001	  . #x282A)	; &JX1-294E; [08-10]
+      (=jis-x0212	  . #x292C)	; &I-JSP-292C; [09-12]
+      (=jis-x0213-1-2000  . #x294E)	; &I-JX1-294E; [09-46]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH GRAVE")
-      (=ucs		  . #x00D9)	; Ù
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -3498,16 +3494,16 @@
     (latin-tcvn5712	. #xEF)	; &I-VSCII2-6F;
     (latin-viscii	. #xF9)	; &I-MULE-VIET-L-79;
     (latin-viscii-lower . #xF9)	; &I-MULE-VIET-L-79;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH GRAVE")
+      (=ucs		  . #x00D9)	; Ù
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER U WITH GRAVE")
       (=ucs		  . #x00F9)	; ù
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A63)	; &JX1-294F; [10-67]
-      (=jis-x0213-1-2000  . #x294F)	; &I-JX1-294F; [09-47]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER U WITH GRAVE")
       (=ucs		  . #x00F9)	; ù
@@ -3525,16 +3521,16 @@
     (=jef-china3	. #x85C7)	; &I-JC3-85C7;
     (=ucs@gb/fw		. #x00F9)	; &JX1-296E;
     (=ucs@jis/fw	. #x00F9)	; &JX1-296E;
+    (->uppercase
+     ((=jis-x0212	  . #x2A63)	; &JX1-294F; [10-67]
+      (=jis-x0213-1-2000  . #x294F)	; &I-JX1-294F; [09-47]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH ACUTE")
-      (=ucs		  . #x00DA)	; Ú
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -3551,16 +3547,16 @@
     (latin-tcvn5712	. #xF3)	; &I-VSCII2-73;
     (latin-viscii	. #xFA)	; &I-MULE-VIET-L-7A;
     (latin-viscii-lower . #xFA)	; &I-MULE-VIET-L-7A;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH ACUTE")
+      (=ucs		  . #x00DA)	; Ú
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER U WITH ACUTE")
       (=ucs		  . #x00FA)	; ú
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A62)	; &JX1-2950; [10-66]
-      (=jis-x0213-1-2000  . #x2950)	; &I-JX1-2950; [09-48]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER U WITH ACUTE")
       (=ucs		  . #x00FA)	; ú
@@ -3578,16 +3574,16 @@
     (=jef-china3	. #x85FC)	; &I-JC3-85FC;
     (=ucs@gb/fw		. #x00FA)	; &JX1-296F;
     (=ucs@jis/fw	. #x00FA)	; &JX1-296F;
+    (->uppercase
+     ((=jis-x0212	  . #x2A62)	; &JX1-2950; [10-66]
+      (=jis-x0213-1-2000  . #x2950)	; &I-JX1-2950; [09-48]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH CIRCUMFLEX")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH CIRCUMFLEX")
-      (=ucs		  . #x00DB)	; Û
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -3600,16 +3596,16 @@
     (latin-iso8859-3	. #xFB)	; &I-LATIN3-7B;
     (latin-iso8859-4	. #xFB)	; &I-LATIN4-7B;
     (latin-iso8859-9	. #xFB)	; &I-LATIN5-7B;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH CIRCUMFLEX")
+      (=ucs		  . #x00DB)	; Û
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER U WITH CIRCUMFLEX")
       (=ucs		  . #x00FB)	; û
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A65)	; &JX1-2951; [10-69]
-      (=jis-x0213-1-2000  . #x2951)	; &I-JX1-2951; [09-49]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER U WITH CIRCUMFLEX")
       (=ucs		  . #x00FB)	; û
@@ -3625,16 +3621,16 @@
     (=jis-x0213-1-2000	. #x2970)	; &I-JX1-2970; [09-80]
     (=jef-china3	. #x86CE)	; &I-JC3-86CE;
     (=ucs@jis/fw	. #x00FB)	; &JX1-2970;
+    (->uppercase
+     ((=jis-x0212	  . #x2A65)	; &JX1-2951; [10-69]
+      (=jis-x0213-1-2000  . #x2951)	; &I-JX1-2951; [09-49]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH DIAERESIS")
-      (=ucs		  . #x00DC)	; Ü
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -3648,16 +3644,16 @@
     (latin-iso8859-3	. #xFC)	; &I-LATIN3-7C;
     (latin-iso8859-4	. #xFC)	; &I-LATIN4-7C;
     (latin-iso8859-9	. #xFC)	; &I-LATIN5-7C;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH DIAERESIS")
+      (=ucs		  . #x00DC)	; Ü
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER U WITH DIAERESIS")
       (=ucs		  . #x00FC)	; ü
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A64)	; &JX1-2952; [10-68]
-      (=jis-x0213-1-2000  . #x2952)	; &I-JX1-2952; [09-50]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER U WITH DIAERESIS")
       (=ucs		  . #x00FC)	; ü
@@ -3675,16 +3671,16 @@
     (=jef-china3	. #x88DB)	; &I-JC3-88DB;
     (=ucs@gb/fw		. #x00FC)	; &JX1-2971;
     (=ucs@jis/fw	. #x00FC)	; &JX1-2971;
+    (->uppercase
+     ((=jis-x0212	  . #x2A64)	; &JX1-2952; [10-68]
+      (=jis-x0213-1-2000  . #x2952)	; &I-JX1-2952; [09-50]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Y WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER Y WITH ACUTE")
-      (=ucs		  . #x00DD)	; Ý
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER Y")
       (=ucs		  . #x0079)	; y
@@ -3698,16 +3694,16 @@
     (latin-tcvn5712	. #xFD)	; &I-VSCII2-7D;
     (latin-viscii	. #xFD)	; &I-MULE-VIET-L-7D;
     (latin-viscii-lower . #xFD)	; &I-MULE-VIET-L-7D;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER Y WITH ACUTE")
+      (=ucs		  . #x00DD)	; Ý
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER Y WITH ACUTE")
       (=ucs		  . #x00FD)	; ý
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A72)	; &JX1-2953; [10-82]
-      (=jis-x0213-1-2000  . #x2953)	; &I-JX1-2953; [09-51]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER Y WITH ACUTE")
       (=ucs		  . #x00FD)	; ý
@@ -3723,6 +3719,10 @@
     (=jis-x0213-1-2000	. #x2972)	; &I-JX1-2972; [09-82]
     (=jef-china3	. #x86A1)	; &I-JC3-86A1;
     (=ucs@jis/fw	. #x00FD)	; &JX1-2972;
+    (->uppercase
+     ((=jis-x0212	  . #x2A72)	; &JX1-2953; [10-82]
+      (=jis-x0213-1-2000  . #x2953)	; &I-JX1-2953; [09-51]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER THORN")
@@ -3730,23 +3730,18 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Icelandic")
+    (=ucs		. #x00FE)	; þ
+    (latin-iso8859-1	. #xFE)	; &I-LATIN1-7E;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER THORN")
       (=ucs		  . #x00DE)	; Þ
       ))
-    (=ucs		. #x00FE)	; þ
-    (latin-iso8859-1	. #xFE)	; &I-LATIN1-7E;
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER THORN")
       (=ucs		  . #x00FE)	; þ
       ))
-    (->uppercase
-     ((=ks-x1001	  . #x282D)	; &JX1-2954; [08-13]
-      (=jis-x0212	  . #x2930)	; &I-JSP-2930; [09-16]
-      (=jis-x0213-1-2000  . #x2954)	; &I-JX1-2954; [09-52]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER THORN")
       (=ucs		  . #x00FE)	; þ
@@ -3756,16 +3751,17 @@
     (=jis-x0213-1-2000	. #x2973)	; &I-JX1-2973; [09-83]
     (=jef-china3	. #x83AF)	; &I-JC3-83AF;
     (=ucs@jis/fw	. #x00FE)	; &JX1-2973;
+    (->uppercase
+     ((=ks-x1001	  . #x282D)	; &JX1-2954; [08-13]
+      (=jis-x0212	  . #x2930)	; &I-JSP-2930; [09-16]
+      (=jis-x0213-1-2000  . #x2954)	; &I-JX1-2954; [09-52]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Y WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER Y WITH DIAERESIS")
-      (=ucs		  . #x0178)	; Ÿ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER Y")
       (=ucs		  . #x0079)	; y
@@ -3776,15 +3772,16 @@
     (=ucs		. #x00FF)	; ÿ
     (latin-iso8859-1	. #xFF)	; &I-LATIN1-7F;
     (latin-iso8859-9	. #xFF)	; &I-LATIN5-7F;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER Y WITH DIAERESIS")
+      (=ucs		  . #x0178)	; Ÿ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER Y WITH DIAERESIS")
       (=ucs		  . #x00FF)	; ÿ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A73)	; &JSP-2A73; [10-83]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER Y WITH DIAERESIS")
       (=ucs		  . #x00FF)	; ÿ
@@ -3799,4 +3796,7 @@
     (=jis-x0212		. #x2B73)	; &JX1-2974; [11-83]
     (=jis-x0213-1-2000	. #x2974)	; &I-JX1-2974; [09-84]
     (=ucs@jis/fw	. #x00FF)	; &JX1-2974;
+    (->uppercase
+     ((=jis-x0212	  . #x2A73)	; &JSP-2A73; [10-83]
+      ))
     ))
diff --git a/lisp/utf-2000/u00100-Latin-Extended-A.el b/lisp/utf-2000/u00100-Latin-Extended-A.el
index a669bcc..c2cb9bb 100644
--- a/lisp/utf-2000/u00100-Latin-Extended-A.el
+++ b/lisp/utf-2000/u00100-Latin-Extended-A.el
@@ -4,10 +4,6 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH MACRON")
-      (=ucs		  . #x0101)	; ā
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
@@ -17,17 +13,16 @@
       ))
     (=ucs		. #x0100)	; Ā
     (latin-iso8859-4	. #xC0)	; &I-LATIN4-40;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH MACRON")
+      (=ucs		  . #x0101)	; ā
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER A WITH MACRON")
       (=ucs		  . #x0100)	; Ā
       ))
-    (->lowercase
-     ((=gb2312		  . #x2821)	; &JX1-297A; [08-01]
-      (=jis-x0212	  . #x2B27)	; &I-JSP-2B27; [11-07]
-      (=jis-x0213-1-2000  . #x297A)	; &I-JX1-297A; [09-90]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER A WITH MACRON")
       (=ucs		  . #x0100)	; Ā
@@ -43,16 +38,17 @@
     (=jis-x0213-1-2000	. #x2975)	; &I-JX1-2975; [09-85]
     (=jef-china3	. #x87A8)	; &I-JC3-87A8;
     (=ucs@jis/fw	. #x0100)	; &JX1-2975;
+    (->lowercase
+     ((=gb2312		  . #x2821)	; &JX1-297A; [08-01]
+      (=jis-x0212	  . #x2B27)	; &I-JSP-2B27; [11-07]
+      (=jis-x0213-1-2000  . #x297A)	; &I-JX1-297A; [09-90]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER A WITH MACRON")
-      (=ucs		  . #x0100)	; Ā
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
@@ -62,16 +58,16 @@
       ))
     (=ucs		. #x0101)	; ā
     (latin-iso8859-4	. #xE0)	; &I-LATIN4-60;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER A WITH MACRON")
+      (=ucs		  . #x0100)	; Ā
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER A WITH MACRON")
       (=ucs		  . #x0101)	; ā
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A27)	; &JX1-2975; [10-07]
-      (=jis-x0213-1-2000  . #x2975)	; &I-JX1-2975; [09-85]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER A WITH MACRON")
       (=ucs		  . #x0101)	; ā
@@ -89,16 +85,16 @@
     (=jef-china3	. #x87BC)	; &I-JC3-87BC;
     (=ucs@gb/fw		. #x0101)	; &JX1-297A;
     (=ucs@jis/fw	. #x0101)	; &JX1-297A;
+    (->uppercase
+     ((=jis-x0212	  . #x2A27)	; &JX1-2975; [10-07]
+      (=jis-x0213-1-2000  . #x2975)	; &I-JX1-2975; [09-85]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A WITH BREVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH BREVE")
-      (=ucs		  . #x0103)	; ă
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
@@ -111,16 +107,16 @@
     (latin-tcvn5712	. #xA1)	; &I-VSCII2-21;
     (latin-viscii	. #xC5)	; &I-MULE-VIET-U-65;
     (latin-viscii-upper . #xE5)	; &I-MULE-VIET-U-65;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH BREVE")
+      (=ucs		  . #x0103)	; ă
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER A WITH BREVE")
       (=ucs		  . #x0102)	; Ă
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B25)	; &JX1-2A49; [11-05]
-      (=jis-x0213-1-2000  . #x2A49)	; &I-JX1-2A49; [10-41]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER A WITH BREVE")
       (=ucs		  . #x0102)	; Ă
@@ -136,16 +132,16 @@
     (=jis-x0213-1-2000	. #x2A3A)	; &I-JX1-2A3A; [10-26]
     (=jef-china3	. #x87DE)	; &I-JC3-87DE;
     (=ucs@jis/fw	. #x0102)	; &JX1-2A3A;
+    (->lowercase
+     ((=jis-x0212	  . #x2B25)	; &JX1-2A49; [11-05]
+      (=jis-x0213-1-2000  . #x2A49)	; &I-JX1-2A49; [10-41]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH BREVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER A WITH BREVE")
-      (=ucs		  . #x0102)	; Ă
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
@@ -158,16 +154,16 @@
     (latin-tcvn5712	. #xA8)	; &I-VSCII2-28;
     (latin-viscii	. #xE5)	; &I-MULE-VIET-L-65;
     (latin-viscii-lower . #xE5)	; &I-MULE-VIET-L-65;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER A WITH BREVE")
+      (=ucs		  . #x0102)	; Ă
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER A WITH BREVE")
       (=ucs		  . #x0103)	; ă
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A25)	; &JX1-2A3A; [10-05]
-      (=jis-x0213-1-2000  . #x2A3A)	; &I-JX1-2A3A; [10-26]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER A WITH BREVE")
       (=ucs		  . #x0103)	; ă
@@ -183,16 +179,16 @@
     (=jis-x0213-1-2000	. #x2A49)	; &I-JX1-2A49; [10-41]
     (=jef-china3	. #x87E8)	; &I-JC3-87E8;
     (=ucs@jis/fw	. #x0103)	; &JX1-2A49;
+    (->uppercase
+     ((=jis-x0212	  . #x2A25)	; &JX1-2A3A; [10-05]
+      (=jis-x0213-1-2000  . #x2A3A)	; &I-JX1-2A3A; [10-26]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A WITH OGONEK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH OGONEK")
-      (=ucs		  . #x0105)	; ą
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
@@ -203,16 +199,16 @@
     (=ucs		. #x0104)	; Ą
     (latin-iso8859-2	. #xA1)	; &I-LATIN2-21;
     (latin-iso8859-4	. #xA1)	; &I-LATIN4-21;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH OGONEK")
+      (=ucs		  . #x0105)	; ą
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER A WITH OGONEK")
       (=ucs		  . #x0104)	; Ą
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B28)	; &JX1-2A2C; [11-08]
-      (=jis-x0213-1-2000  . #x2A2C)	; &I-JX1-2A2C; [10-12]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER A WITH OGONEK")
       (=ucs		  . #x0104)	; Ą
@@ -228,16 +224,16 @@
     (=jis-x0213-1-2000	. #x2A21)	; &I-JX1-2A21; [10-01]
     (=jef-china3	. #x8AA3)	; &I-JC3-8AA3;
     (=ucs@jis/fw	. #x0104)	; &JX1-2A21;
+    (->lowercase
+     ((=jis-x0212	  . #x2B28)	; &JX1-2A2C; [11-08]
+      (=jis-x0213-1-2000  . #x2A2C)	; &I-JX1-2A2C; [10-12]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH OGONEK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER A WITH OGONEK")
-      (=ucs		  . #x0104)	; Ą
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
@@ -248,16 +244,16 @@
     (=ucs		. #x0105)	; ą
     (latin-iso8859-2	. #xB1)	; &I-LATIN2-31;
     (latin-iso8859-4	. #xB1)	; &I-LATIN4-31;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER A WITH OGONEK")
+      (=ucs		  . #x0104)	; Ą
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER A WITH OGONEK")
       (=ucs		  . #x0105)	; ą
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A28)	; &JX1-2A21; [10-08]
-      (=jis-x0213-1-2000  . #x2A21)	; &I-JX1-2A21; [10-01]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER A WITH OGONEK")
       (=ucs		  . #x0105)	; ą
@@ -273,16 +269,16 @@
     (=jis-x0213-1-2000	. #x2A2C)	; &I-JX1-2A2C; [10-12]
     (=jef-china3	. #x8AAB)	; &I-JC3-8AAB;
     (=ucs@jis/fw	. #x0105)	; &JX1-2A2C;
+    (->uppercase
+     ((=jis-x0212	  . #x2A28)	; &JX1-2A21; [10-08]
+      (=jis-x0213-1-2000  . #x2A21)	; &I-JX1-2A21; [10-01]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER C WITH ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER C WITH ACUTE")
-      (=ucs		  . #x0107)	; ć
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER C")
       (=ucs		  . #x0043)	; C
@@ -292,16 +288,16 @@
       ))
     (=ucs		. #x0106)	; Ć
     (latin-iso8859-2	. #xC6)	; &I-LATIN2-46;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER C WITH ACUTE")
+      (=ucs		  . #x0107)	; ć
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER C WITH ACUTE")
       (=ucs		  . #x0106)	; Ć
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B2B)	; &JX1-2A4B; [11-11]
-      (=jis-x0213-1-2000  . #x2A4B)	; &I-JX1-2A4B; [10-43]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER C WITH ACUTE")
       (=ucs		  . #x0106)	; Ć
@@ -317,16 +313,16 @@
     (=jis-x0213-1-2000	. #x2A3C)	; &I-JX1-2A3C; [10-28]
     (=jef-china3	. #x85D6)	; &I-JC3-85D6;
     (=ucs@jis/fw	. #x0106)	; &JX1-2A3C;
+    (->lowercase
+     ((=jis-x0212	  . #x2B2B)	; &JX1-2A4B; [11-11]
+      (=jis-x0213-1-2000  . #x2A4B)	; &I-JX1-2A4B; [10-43]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER C WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER C WITH ACUTE")
-      (=ucs		  . #x0106)	; Ć
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER C")
       (=ucs		  . #x0063)	; c
@@ -336,16 +332,16 @@
       ))
     (=ucs		. #x0107)	; ć
     (latin-iso8859-2	. #xE6)	; &I-LATIN2-66;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER C WITH ACUTE")
+      (=ucs		  . #x0106)	; Ć
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER C WITH ACUTE")
       (=ucs		  . #x0107)	; ć
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A2B)	; &JX1-2A3C; [10-11]
-      (=jis-x0213-1-2000  . #x2A3C)	; &I-JX1-2A3C; [10-28]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER C WITH ACUTE")
       (=ucs		  . #x0107)	; ć
@@ -361,16 +357,16 @@
     (=jis-x0213-1-2000	. #x2A4B)	; &I-JX1-2A4B; [10-43]
     (=jef-china3	. #x85EC)	; &I-JC3-85EC;
     (=ucs@jis/fw	. #x0107)	; &JX1-2A4B;
+    (->uppercase
+     ((=jis-x0212	  . #x2A2B)	; &JX1-2A3C; [10-11]
+      (=jis-x0213-1-2000  . #x2A3C)	; &I-JX1-2A3C; [10-28]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER C WITH CIRCUMFLEX")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER C WITH CIRCUMFLEX")
-      (=ucs		  . #x0109)	; ĉ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER C")
       (=ucs		  . #x0043)	; C
@@ -380,16 +376,16 @@
       ))
     (=ucs		. #x0108)	; Ĉ
     (latin-iso8859-3	. #xC6)	; &I-LATIN3-46;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER C WITH CIRCUMFLEX")
+      (=ucs		  . #x0109)	; ĉ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER C WITH CIRCUMFLEX")
       (=ucs		  . #x0108)	; Ĉ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B2C)	; &JX1-2A5F; [11-12]
-      (=jis-x0213-1-2000  . #x2A5F)	; &I-JX1-2A5F; [10-63]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER C WITH CIRCUMFLEX")
       (=ucs		  . #x0108)	; Ĉ
@@ -405,16 +401,16 @@
     (=jis-x0213-1-2000	. #x2A59)	; &I-JX1-2A59; [10-57]
     (=jef-china3	. #x86B8)	; &I-JC3-86B8;
     (=ucs@jis/fw	. #x0108)	; &JX1-2A59;
+    (->lowercase
+     ((=jis-x0212	  . #x2B2C)	; &JX1-2A5F; [11-12]
+      (=jis-x0213-1-2000  . #x2A5F)	; &I-JX1-2A5F; [10-63]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER C WITH CIRCUMFLEX")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER C WITH CIRCUMFLEX")
-      (=ucs		  . #x0108)	; Ĉ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER C")
       (=ucs		  . #x0063)	; c
@@ -424,16 +420,16 @@
       ))
     (=ucs		. #x0109)	; ĉ
     (latin-iso8859-3	. #xE6)	; &I-LATIN3-66;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER C WITH CIRCUMFLEX")
+      (=ucs		  . #x0108)	; Ĉ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER C WITH CIRCUMFLEX")
       (=ucs		  . #x0109)	; ĉ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A2C)	; &JX1-2A59; [10-12]
-      (=jis-x0213-1-2000  . #x2A59)	; &I-JX1-2A59; [10-57]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER C WITH CIRCUMFLEX")
       (=ucs		  . #x0109)	; ĉ
@@ -449,16 +445,16 @@
     (=jis-x0213-1-2000	. #x2A5F)	; &I-JX1-2A5F; [10-63]
     (=jef-china3	. #x86C5)	; &I-JC3-86C5;
     (=ucs@jis/fw	. #x0109)	; &JX1-2A5F;
+    (->uppercase
+     ((=jis-x0212	  . #x2A2C)	; &JX1-2A59; [10-12]
+      (=jis-x0213-1-2000  . #x2A59)	; &I-JX1-2A59; [10-57]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER C WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER C WITH DOT ABOVE")
-      (=ucs		  . #x010B)	; ċ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER C")
       (=ucs		  . #x0043)	; C
@@ -468,15 +464,16 @@
       ))
     (=ucs		. #x010A)	; Ċ
     (latin-iso8859-3	. #xC5)	; &I-LATIN3-45;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER C WITH DOT ABOVE")
+      (=ucs		  . #x010B)	; ċ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER C WITH DOT ABOVE")
       (=ucs		  . #x010A)	; Ċ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B2F)	; &JSP-2B2F; [11-15]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER C WITH DOT ABOVE")
       (=ucs		  . #x010A)	; Ċ
@@ -491,16 +488,15 @@
     (=jis-x0212		. #x2A2F)	; &JSP-2A2F; [10-15]
     (=jef-china3	. #x87FA)	; &I-JC3-87FA;
     (=ucs@jis/fw	. #x010A)	; &JSP-2A2F;
+    (->lowercase
+     ((=jis-x0212	  . #x2B2F)	; &JSP-2B2F; [11-15]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER C WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER C WITH DOT ABOVE")
-      (=ucs		  . #x010A)	; Ċ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER C")
       (=ucs		  . #x0063)	; c
@@ -510,15 +506,16 @@
       ))
     (=ucs		. #x010B)	; ċ
     (latin-iso8859-3	. #xE5)	; &I-LATIN3-65;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER C WITH DOT ABOVE")
+      (=ucs		  . #x010A)	; Ċ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER C WITH DOT ABOVE")
       (=ucs		  . #x010B)	; ċ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A2F)	; &JSP-2A2F; [10-15]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER C WITH DOT ABOVE")
       (=ucs		  . #x010B)	; ċ
@@ -533,16 +530,15 @@
     (=jis-x0212		. #x2B2F)	; &JSP-2B2F; [11-15]
     (=jef-china3	. #x88B2)	; &I-JC3-88B2;
     (=ucs@jis/fw	. #x010B)	; &JSP-2B2F;
+    (->uppercase
+     ((=jis-x0212	  . #x2A2F)	; &JSP-2A2F; [10-15]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER C WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER C WITH CARON")
-      (=ucs		  . #x010D)	; č
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER C")
       (=ucs		  . #x0043)	; C
@@ -553,16 +549,16 @@
     (=ucs		. #x010C)	; Č
     (latin-iso8859-2	. #xC8)	; &I-LATIN2-48;
     (latin-iso8859-4	. #xC8)	; &I-LATIN4-48;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER C WITH CARON")
+      (=ucs		  . #x010D)	; č
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER C WITH CARON")
       (=ucs		  . #x010C)	; Č
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B2D)	; &JX1-2A4C; [11-13]
-      (=jis-x0213-1-2000  . #x2A4C)	; &I-JX1-2A4C; [10-44]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER C WITH CARON")
       (=ucs		  . #x010C)	; Č
@@ -578,16 +574,16 @@
     (=jis-x0213-1-2000	. #x2A3D)	; &I-JX1-2A3D; [10-29]
     (=jef-china3	. #x88E0)	; &I-JC3-88E0;
     (=ucs@jis/fw	. #x010C)	; &JX1-2A3D;
+    (->lowercase
+     ((=jis-x0212	  . #x2B2D)	; &JX1-2A4C; [11-13]
+      (=jis-x0213-1-2000  . #x2A4C)	; &I-JX1-2A4C; [10-44]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER C WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER C WITH CARON")
-      (=ucs		  . #x010C)	; Č
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER C")
       (=ucs		  . #x0063)	; c
@@ -598,16 +594,16 @@
     (=ucs		. #x010D)	; č
     (latin-iso8859-2	. #xE8)	; &I-LATIN2-68;
     (latin-iso8859-4	. #xE8)	; &I-LATIN4-68;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER C WITH CARON")
+      (=ucs		  . #x010C)	; Č
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER C WITH CARON")
       (=ucs		  . #x010D)	; č
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A2D)	; &JX1-2A3D; [10-13]
-      (=jis-x0213-1-2000  . #x2A3D)	; &I-JX1-2A3D; [10-29]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER C WITH CARON")
       (=ucs		  . #x010D)	; č
@@ -623,16 +619,16 @@
     (=jis-x0213-1-2000	. #x2A4C)	; &I-JX1-2A4C; [10-44]
     (=jef-china3	. #x88EF)	; &I-JC3-88EF;
     (=ucs@jis/fw	. #x010D)	; &JX1-2A4C;
+    (->uppercase
+     ((=jis-x0212	  . #x2A2D)	; &JX1-2A3D; [10-13]
+      (=jis-x0213-1-2000  . #x2A3D)	; &I-JX1-2A3D; [10-29]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER D WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER D WITH CARON")
-      (=ucs		  . #x010F)	; ď
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER D")
       (=ucs		  . #x0044)	; D
@@ -642,16 +638,16 @@
       ))
     (=ucs		. #x010E)	; Ď
     (latin-iso8859-2	. #xCF)	; &I-LATIN2-4F;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER D WITH CARON")
+      (=ucs		  . #x010F)	; ď
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER D WITH CARON")
       (=ucs		  . #x010E)	; Ď
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B30)	; &JX1-2A4F; [11-16]
-      (=jis-x0213-1-2000  . #x2A4F)	; &I-JX1-2A4F; [10-47]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER D WITH CARON")
       (=ucs		  . #x010E)	; Ď
@@ -667,16 +663,16 @@
     (=jis-x0213-1-2000	. #x2A40)	; &I-JX1-2A40; [10-32]
     (=jef-china3	. #x88E1)	; &I-JC3-88E1;
     (=ucs@jis/fw	. #x010E)	; &JX1-2A40;
+    (->lowercase
+     ((=jis-x0212	  . #x2B30)	; &JX1-2A4F; [11-16]
+      (=jis-x0213-1-2000  . #x2A4F)	; &I-JX1-2A4F; [10-47]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER D WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER D WITH CARON")
-      (=ucs		  . #x010E)	; Ď
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER D")
       (=ucs		  . #x0064)	; d
@@ -686,16 +682,16 @@
       ))
     (=ucs		. #x010F)	; ď
     (latin-iso8859-2	. #xEF)	; &I-LATIN2-6F;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER D WITH CARON")
+      (=ucs		  . #x010E)	; Ď
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER D WITH CARON")
       (=ucs		  . #x010F)	; ď
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A30)	; &JX1-2A40; [10-16]
-      (=jis-x0213-1-2000  . #x2A40)	; &I-JX1-2A40; [10-32]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER D WITH CARON")
       (=ucs		  . #x010F)	; ď
@@ -711,33 +707,32 @@
     (=jis-x0213-1-2000	. #x2A4F)	; &I-JX1-2A4F; [10-47]
     (=jef-china3	. #x88F0)	; &I-JC3-88F0;
     (=ucs@jis/fw	. #x010F)	; &JX1-2A4F;
+    (->uppercase
+     ((=jis-x0212	  . #x2A30)	; &JX1-2A40; [10-16]
+      (=jis-x0213-1-2000  . #x2A40)	; &I-JX1-2A40; [10-32]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER D WITH STROKE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER D WITH STROKE")
-      (=ucs		  . #x0111)	; đ
-      ))
     (=ucs		. #x0110)	; Đ
     (latin-iso8859-2	. #xD0)	; &I-LATIN2-50;
     (latin-iso8859-4	. #xD0)	; &I-LATIN4-50;
     (latin-tcvn5712	. #xA7)	; &I-VSCII2-27;
     (latin-viscii	. #xD0)	; &I-MULE-VIET-U-70;
     (latin-viscii-upper . #xF0)	; &I-MULE-VIET-U-70;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER D WITH STROKE")
+      (=ucs		  . #x0111)	; đ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER D WITH STROKE")
       (=ucs		  . #x0110)	; Đ
       ))
-    (->lowercase
-     ((=ks-x1001	  . #x2922)	; &JX1-2A50; [09-02]
-      (=jis-x0212	  . #x2942)	; &I-JSP-2942; [09-34]
-      (=jis-x0213-1-2000  . #x2A50)	; &I-JX1-2A50; [10-48]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER D WITH STROKE")
       (=ucs		  . #x0110)	; Đ
@@ -745,31 +740,33 @@
     (=jis-x0212		. #x2922)	; &JSP-2922; [09-02]
     (=jef-china3	. #x83A3)	; &I-JC3-83A3;
     (=ucs@jis/fw	. #x0110)	; &JSP-2922;
+    (->lowercase
+     ((=ks-x1001	  . #x2922)	; &JX1-2A50; [09-02]
+      (=jis-x0212	  . #x2942)	; &I-JSP-2942; [09-34]
+      (=jis-x0213-1-2000  . #x2A50)	; &I-JX1-2A50; [10-48]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER D WITH STROKE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER D WITH STROKE")
-      (=ucs		  . #x0110)	; Đ
-      ))
     (=ucs		. #x0111)	; đ
     (latin-iso8859-2	. #xF0)	; &I-LATIN2-70;
     (latin-iso8859-4	. #xF0)	; &I-LATIN4-70;
     (latin-tcvn5712	. #xAE)	; &I-VSCII2-2E;
     (latin-viscii	. #xF0)	; &I-MULE-VIET-L-70;
     (latin-viscii-lower . #xF0)	; &I-MULE-VIET-L-70;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER D WITH STROKE")
+      (=ucs		  . #x0110)	; Đ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER D WITH STROKE")
       (=ucs		  . #x0111)	; đ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2922)	; &JSP-2922; [09-02]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER D WITH STROKE")
       (=ucs		  . #x0111)	; đ
@@ -779,16 +776,15 @@
     (=jis-x0213-1-2000	. #x2A50)	; &I-JX1-2A50; [10-48]
     (=jef-china3	. #x83AE)	; &I-JC3-83AE;
     (=ucs@jis/fw	. #x0111)	; &JX1-2A50;
+    (->uppercase
+     ((=jis-x0212	  . #x2922)	; &JSP-2922; [09-02]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH MACRON")
-      (=ucs		  . #x0113)	; ē
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -798,17 +794,16 @@
       ))
     (=ucs		. #x0112)	; Ē
     (latin-iso8859-4	. #xAA)	; &I-LATIN4-2A;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH MACRON")
+      (=ucs		  . #x0113)	; ē
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER E WITH MACRON")
       (=ucs		  . #x0112)	; Ē
       ))
-    (->lowercase
-     ((=gb2312		  . #x2825)	; &JX1-297D; [08-05]
-      (=jis-x0212	  . #x2B37)	; &I-JSP-2B37; [11-23]
-      (=jis-x0213-1-2000  . #x297D)	; &I-JX1-297D; [09-93]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER E WITH MACRON")
       (=ucs		  . #x0112)	; Ē
@@ -824,16 +819,17 @@
     (=jis-x0213-1-2000	. #x2978)	; &I-JX1-2978; [09-88]
     (=jef-china3	. #x87AB)	; &I-JC3-87AB;
     (=ucs@jis/fw	. #x0112)	; &JX1-2978;
+    (->lowercase
+     ((=gb2312		  . #x2825)	; &JX1-297D; [08-05]
+      (=jis-x0212	  . #x2B37)	; &I-JSP-2B37; [11-23]
+      (=jis-x0213-1-2000  . #x297D)	; &I-JX1-297D; [09-93]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER E WITH MACRON")
-      (=ucs		  . #x0112)	; Ē
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -843,16 +839,16 @@
       ))
     (=ucs		. #x0113)	; ē
     (latin-iso8859-4	. #xBA)	; &I-LATIN4-3A;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER E WITH MACRON")
+      (=ucs		  . #x0112)	; Ē
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER E WITH MACRON")
       (=ucs		  . #x0113)	; ē
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A37)	; &JX1-2978; [10-23]
-      (=jis-x0213-1-2000  . #x2978)	; &I-JX1-2978; [09-88]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER E WITH MACRON")
       (=ucs		  . #x0113)	; ē
@@ -870,16 +866,16 @@
     (=jef-china3	. #x87BF)	; &I-JC3-87BF;
     (=ucs@gb/fw		. #x0113)	; &JX1-297D;
     (=ucs@jis/fw	. #x0113)	; &JX1-297D;
+    (->uppercase
+     ((=jis-x0212	  . #x2A37)	; &JX1-2978; [10-23]
+      (=jis-x0213-1-2000  . #x2978)	; &I-JX1-2978; [09-88]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH BREVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH BREVE")
-      (=ucs		  . #x0115)	; ĕ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -888,16 +884,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x0114)	; Ĕ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH BREVE")
+      (=ucs		  . #x0115)	; ĕ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH BREVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER E WITH BREVE")
-      (=ucs		  . #x0114)	; Ĕ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -906,16 +902,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x0115)	; ĕ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER E WITH BREVE")
+      (=ucs		  . #x0114)	; Ĕ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH DOT ABOVE")
-      (=ucs		  . #x0117)	; ė
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -925,15 +921,16 @@
       ))
     (=ucs		. #x0116)	; Ė
     (latin-iso8859-4	. #xCC)	; &I-LATIN4-4C;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH DOT ABOVE")
+      (=ucs		  . #x0117)	; ė
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER E WITH DOT ABOVE")
       (=ucs		  . #x0116)	; Ė
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B36)	; &JSP-2B36; [11-22]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER E WITH DOT ABOVE")
       (=ucs		  . #x0116)	; Ė
@@ -948,16 +945,15 @@
     (=jis-x0212		. #x2A36)	; &JSP-2A36; [10-22]
     (=jef-china3	. #x87FC)	; &I-JC3-87FC;
     (=ucs@jis/fw	. #x0116)	; &JSP-2A36;
+    (->lowercase
+     ((=jis-x0212	  . #x2B36)	; &JSP-2B36; [11-22]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER E WITH DOT ABOVE")
-      (=ucs		  . #x0116)	; Ė
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -967,15 +963,16 @@
       ))
     (=ucs		. #x0117)	; ė
     (latin-iso8859-4	. #xEC)	; &I-LATIN4-6C;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER E WITH DOT ABOVE")
+      (=ucs		  . #x0116)	; Ė
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER E WITH DOT ABOVE")
       (=ucs		  . #x0117)	; ė
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A36)	; &JSP-2A36; [10-22]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER E WITH DOT ABOVE")
       (=ucs		  . #x0117)	; ė
@@ -990,16 +987,15 @@
     (=jis-x0212		. #x2B36)	; &JSP-2B36; [11-22]
     (=jef-china3	. #x88B4)	; &I-JC3-88B4;
     (=ucs@jis/fw	. #x0117)	; &JSP-2B36;
+    (->uppercase
+     ((=jis-x0212	  . #x2A36)	; &JSP-2A36; [10-22]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH OGONEK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH OGONEK")
-      (=ucs		  . #x0119)	; ę
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -1010,16 +1006,16 @@
     (=ucs		. #x0118)	; Ę
     (latin-iso8859-2	. #xCA)	; &I-LATIN2-4A;
     (latin-iso8859-4	. #xCA)	; &I-LATIN4-4A;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH OGONEK")
+      (=ucs		  . #x0119)	; ę
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER E WITH OGONEK")
       (=ucs		  . #x0118)	; Ę
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B38)	; &JX1-2A4D; [11-24]
-      (=jis-x0213-1-2000  . #x2A4D)	; &I-JX1-2A4D; [10-45]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER E WITH OGONEK")
       (=ucs		  . #x0118)	; Ę
@@ -1035,16 +1031,16 @@
     (=jis-x0213-1-2000	. #x2A3E)	; &I-JX1-2A3E; [10-30]
     (=jef-china3	. #x8AA4)	; &I-JC3-8AA4;
     (=ucs@jis/fw	. #x0118)	; &JX1-2A3E;
+    (->lowercase
+     ((=jis-x0212	  . #x2B38)	; &JX1-2A4D; [11-24]
+      (=jis-x0213-1-2000  . #x2A4D)	; &I-JX1-2A4D; [10-45]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH OGONEK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER E WITH OGONEK")
-      (=ucs		  . #x0118)	; Ę
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -1055,16 +1051,16 @@
     (=ucs		. #x0119)	; ę
     (latin-iso8859-2	. #xEA)	; &I-LATIN2-6A;
     (latin-iso8859-4	. #xEA)	; &I-LATIN4-6A;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER E WITH OGONEK")
+      (=ucs		  . #x0118)	; Ę
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER E WITH OGONEK")
       (=ucs		  . #x0119)	; ę
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A38)	; &JX1-2A3E; [10-24]
-      (=jis-x0213-1-2000  . #x2A3E)	; &I-JX1-2A3E; [10-30]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER E WITH OGONEK")
       (=ucs		  . #x0119)	; ę
@@ -1080,16 +1076,16 @@
     (=jis-x0213-1-2000	. #x2A4D)	; &I-JX1-2A4D; [10-45]
     (=jef-china3	. #x8AAC)	; &I-JC3-8AAC;
     (=ucs@jis/fw	. #x0119)	; &JX1-2A4D;
+    (->uppercase
+     ((=jis-x0212	  . #x2A38)	; &JX1-2A3E; [10-24]
+      (=jis-x0213-1-2000  . #x2A3E)	; &I-JX1-2A3E; [10-30]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH CARON")
-      (=ucs		  . #x011B)	; ě
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -1099,17 +1095,16 @@
       ))
     (=ucs		. #x011A)	; Ě
     (latin-iso8859-2	. #xCC)	; &I-LATIN2-4C;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH CARON")
+      (=ucs		  . #x011B)	; ě
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER E WITH CARON")
       (=ucs		  . #x011A)	; Ě
       ))
-    (->lowercase
-     ((=gb2312		  . #x2827)	; &JX1-2A4E; [08-07]
-      (=jis-x0212	  . #x2B35)	; &I-JSP-2B35; [11-21]
-      (=jis-x0213-1-2000  . #x2A4E)	; &I-JX1-2A4E; [10-46]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER E WITH CARON")
       (=ucs		  . #x011A)	; Ě
@@ -1125,16 +1120,17 @@
     (=jis-x0213-1-2000	. #x2A3F)	; &I-JX1-2A3F; [10-31]
     (=jef-china3	. #x88E2)	; &I-JC3-88E2;
     (=ucs@jis/fw	. #x011A)	; &JX1-2A3F;
+    (->lowercase
+     ((=gb2312		  . #x2827)	; &JX1-2A4E; [08-07]
+      (=jis-x0212	  . #x2B35)	; &I-JSP-2B35; [11-21]
+      (=jis-x0213-1-2000  . #x2A4E)	; &I-JX1-2A4E; [10-46]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER E WITH CARON")
-      (=ucs		  . #x011A)	; Ě
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -1144,16 +1140,16 @@
       ))
     (=ucs		. #x011B)	; ě
     (latin-iso8859-2	. #xEC)	; &I-LATIN2-6C;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER E WITH CARON")
+      (=ucs		  . #x011A)	; Ě
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER E WITH CARON")
       (=ucs		  . #x011B)	; ě
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A35)	; &JX1-2A3F; [10-21]
-      (=jis-x0213-1-2000  . #x2A3F)	; &I-JX1-2A3F; [10-31]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER E WITH CARON")
       (=ucs		  . #x011B)	; ě
@@ -1171,16 +1167,16 @@
     (=jef-china3	. #x88F1)	; &I-JC3-88F1;
     (=ucs@gb/fw		. #x011B)	; &JX1-2A4E;
     (=ucs@jis/fw	. #x011B)	; &JX1-2A4E;
+    (->uppercase
+     ((=jis-x0212	  . #x2A35)	; &JX1-2A3F; [10-21]
+      (=jis-x0213-1-2000  . #x2A3F)	; &I-JX1-2A3F; [10-31]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER G WITH CIRCUMFLEX")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER G WITH CIRCUMFLEX")
-      (=ucs		  . #x011D)	; ĝ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER G")
       (=ucs		  . #x0047)	; G
@@ -1190,16 +1186,16 @@
       ))
     (=ucs		. #x011C)	; Ĝ
     (latin-iso8859-3	. #xD8)	; &I-LATIN3-58;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER G WITH CIRCUMFLEX")
+      (=ucs		  . #x011D)	; ĝ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER G WITH CIRCUMFLEX")
       (=ucs		  . #x011C)	; Ĝ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B3A)	; &JX1-2A60; [11-26]
-      (=jis-x0213-1-2000  . #x2A60)	; &I-JX1-2A60; [10-64]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER G WITH CIRCUMFLEX")
       (=ucs		  . #x011C)	; Ĝ
@@ -1215,16 +1211,16 @@
     (=jis-x0213-1-2000	. #x2A5A)	; &I-JX1-2A5A; [10-58]
     (=jef-china3	. #x86BA)	; &I-JC3-86BA;
     (=ucs@jis/fw	. #x011C)	; &JX1-2A5A;
+    (->lowercase
+     ((=jis-x0212	  . #x2B3A)	; &JX1-2A60; [11-26]
+      (=jis-x0213-1-2000  . #x2A60)	; &I-JX1-2A60; [10-64]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER G WITH CIRCUMFLEX")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER G WITH CIRCUMFLEX")
-      (=ucs		  . #x011C)	; Ĝ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER G")
       (=ucs		  . #x0067)	; g
@@ -1234,16 +1230,16 @@
       ))
     (=ucs		. #x011D)	; ĝ
     (latin-iso8859-3	. #xF8)	; &I-LATIN3-78;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER G WITH CIRCUMFLEX")
+      (=ucs		  . #x011C)	; Ĝ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER G WITH CIRCUMFLEX")
       (=ucs		  . #x011D)	; ĝ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A3A)	; &JX1-2A5A; [10-26]
-      (=jis-x0213-1-2000  . #x2A5A)	; &I-JX1-2A5A; [10-58]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER G WITH CIRCUMFLEX")
       (=ucs		  . #x011D)	; ĝ
@@ -1259,16 +1255,16 @@
     (=jis-x0213-1-2000	. #x2A60)	; &I-JX1-2A60; [10-64]
     (=jef-china3	. #x86C7)	; &I-JC3-86C7;
     (=ucs@jis/fw	. #x011D)	; &JX1-2A60;
+    (->uppercase
+     ((=jis-x0212	  . #x2A3A)	; &JX1-2A5A; [10-26]
+      (=jis-x0213-1-2000  . #x2A5A)	; &I-JX1-2A5A; [10-58]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER G WITH BREVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER G WITH BREVE")
-      (=ucs		  . #x011F)	; ğ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER G")
       (=ucs		  . #x0047)	; G
@@ -1279,15 +1275,16 @@
     (=ucs		. #x011E)	; Ğ
     (latin-iso8859-3	. #xAB)	; &I-LATIN3-2B;
     (latin-iso8859-9	. #xD0)	; &I-LATIN5-50;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER G WITH BREVE")
+      (=ucs		  . #x011F)	; ğ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER G WITH BREVE")
       (=ucs		  . #x011E)	; Ğ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B3B)	; &JSP-2B3B; [11-27]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER G WITH BREVE")
       (=ucs		  . #x011E)	; Ğ
@@ -1302,16 +1299,15 @@
     (=jis-x0212		. #x2A3B)	; &JSP-2A3B; [10-27]
     (=jef-china3	. #x87E1)	; &I-JC3-87E1;
     (=ucs@jis/fw	. #x011E)	; &JSP-2A3B;
+    (->lowercase
+     ((=jis-x0212	  . #x2B3B)	; &JSP-2B3B; [11-27]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER G WITH BREVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER G WITH BREVE")
-      (=ucs		  . #x011E)	; Ğ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER G")
       (=ucs		  . #x0067)	; g
@@ -1322,15 +1318,16 @@
     (=ucs		. #x011F)	; ğ
     (latin-iso8859-3	. #xBB)	; &I-LATIN3-3B;
     (latin-iso8859-9	. #xF0)	; &I-LATIN5-70;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER G WITH BREVE")
+      (=ucs		  . #x011E)	; Ğ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER G WITH BREVE")
       (=ucs		  . #x011F)	; ğ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A3B)	; &JSP-2A3B; [10-27]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER G WITH BREVE")
       (=ucs		  . #x011F)	; ğ
@@ -1345,16 +1342,15 @@
     (=jis-x0212		. #x2B3B)	; &JSP-2B3B; [11-27]
     (=jef-china3	. #x87EB)	; &I-JC3-87EB;
     (=ucs@jis/fw	. #x011F)	; &JSP-2B3B;
+    (->uppercase
+     ((=jis-x0212	  . #x2A3B)	; &JSP-2A3B; [10-27]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER G WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER G WITH DOT ABOVE")
-      (=ucs		  . #x0121)	; Ä¡
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER G")
       (=ucs		  . #x0047)	; G
@@ -1364,15 +1360,16 @@
       ))
     (=ucs		. #x0120)	; Ä 
     (latin-iso8859-3	. #xD5)	; &I-LATIN3-55;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER G WITH DOT ABOVE")
+      (=ucs		  . #x0121)	; Ä¡
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER G WITH DOT ABOVE")
       (=ucs		  . #x0120)	; Ä 
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B3D)	; &JSP-2B3D; [11-29]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER G WITH DOT ABOVE")
       (=ucs		  . #x0120)	; Ä 
@@ -1387,16 +1384,15 @@
     (=jis-x0212		. #x2A3D)	; &JSP-2A3D; [10-29]
     (=jef-china3	. #x87FE)	; &I-JC3-87FE;
     (=ucs@jis/fw	. #x0120)	; &JSP-2A3D;
+    (->lowercase
+     ((=jis-x0212	  . #x2B3D)	; &JSP-2B3D; [11-29]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER G WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER G WITH DOT ABOVE")
-      (=ucs		  . #x0120)	; Ä 
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER G")
       (=ucs		  . #x0067)	; g
@@ -1406,15 +1402,16 @@
       ))
     (=ucs		. #x0121)	; Ä¡
     (latin-iso8859-3	. #xF5)	; &I-LATIN3-75;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER G WITH DOT ABOVE")
+      (=ucs		  . #x0120)	; Ä 
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER G WITH DOT ABOVE")
       (=ucs		  . #x0121)	; Ä¡
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A3D)	; &JSP-2A3D; [10-29]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER G WITH DOT ABOVE")
       (=ucs		  . #x0121)	; Ä¡
@@ -1429,16 +1426,15 @@
     (=jis-x0212		. #x2B3D)	; &JSP-2B3D; [11-29]
     (=jef-china3	. #x88B6)	; &I-JC3-88B6;
     (=ucs@jis/fw	. #x0121)	; &JSP-2B3D;
+    (->uppercase
+     ((=jis-x0212	  . #x2A3D)	; &JSP-2A3D; [10-29]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER G WITH CEDILLA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER G WITH CEDILLA")
-      (=ucs		  . #x0123)	; ģ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER G")
       (=ucs		  . #x0047)	; G
@@ -1448,6 +1444,10 @@
       ))
     (=ucs		. #x0122)	; Ģ
     (latin-iso8859-4	. #xAB)	; &I-LATIN4-2B;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER G WITH CEDILLA")
+      (=ucs		  . #x0123)	; ģ
+      ))
     ))
 (define-char
   '((<-denotational
@@ -1473,10 +1473,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER G WITH CEDILLA")
-      (=ucs		  . #x0122)	; Ģ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER G")
       (=ucs		  . #x0067)	; g
@@ -1486,16 +1482,16 @@
       ))
     (=ucs		. #x0123)	; ģ
     (latin-iso8859-4	. #xBB)	; &I-LATIN4-3B;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER G WITH CEDILLA")
+      (=ucs		  . #x0122)	; Ģ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER H WITH CIRCUMFLEX")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER H WITH CIRCUMFLEX")
-      (=ucs		  . #x0125)	; ĥ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER H")
       (=ucs		  . #x0048)	; H
@@ -1505,16 +1501,16 @@
       ))
     (=ucs		. #x0124)	; Ĥ
     (latin-iso8859-3	. #xA6)	; &I-LATIN3-26;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER H WITH CIRCUMFLEX")
+      (=ucs		  . #x0125)	; ĥ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER H WITH CIRCUMFLEX")
       (=ucs		  . #x0124)	; Ĥ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B3E)	; &JX1-2A61; [11-30]
-      (=jis-x0213-1-2000  . #x2A61)	; &I-JX1-2A61; [10-65]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER H WITH CIRCUMFLEX")
       (=ucs		  . #x0124)	; Ĥ
@@ -1530,16 +1526,16 @@
     (=jis-x0213-1-2000	. #x2A5B)	; &I-JX1-2A5B; [10-59]
     (=jef-china3	. #x86BB)	; &I-JC3-86BB;
     (=ucs@jis/fw	. #x0124)	; &JX1-2A5B;
+    (->lowercase
+     ((=jis-x0212	  . #x2B3E)	; &JX1-2A61; [11-30]
+      (=jis-x0213-1-2000  . #x2A61)	; &I-JX1-2A61; [10-65]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER H WITH CIRCUMFLEX")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER H WITH CIRCUMFLEX")
-      (=ucs		  . #x0124)	; Ĥ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER H")
       (=ucs		  . #x0068)	; h
@@ -1549,16 +1545,16 @@
       ))
     (=ucs		. #x0125)	; ĥ
     (latin-iso8859-3	. #xB6)	; &I-LATIN3-36;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER H WITH CIRCUMFLEX")
+      (=ucs		  . #x0124)	; Ĥ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER H WITH CIRCUMFLEX")
       (=ucs		  . #x0125)	; ĥ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A3E)	; &JX1-2A5B; [10-30]
-      (=jis-x0213-1-2000  . #x2A5B)	; &I-JX1-2A5B; [10-59]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER H WITH CIRCUMFLEX")
       (=ucs		  . #x0125)	; ĥ
@@ -1574,29 +1570,28 @@
     (=jis-x0213-1-2000	. #x2A61)	; &I-JX1-2A61; [10-65]
     (=jef-china3	. #x86C8)	; &I-JC3-86C8;
     (=ucs@jis/fw	. #x0125)	; &JX1-2A61;
+    (->uppercase
+     ((=jis-x0212	  . #x2A3E)	; &JX1-2A5B; [10-30]
+      (=jis-x0213-1-2000  . #x2A5B)	; &I-JX1-2A5B; [10-59]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER H WITH STROKE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0126)	; Ħ
+    (latin-iso8859-3	. #xA1)	; &I-LATIN3-21;
     (->lowercase
      ((name		  . "LATIN SMALL LETTER H WITH STROKE")
       (=ucs		  . #x0127)	; ħ
       ))
-    (=ucs		. #x0126)	; Ħ
-    (latin-iso8859-3	. #xA1)	; &I-LATIN3-21;
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER H WITH STROKE")
       (=ucs		  . #x0126)	; Ħ
       ))
-    (->lowercase
-     ((=ks-x1001	  . #x2924)	; &JX1-2A7D; [09-04]
-      (=jis-x0212	  . #x2944)	; &I-JSP-2944; [09-36]
-      (=jis-x0213-1-2000  . #x2A7D)	; &I-JX1-2A7D; [10-93]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER H WITH STROKE")
       (=ucs		  . #x0126)	; Ħ
@@ -1604,28 +1599,29 @@
     (=ks-x1001		. #x2824)	; &JSP-2924; [08-04]
     (=jis-x0212		. #x2924)	; &I-JSP-2924; [09-04]
     (=ucs@jis/fw	. #x0126)	; &JSP-2924;
+    (->lowercase
+     ((=ks-x1001	  . #x2924)	; &JX1-2A7D; [09-04]
+      (=jis-x0212	  . #x2944)	; &I-JSP-2944; [09-36]
+      (=jis-x0213-1-2000  . #x2A7D)	; &I-JX1-2A7D; [10-93]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER H WITH STROKE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0127)	; ħ
+    (latin-iso8859-3	. #xB1)	; &I-LATIN3-31;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER H WITH STROKE")
       (=ucs		  . #x0126)	; Ħ
       ))
-    (=ucs		. #x0127)	; ħ
-    (latin-iso8859-3	. #xB1)	; &I-LATIN3-31;
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER H WITH STROKE")
       (=ucs		  . #x0127)	; ħ
       ))
-    (->uppercase
-     ((=ks-x1001	  . #x2824)	; &JSP-2924; [08-04]
-      (=jis-x0212	  . #x2924)	; &I-JSP-2924; [09-04]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER H WITH STROKE")
       (=ucs		  . #x0127)	; ħ
@@ -1634,16 +1630,16 @@
     (=jis-x0212		. #x2944)	; &I-JSP-2944; [09-36]
     (=jis-x0213-1-2000	. #x2A7D)	; &I-JX1-2A7D; [10-93]
     (=ucs@jis/fw	. #x0127)	; &JX1-2A7D;
+    (->uppercase
+     ((=ks-x1001	  . #x2824)	; &JSP-2924; [08-04]
+      (=jis-x0212	  . #x2924)	; &I-JSP-2924; [09-04]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I WITH TILDE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER I WITH TILDE")
-      (=ucs		  . #x0129)	; Ä©
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
@@ -1655,15 +1651,16 @@
     (latin-iso8859-4	. #xA5)	; &I-LATIN4-25;
     (latin-viscii	. #xCE)	; &I-MULE-VIET-U-6E;
     (latin-viscii-upper . #xEE)	; &I-MULE-VIET-U-6E;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER I WITH TILDE")
+      (=ucs		  . #x0129)	; Ä©
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER I WITH TILDE")
       (=ucs		  . #x0128)	; Ĩ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B47)	; &JSP-2B47; [11-39]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER I WITH TILDE")
       (=ucs		  . #x0128)	; Ĩ
@@ -1678,16 +1675,15 @@
     (=jis-x0212		. #x2A47)	; &JSP-2A47; [10-39]
     (=jef-china3	. #x86E5)	; &I-JC3-86E5;
     (=ucs@jis/fw	. #x0128)	; &JSP-2A47;
+    (->lowercase
+     ((=jis-x0212	  . #x2B47)	; &JSP-2B47; [11-39]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER I WITH TILDE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER I WITH TILDE")
-      (=ucs		  . #x0128)	; Ĩ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER I")
       (=ucs		  . #x0069)	; i
@@ -1700,15 +1696,16 @@
     (latin-tcvn5712	. #xDC)	; &I-VSCII2-5C;
     (latin-viscii	. #xEE)	; &I-MULE-VIET-L-6E;
     (latin-viscii-lower . #xEE)	; &I-MULE-VIET-L-6E;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER I WITH TILDE")
+      (=ucs		  . #x0128)	; Ĩ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER I WITH TILDE")
       (=ucs		  . #x0129)	; Ä©
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A47)	; &JSP-2A47; [10-39]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER I WITH TILDE")
       (=ucs		  . #x0129)	; Ä©
@@ -1722,16 +1719,15 @@
       ))
     (=jis-x0212		. #x2B47)	; &JSP-2B47; [11-39]
     (=ucs@jis/fw	. #x0129)	; &JSP-2B47;
+    (->uppercase
+     ((=jis-x0212	  . #x2A47)	; &JSP-2A47; [10-39]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I WITH MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER I WITH MACRON")
-      (=ucs		  . #x012B)	; Ä«
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
@@ -1741,17 +1737,16 @@
       ))
     (=ucs		. #x012A)	; Ī
     (latin-iso8859-4	. #xCF)	; &I-LATIN4-4F;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER I WITH MACRON")
+      (=ucs		  . #x012B)	; Ä«
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER I WITH MACRON")
       (=ucs		  . #x012A)	; Ī
       ))
-    (->lowercase
-     ((=gb2312		  . #x2829)	; &JX1-297B; [08-09]
-      (=jis-x0212	  . #x2B45)	; &I-JSP-2B45; [11-37]
-      (=jis-x0213-1-2000  . #x297B)	; &I-JX1-297B; [09-91]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER I WITH MACRON")
       (=ucs		  . #x012A)	; Ī
@@ -1767,16 +1762,17 @@
     (=jis-x0213-1-2000	. #x2976)	; &I-JX1-2976; [09-86]
     (=jef-china3	. #x87AD)	; &I-JC3-87AD;
     (=ucs@jis/fw	. #x012A)	; &JX1-2976;
+    (->lowercase
+     ((=gb2312		  . #x2829)	; &JX1-297B; [08-09]
+      (=jis-x0212	  . #x2B45)	; &I-JSP-2B45; [11-37]
+      (=jis-x0213-1-2000  . #x297B)	; &I-JX1-297B; [09-91]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER I WITH MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER I WITH MACRON")
-      (=ucs		  . #x012A)	; Ī
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER I")
       (=ucs		  . #x0069)	; i
@@ -1786,16 +1782,16 @@
       ))
     (=ucs		. #x012B)	; Ä«
     (latin-iso8859-4	. #xEF)	; &I-LATIN4-6F;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER I WITH MACRON")
+      (=ucs		  . #x012A)	; Ī
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER I WITH MACRON")
       (=ucs		  . #x012B)	; Ä«
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A45)	; &JX1-2976; [10-37]
-      (=jis-x0213-1-2000  . #x2976)	; &I-JX1-2976; [09-86]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER I WITH MACRON")
       (=ucs		  . #x012B)	; Ä«
@@ -1812,16 +1808,16 @@
     (=jis-x0213-1-2000	. #x297B)	; &I-JX1-297B; [09-91]
     (=ucs@gb/fw		. #x012B)	; &JX1-297B;
     (=ucs@jis/fw	. #x012B)	; &JX1-297B;
+    (->uppercase
+     ((=jis-x0212	  . #x2A45)	; &JX1-2976; [10-37]
+      (=jis-x0213-1-2000  . #x2976)	; &I-JX1-2976; [09-86]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I WITH BREVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER I WITH BREVE")
-      (=ucs		  . #x012D)	; Ä­
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
@@ -1830,16 +1826,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x012C)	; Ĭ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER I WITH BREVE")
+      (=ucs		  . #x012D)	; Ä­
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER I WITH BREVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER I WITH BREVE")
-      (=ucs		  . #x012C)	; Ĭ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER I")
       (=ucs		  . #x0069)	; i
@@ -1848,16 +1844,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x012D)	; Ä­
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER I WITH BREVE")
+      (=ucs		  . #x012C)	; Ĭ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I WITH OGONEK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER I WITH OGONEK")
-      (=ucs		  . #x012F)	; į
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
@@ -1867,15 +1863,16 @@
       ))
     (=ucs		. #x012E)	; Ä®
     (latin-iso8859-4	. #xC7)	; &I-LATIN4-47;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER I WITH OGONEK")
+      (=ucs		  . #x012F)	; į
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER I WITH OGONEK")
       (=ucs		  . #x012E)	; Ä®
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B46)	; &JSP-2B46; [11-38]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER I WITH OGONEK")
       (=ucs		  . #x012E)	; Ä®
@@ -1890,16 +1887,15 @@
     (=jis-x0212		. #x2A46)	; &JSP-2A46; [10-38]
     (=jef-china3	. #x8AA6)	; &I-JC3-8AA6;
     (=ucs@jis/fw	. #x012E)	; &JSP-2A46;
+    (->lowercase
+     ((=jis-x0212	  . #x2B46)	; &JSP-2B46; [11-38]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER I WITH OGONEK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER I WITH OGONEK")
-      (=ucs		  . #x012E)	; Ä®
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER I")
       (=ucs		  . #x0069)	; i
@@ -1909,15 +1905,16 @@
       ))
     (=ucs		. #x012F)	; į
     (latin-iso8859-4	. #xE7)	; &I-LATIN4-67;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER I WITH OGONEK")
+      (=ucs		  . #x012E)	; Ä®
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER I WITH OGONEK")
       (=ucs		  . #x012F)	; į
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A46)	; &JSP-2A46; [10-38]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER I WITH OGONEK")
       (=ucs		  . #x012F)	; į
@@ -1932,16 +1929,15 @@
     (=jis-x0212		. #x2B46)	; &JSP-2B46; [11-38]
     (=jef-china3	. #x8AAE)	; &I-JC3-8AAE;
     (=ucs@jis/fw	. #x012F)	; &JSP-2B46;
+    (->uppercase
+     ((=jis-x0212	  . #x2A46)	; &JSP-2A46; [10-38]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER I")
-      (=ucs		  . #x0069)	; i
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
@@ -1952,16 +1948,16 @@
     (=ucs		. #x0130)	; Ä°
     (latin-iso8859-3	. #xA9)	; &I-LATIN3-29;
     (latin-iso8859-9	. #xDD)	; &I-LATIN5-5D;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER I")
+      (=ucs		  . #x0069)	; i
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER I WITH DOT ABOVE")
       (=ucs		  . #x0130)	; Ä°
       ))
-    (->lowercase
-     ((name		  . "FULLWIDTH LATIN SMALL LETTER I")
-      (=ucs		  . #xFF49)	; ｉ
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER I WITH DOT ABOVE")
       (=ucs		  . #x0130)	; Ä°
@@ -1976,29 +1972,29 @@
     (=jis-x0212		. #x2A44)	; &JSP-2A44; [10-36]
     (=jef-china3	. #x88A2)	; &I-JC3-88A2;
     (=ucs@jis/fw	. #x0130)	; &JSP-2A44;
+    (->lowercase
+     ((name		  . "FULLWIDTH LATIN SMALL LETTER I")
+      (=ucs		  . #xFF49)	; ｉ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER DOTLESS I")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0131)	; ı
+    (latin-iso8859-3	. #xB9)	; &I-LATIN3-39;
+    (latin-iso8859-9	. #xFD)	; &I-LATIN5-7D;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
       ))
-    (=ucs		. #x0131)	; ı
-    (latin-iso8859-3	. #xB9)	; &I-LATIN3-39;
-    (latin-iso8859-9	. #xFD)	; &I-LATIN5-7D;
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER DOTLESS I")
       (=ucs		  . #x0131)	; ı
       ))
-    (->uppercase
-     ((name		  . "FULLWIDTH LATIN CAPITAL LETTER I")
-      (=ucs		  . #xFF29)	; Ｉ
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER DOTLESS I")
       (=ucs		  . #x0131)	; ı
@@ -2007,16 +2003,16 @@
     (=jis-x0212		. #x2945)	; &I-JSP-2945; [09-37]
     (=jef-china3	. #x83B3)	; &I-JC3-83B3;
     (=ucs@jis/fw	. #x0131)	; &JSP-2945;
+    (->uppercase
+     ((name		  . "FULLWIDTH LATIN CAPITAL LETTER I")
+      (=ucs		  . #xFF29)	; Ｉ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LIGATURE IJ")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LIGATURE IJ")
-      (=ucs		  . #x0133)	; ij
-      ))
     (=>decomposition@compat
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
@@ -2025,16 +2021,16 @@
       (=ucs		  . #x004A)	; J
       ))
     (=ucs		. #x0132)	; IJ
+    (->lowercase
+     ((name		  . "LATIN SMALL LIGATURE IJ")
+      (=ucs		  . #x0133)	; ij
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LIGATURE IJ")
       (=ucs		  . #x0132)	; IJ
       ))
-    (->lowercase
-     ((=ks-x1001	  . #x2926)	; &JSP-2946; [09-06]
-      (=jis-x0212	  . #x2946)	; &I-JSP-2946; [09-38]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LIGATURE IJ")
       (=ucs		  . #x0132)	; IJ
@@ -2042,16 +2038,16 @@
     (=ks-x1001		. #x2826)	; &JSP-2926; [08-06]
     (=jis-x0212		. #x2926)	; &I-JSP-2926; [09-06]
     (=ucs@jis		. #x0132)	; &JSP-2926;
+    (->lowercase
+     ((=ks-x1001	  . #x2926)	; &JSP-2946; [09-06]
+      (=jis-x0212	  . #x2946)	; &I-JSP-2946; [09-38]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LIGATURE IJ")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LIGATURE IJ")
-      (=ucs		  . #x0132)	; IJ
-      ))
     (=>decomposition@compat
      ((name		  . "LATIN SMALL LETTER I")
       (=ucs		  . #x0069)	; i
@@ -2060,16 +2056,16 @@
       (=ucs		  . #x006A)	; j
       ))
     (=ucs		. #x0133)	; ij
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LIGATURE IJ")
+      (=ucs		  . #x0132)	; IJ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LIGATURE IJ")
       (=ucs		  . #x0133)	; ij
       ))
-    (->uppercase
-     ((=ks-x1001	  . #x2826)	; &JSP-2926; [08-06]
-      (=jis-x0212	  . #x2926)	; &I-JSP-2926; [09-06]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LIGATURE IJ")
       (=ucs		  . #x0133)	; ij
@@ -2077,16 +2073,16 @@
     (=ks-x1001		. #x2926)	; &JSP-2946; [09-06]
     (=jis-x0212		. #x2946)	; &I-JSP-2946; [09-38]
     (=ucs@jis/fw	. #x0133)	; &JSP-2946;
+    (->uppercase
+     ((=ks-x1001	  . #x2826)	; &JSP-2926; [08-06]
+      (=jis-x0212	  . #x2926)	; &I-JSP-2926; [09-06]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER J WITH CIRCUMFLEX")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER J WITH CIRCUMFLEX")
-      (=ucs		  . #x0135)	; ĵ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER J")
       (=ucs		  . #x004A)	; J
@@ -2096,16 +2092,16 @@
       ))
     (=ucs		. #x0134)	; Ä´
     (latin-iso8859-3	. #xAC)	; &I-LATIN3-2C;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER J WITH CIRCUMFLEX")
+      (=ucs		  . #x0135)	; ĵ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER J WITH CIRCUMFLEX")
       (=ucs		  . #x0134)	; Ä´
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B48)	; &JX1-2A62; [11-40]
-      (=jis-x0213-1-2000  . #x2A62)	; &I-JX1-2A62; [10-66]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER J WITH CIRCUMFLEX")
       (=ucs		  . #x0134)	; Ä´
@@ -2121,16 +2117,16 @@
     (=jis-x0213-1-2000	. #x2A5C)	; &I-JX1-2A5C; [10-60]
     (=jef-china3	. #x86BD)	; &I-JC3-86BD;
     (=ucs@jis/fw	. #x0134)	; &JX1-2A5C;
+    (->lowercase
+     ((=jis-x0212	  . #x2B48)	; &JX1-2A62; [11-40]
+      (=jis-x0213-1-2000  . #x2A62)	; &I-JX1-2A62; [10-66]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER J WITH CIRCUMFLEX")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER J WITH CIRCUMFLEX")
-      (=ucs		  . #x0134)	; Ä´
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER J")
       (=ucs		  . #x006A)	; j
@@ -2140,16 +2136,16 @@
       ))
     (=ucs		. #x0135)	; ĵ
     (latin-iso8859-3	. #xBC)	; &I-LATIN3-3C;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER J WITH CIRCUMFLEX")
+      (=ucs		  . #x0134)	; Ä´
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER J WITH CIRCUMFLEX")
       (=ucs		  . #x0135)	; ĵ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A48)	; &JX1-2A5C; [10-40]
-      (=jis-x0213-1-2000  . #x2A5C)	; &I-JX1-2A5C; [10-60]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER J WITH CIRCUMFLEX")
       (=ucs		  . #x0135)	; ĵ
@@ -2165,16 +2161,16 @@
     (=jis-x0213-1-2000	. #x2A62)	; &I-JX1-2A62; [10-66]
     (=jef-china3	. #x86CA)	; &I-JC3-86CA;
     (=ucs@jis/fw	. #x0135)	; &JX1-2A62;
+    (->uppercase
+     ((=jis-x0212	  . #x2A48)	; &JX1-2A5C; [10-40]
+      (=jis-x0213-1-2000  . #x2A5C)	; &I-JX1-2A5C; [10-60]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER K WITH CEDILLA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER K WITH CEDILLA")
-      (=ucs		  . #x0137)	; Ä·
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER K")
       (=ucs		  . #x004B)	; K
@@ -2184,15 +2180,16 @@
       ))
     (=ucs		. #x0136)	; Ķ
     (latin-iso8859-4	. #xD3)	; &I-LATIN4-53;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER K WITH CEDILLA")
+      (=ucs		  . #x0137)	; Ä·
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER K WITH CEDILLA")
       (=ucs		  . #x0136)	; Ķ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B49)	; &JSP-2B49; [11-41]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER K WITH CEDILLA")
       (=ucs		  . #x0136)	; Ķ
@@ -2206,16 +2203,15 @@
       ))
     (=jis-x0212		. #x2A49)	; &JSP-2A49; [10-41]
     (=ucs@jis/fw	. #x0136)	; &JSP-2A49;
+    (->lowercase
+     ((=jis-x0212	  . #x2B49)	; &JSP-2B49; [11-41]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER K WITH CEDILLA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER K WITH CEDILLA")
-      (=ucs		  . #x0136)	; Ķ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER K")
       (=ucs		  . #x006B)	; k
@@ -2225,15 +2221,16 @@
       ))
     (=ucs		. #x0137)	; Ä·
     (latin-iso8859-4	. #xF3)	; &I-LATIN4-73;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER K WITH CEDILLA")
+      (=ucs		  . #x0136)	; Ķ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER K WITH CEDILLA")
       (=ucs		  . #x0137)	; Ä·
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A49)	; &JSP-2A49; [10-41]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER K WITH CEDILLA")
       (=ucs		  . #x0137)	; Ä·
@@ -2247,6 +2244,9 @@
       ))
     (=jis-x0212		. #x2B49)	; &JSP-2B49; [11-41]
     (=ucs@jis/fw	. #x0137)	; &JSP-2B49;
+    (->uppercase
+     ((=jis-x0212	  . #x2A49)	; &JSP-2A49; [10-41]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER KRA")
@@ -2275,10 +2275,6 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER L WITH ACUTE")
-      (=ucs		  . #x013A)	; ĺ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER L")
       (=ucs		  . #x004C)	; L
@@ -2288,16 +2284,16 @@
       ))
     (=ucs		. #x0139)	; Ĺ
     (latin-iso8859-2	. #xC5)	; &I-LATIN2-45;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER L WITH ACUTE")
+      (=ucs		  . #x013A)	; ĺ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER L WITH ACUTE")
       (=ucs		  . #x0139)	; Ĺ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B4A)	; &JX1-2A4A; [11-42]
-      (=jis-x0213-1-2000  . #x2A4A)	; &I-JX1-2A4A; [10-42]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER L WITH ACUTE")
       (=ucs		  . #x0139)	; Ĺ
@@ -2313,16 +2309,16 @@
     (=jis-x0213-1-2000	. #x2A3B)	; &I-JX1-2A3B; [10-27]
     (=jef-china3	. #x85DD)	; &I-JC3-85DD;
     (=ucs@jis/fw	. #x0139)	; &JX1-2A3B;
+    (->lowercase
+     ((=jis-x0212	  . #x2B4A)	; &JX1-2A4A; [11-42]
+      (=jis-x0213-1-2000  . #x2A4A)	; &I-JX1-2A4A; [10-42]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER L WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER L WITH ACUTE")
-      (=ucs		  . #x0139)	; Ĺ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER L")
       (=ucs		  . #x006C)	; l
@@ -2332,16 +2328,16 @@
       ))
     (=ucs		. #x013A)	; ĺ
     (latin-iso8859-2	. #xE5)	; &I-LATIN2-65;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER L WITH ACUTE")
+      (=ucs		  . #x0139)	; Ĺ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER L WITH ACUTE")
       (=ucs		  . #x013A)	; ĺ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A4A)	; &JX1-2A3B; [10-42]
-      (=jis-x0213-1-2000  . #x2A3B)	; &I-JX1-2A3B; [10-27]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER L WITH ACUTE")
       (=ucs		  . #x013A)	; ĺ
@@ -2357,16 +2353,16 @@
     (=jis-x0213-1-2000	. #x2A4A)	; &I-JX1-2A4A; [10-42]
     (=jef-china3	. #x85F3)	; &I-JC3-85F3;
     (=ucs@jis/fw	. #x013A)	; &JX1-2A4A;
+    (->uppercase
+     ((=jis-x0212	  . #x2A4A)	; &JX1-2A3B; [10-42]
+      (=jis-x0213-1-2000  . #x2A3B)	; &I-JX1-2A3B; [10-27]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER L WITH CEDILLA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER L WITH CEDILLA")
-      (=ucs		  . #x013C)	; ļ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER L")
       (=ucs		  . #x004C)	; L
@@ -2376,15 +2372,16 @@
       ))
     (=ucs		. #x013B)	; Ä»
     (latin-iso8859-4	. #xA6)	; &I-LATIN4-26;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER L WITH CEDILLA")
+      (=ucs		  . #x013C)	; ļ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER L WITH CEDILLA")
       (=ucs		  . #x013B)	; Ä»
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B4C)	; &JSP-2B4C; [11-44]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER L WITH CEDILLA")
       (=ucs		  . #x013B)	; Ä»
@@ -2399,16 +2396,15 @@
     (=jis-x0212		. #x2A4C)	; &JSP-2A4C; [10-44]
     (=jef-china3	. #x89F8)	; &I-JC3-89F8;
     (=ucs@jis/fw	. #x013B)	; &JSP-2A4C;
+    (->lowercase
+     ((=jis-x0212	  . #x2B4C)	; &JSP-2B4C; [11-44]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER L WITH CEDILLA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER L WITH CEDILLA")
-      (=ucs		  . #x013B)	; Ä»
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER L")
       (=ucs		  . #x006C)	; l
@@ -2418,15 +2414,16 @@
       ))
     (=ucs		. #x013C)	; ļ
     (latin-iso8859-4	. #xB6)	; &I-LATIN4-36;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER L WITH CEDILLA")
+      (=ucs		  . #x013B)	; Ä»
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER L WITH CEDILLA")
       (=ucs		  . #x013C)	; ļ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A4C)	; &JSP-2A4C; [10-44]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER L WITH CEDILLA")
       (=ucs		  . #x013C)	; ļ
@@ -2441,16 +2438,15 @@
     (=jis-x0212		. #x2B4C)	; &JSP-2B4C; [11-44]
     (=jef-china3	. #x89FE)	; &I-JC3-89FE;
     (=ucs@jis/fw	. #x013C)	; &JSP-2B4C;
+    (->uppercase
+     ((=jis-x0212	  . #x2A4C)	; &JSP-2A4C; [10-44]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER L WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER L WITH CARON")
-      (=ucs		  . #x013E)	; ľ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER L")
       (=ucs		  . #x004C)	; L
@@ -2460,16 +2456,16 @@
       ))
     (=ucs		. #x013D)	; Ľ
     (latin-iso8859-2	. #xA5)	; &I-LATIN2-25;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER L WITH CARON")
+      (=ucs		  . #x013E)	; ľ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER L WITH CARON")
       (=ucs		  . #x013D)	; Ľ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B4B)	; &JX1-2A2F; [11-43]
-      (=jis-x0213-1-2000  . #x2A2F)	; &I-JX1-2A2F; [10-15]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER L WITH CARON")
       (=ucs		  . #x013D)	; Ľ
@@ -2485,16 +2481,16 @@
     (=jis-x0213-1-2000	. #x2A24)	; &I-JX1-2A24; [10-04]
     (=jef-china3	. #x88E6)	; &I-JC3-88E6;
     (=ucs@jis/fw	. #x013D)	; &JX1-2A24;
+    (->lowercase
+     ((=jis-x0212	  . #x2B4B)	; &JX1-2A2F; [11-43]
+      (=jis-x0213-1-2000  . #x2A2F)	; &I-JX1-2A2F; [10-15]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER L WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER L WITH CARON")
-      (=ucs		  . #x013D)	; Ľ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER L")
       (=ucs		  . #x006C)	; l
@@ -2504,16 +2500,16 @@
       ))
     (=ucs		. #x013E)	; ľ
     (latin-iso8859-2	. #xB5)	; &I-LATIN2-35;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER L WITH CARON")
+      (=ucs		  . #x013D)	; Ľ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER L WITH CARON")
       (=ucs		  . #x013E)	; ľ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A4B)	; &JX1-2A24; [10-43]
-      (=jis-x0213-1-2000  . #x2A24)	; &I-JX1-2A24; [10-04]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER L WITH CARON")
       (=ucs		  . #x013E)	; ľ
@@ -2529,16 +2525,16 @@
     (=jis-x0213-1-2000	. #x2A2F)	; &I-JX1-2A2F; [10-15]
     (=jef-china3	. #x88F5)	; &I-JC3-88F5;
     (=ucs@jis/fw	. #x013E)	; &JX1-2A2F;
+    (->uppercase
+     ((=jis-x0212	  . #x2A4B)	; &JX1-2A24; [10-43]
+      (=jis-x0213-1-2000  . #x2A24)	; &I-JX1-2A24; [10-04]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER L WITH MIDDLE DOT")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER L WITH MIDDLE DOT")
-      (=ucs		  . #x0140)	; ŀ
-      ))
     (=>decomposition@compat
      ((name		  . "LATIN CAPITAL LETTER L")
       (=ucs		  . #x004C)	; L
@@ -2547,16 +2543,16 @@
       (=ucs		  . #x00B7)	; ·
       ))
     (=ucs		. #x013F)	; Ä¿
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER L WITH MIDDLE DOT")
+      (=ucs		  . #x0140)	; ŀ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER L WITH MIDDLE DOT")
       (=ucs		  . #x013F)	; Ä¿
       ))
-    (->lowercase
-     ((=ks-x1001	  . #x2928)	; &JSP-2949; [09-08]
-      (=jis-x0212	  . #x2949)	; &I-JSP-2949; [09-41]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER L WITH MIDDLE DOT")
       (=ucs		  . #x013F)	; Ä¿
@@ -2571,16 +2567,16 @@
     (=ks-x1001		. #x2828)	; &JSP-2929; [08-08]
     (=jis-x0212		. #x2929)	; &I-JSP-2929; [09-09]
     (=ucs@jis/fw	. #x013F)	; &JSP-2929;
+    (->lowercase
+     ((=ks-x1001	  . #x2928)	; &JSP-2949; [09-08]
+      (=jis-x0212	  . #x2949)	; &I-JSP-2949; [09-41]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER L WITH MIDDLE DOT")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER L WITH MIDDLE DOT")
-      (=ucs		  . #x013F)	; Ä¿
-      ))
     (=>decomposition@compat
      ((name		  . "LATIN SMALL LETTER L")
       (=ucs		  . #x006C)	; l
@@ -2589,16 +2585,16 @@
       (=ucs		  . #x00B7)	; ·
       ))
     (=ucs		. #x0140)	; ŀ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER L WITH MIDDLE DOT")
+      (=ucs		  . #x013F)	; Ä¿
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER L WITH MIDDLE DOT")
       (=ucs		  . #x0140)	; ŀ
       ))
-    (->uppercase
-     ((=ks-x1001	  . #x2828)	; &JSP-2929; [08-08]
-      (=jis-x0212	  . #x2929)	; &I-JSP-2929; [09-09]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER L WITH MIDDLE DOT")
       (=ucs		  . #x0140)	; ŀ
@@ -2613,29 +2609,28 @@
     (=ks-x1001		. #x2928)	; &JSP-2949; [09-08]
     (=jis-x0212		. #x2949)	; &I-JSP-2949; [09-41]
     (=ucs@jis/fw	. #x0140)	; &JSP-2949;
+    (->uppercase
+     ((=ks-x1001	  . #x2828)	; &JSP-2929; [08-08]
+      (=jis-x0212	  . #x2929)	; &I-JSP-2929; [09-09]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER L WITH STROKE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0141)	; Ł
+    (latin-iso8859-2	. #xA3)	; &I-LATIN2-23;
     (->lowercase
      ((name		  . "LATIN SMALL LETTER L WITH STROKE")
       (=ucs		  . #x0142)	; ł
       ))
-    (=ucs		. #x0141)	; Ł
-    (latin-iso8859-2	. #xA3)	; &I-LATIN2-23;
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER L WITH STROKE")
       (=ucs		  . #x0141)	; Ł
       ))
-    (->lowercase
-     ((=ks-x1001	  . #x2929)	; &JX1-2A2E; [09-09]
-      (=jis-x0212	  . #x2948)	; &I-JSP-2948; [09-40]
-      (=jis-x0213-1-2000  . #x2A2E)	; &I-JX1-2A2E; [10-14]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER L WITH STROKE")
       (=ucs		  . #x0141)	; Ł
@@ -2645,29 +2640,29 @@
     (=jis-x0213-1-2000	. #x2A23)	; &I-JX1-2A23; [10-03]
     (=jef-china3	. #x83A1)	; &I-JC3-83A1;
     (=ucs@jis/fw	. #x0141)	; &JX1-2A23;
+    (->lowercase
+     ((=ks-x1001	  . #x2929)	; &JX1-2A2E; [09-09]
+      (=jis-x0212	  . #x2948)	; &I-JSP-2948; [09-40]
+      (=jis-x0213-1-2000  . #x2A2E)	; &I-JX1-2A2E; [10-14]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER L WITH STROKE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0142)	; ł
+    (latin-iso8859-2	. #xB3)	; &I-LATIN2-33;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER L WITH STROKE")
       (=ucs		  . #x0141)	; Ł
       ))
-    (=ucs		. #x0142)	; ł
-    (latin-iso8859-2	. #xB3)	; &I-LATIN2-33;
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER L WITH STROKE")
       (=ucs		  . #x0142)	; ł
       ))
-    (->uppercase
-     ((=ks-x1001	  . #x2829)	; &JX1-2A23; [08-09]
-      (=jis-x0212	  . #x2928)	; &I-JSP-2928; [09-08]
-      (=jis-x0213-1-2000  . #x2A23)	; &I-JX1-2A23; [10-03]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER L WITH STROKE")
       (=ucs		  . #x0142)	; ł
@@ -2676,6 +2671,11 @@
     (=jis-x0212		. #x2948)	; &I-JSP-2948; [09-40]
     (=jis-x0213-1-2000	. #x2A2E)	; &I-JX1-2A2E; [10-14]
     (=ucs@jis/fw	. #x0142)	; &JX1-2A2E;
+    (->uppercase
+     ((=ks-x1001	  . #x2829)	; &JX1-2A23; [08-09]
+      (=jis-x0212	  . #x2928)	; &I-JSP-2928; [09-08]
+      (=jis-x0213-1-2000  . #x2A23)	; &I-JX1-2A23; [10-03]
+      ))
     ))
 (define-char
   '((<-denotational
@@ -2690,10 +2690,6 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER N WITH ACUTE")
-      (=ucs		  . #x0144)	; ń
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER N")
       (=ucs		  . #x004E)	; N
@@ -2703,16 +2699,16 @@
       ))
     (=ucs		. #x0143)	; Ń
     (latin-iso8859-2	. #xD1)	; &I-LATIN2-51;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER N WITH ACUTE")
+      (=ucs		  . #x0144)	; ń
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER N WITH ACUTE")
       (=ucs		  . #x0143)	; Ń
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B4D)	; &JX1-2A51; [11-45]
-      (=jis-x0213-1-2000  . #x2A51)	; &I-JX1-2A51; [10-49]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER N WITH ACUTE")
       (=ucs		  . #x0143)	; Ń
@@ -2728,16 +2724,16 @@
     (=jis-x0213-1-2000	. #x2A41)	; &I-JX1-2A41; [10-33]
     (=jef-china3	. #x85DF)	; &I-JC3-85DF;
     (=ucs@jis/fw	. #x0143)	; &JX1-2A41;
+    (->lowercase
+     ((=jis-x0212	  . #x2B4D)	; &JX1-2A51; [11-45]
+      (=jis-x0213-1-2000  . #x2A51)	; &I-JX1-2A51; [10-49]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER N WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER N WITH ACUTE")
-      (=ucs		  . #x0143)	; Ń
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER N")
       (=ucs		  . #x006E)	; n
@@ -2747,16 +2743,16 @@
       ))
     (=ucs		. #x0144)	; ń
     (latin-iso8859-2	. #xF1)	; &I-LATIN2-71;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER N WITH ACUTE")
+      (=ucs		  . #x0143)	; Ń
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER N WITH ACUTE")
       (=ucs		  . #x0144)	; ń
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A4D)	; &JX1-2A41; [10-45]
-      (=jis-x0213-1-2000  . #x2A41)	; &I-JX1-2A41; [10-33]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER N WITH ACUTE")
       (=ucs		  . #x0144)	; ń
@@ -2772,16 +2768,16 @@
     (=jis-x0213-1-2000	. #x2A51)	; &I-JX1-2A51; [10-49]
     (=jef-china3	. #x85F5)	; &I-JC3-85F5;
     (=ucs@jis/fw	. #x0144)	; &JX1-2A51;
+    (->uppercase
+     ((=jis-x0212	  . #x2A4D)	; &JX1-2A41; [10-45]
+      (=jis-x0213-1-2000  . #x2A41)	; &I-JX1-2A41; [10-33]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER N WITH CEDILLA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER N WITH CEDILLA")
-      (=ucs		  . #x0146)	; ņ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER N")
       (=ucs		  . #x004E)	; N
@@ -2791,15 +2787,16 @@
       ))
     (=ucs		. #x0145)	; Ņ
     (latin-iso8859-4	. #xD1)	; &I-LATIN4-51;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER N WITH CEDILLA")
+      (=ucs		  . #x0146)	; ņ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER N WITH CEDILLA")
       (=ucs		  . #x0145)	; Ņ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B4F)	; &JSP-2B4F; [11-47]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER N WITH CEDILLA")
       (=ucs		  . #x0145)	; Ņ
@@ -2814,16 +2811,15 @@
     (=jis-x0212		. #x2A4F)	; &JSP-2A4F; [10-47]
     (=jef-china3	. #x89F9)	; &I-JC3-89F9;
     (=ucs@jis/fw	. #x0145)	; &JSP-2A4F;
+    (->lowercase
+     ((=jis-x0212	  . #x2B4F)	; &JSP-2B4F; [11-47]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER N WITH CEDILLA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER N WITH CEDILLA")
-      (=ucs		  . #x0145)	; Ņ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER N")
       (=ucs		  . #x006E)	; n
@@ -2833,15 +2829,16 @@
       ))
     (=ucs		. #x0146)	; ņ
     (latin-iso8859-4	. #xF1)	; &I-LATIN4-71;
-    ))
-(define-char
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER N WITH CEDILLA")
+      (=ucs		  . #x0145)	; Ņ
+      ))
+    ))
+(define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER N WITH CEDILLA")
       (=ucs		  . #x0146)	; ņ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A4F)	; &JSP-2A4F; [10-47]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER N WITH CEDILLA")
       (=ucs		  . #x0146)	; ņ
@@ -2856,16 +2853,15 @@
     (=jis-x0212		. #x2B4F)	; &JSP-2B4F; [11-47]
     (=jef-china3	. #x8AA1)	; &I-JC3-8AA1;
     (=ucs@jis/fw	. #x0146)	; &JSP-2B4F;
+    (->uppercase
+     ((=jis-x0212	  . #x2A4F)	; &JSP-2A4F; [10-47]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER N WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER N WITH CARON")
-      (=ucs		  . #x0148)	; ň
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER N")
       (=ucs		  . #x004E)	; N
@@ -2875,16 +2871,16 @@
       ))
     (=ucs		. #x0147)	; Ň
     (latin-iso8859-2	. #xD2)	; &I-LATIN2-52;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER N WITH CARON")
+      (=ucs		  . #x0148)	; ň
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER N WITH CARON")
       (=ucs		  . #x0147)	; Ň
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B4E)	; &JX1-2A52; [11-46]
-      (=jis-x0213-1-2000  . #x2A52)	; &I-JX1-2A52; [10-50]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER N WITH CARON")
       (=ucs		  . #x0147)	; Ň
@@ -2900,16 +2896,16 @@
     (=jis-x0213-1-2000	. #x2A42)	; &I-JX1-2A42; [10-34]
     (=jef-china3	. #x88E7)	; &I-JC3-88E7;
     (=ucs@jis/fw	. #x0147)	; &JX1-2A42;
+    (->lowercase
+     ((=jis-x0212	  . #x2B4E)	; &JX1-2A52; [11-46]
+      (=jis-x0213-1-2000  . #x2A52)	; &I-JX1-2A52; [10-50]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER N WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER N WITH CARON")
-      (=ucs		  . #x0147)	; Ň
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER N")
       (=ucs		  . #x006E)	; n
@@ -2919,16 +2915,16 @@
       ))
     (=ucs		. #x0148)	; ň
     (latin-iso8859-2	. #xF2)	; &I-LATIN2-72;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER N WITH CARON")
+      (=ucs		  . #x0147)	; Ň
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER N WITH CARON")
       (=ucs		  . #x0148)	; ň
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A4E)	; &JX1-2A42; [10-46]
-      (=jis-x0213-1-2000  . #x2A42)	; &I-JX1-2A42; [10-34]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER N WITH CARON")
       (=ucs		  . #x0148)	; ň
@@ -2944,6 +2940,10 @@
     (=jis-x0213-1-2000	. #x2A52)	; &I-JX1-2A52; [10-50]
     (=jef-china3	. #x88F6)	; &I-JC3-88F6;
     (=ucs@jis/fw	. #x0148)	; &JX1-2A52;
+    (->uppercase
+     ((=jis-x0212	  . #x2A4E)	; &JX1-2A42; [10-46]
+      (=jis-x0213-1-2000  . #x2A42)	; &I-JX1-2A42; [10-34]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER N PRECEDED BY APOSTROPHE")
@@ -2985,23 +2985,18 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Sami")
+    (=ucs		. #x014A)	; Ŋ
+    (latin-iso8859-4	. #xBD)	; &I-LATIN4-3D;
     (->lowercase
      ((name		  . "LATIN SMALL LETTER ENG")
       (=ucs		  . #x014B)	; ŋ
       ))
-    (=ucs		. #x014A)	; Ŋ
-    (latin-iso8859-4	. #xBD)	; &I-LATIN4-3D;
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER ENG")
       (=ucs		  . #x014A)	; Ŋ
       ))
-    (->lowercase
-     ((=ks-x1001	  . #x292F)	; &JX1-2A7A; [09-15]
-      (=jis-x0212	  . #x294B)	; &I-JSP-294B; [09-43]
-      (=jis-x0213-1-2000  . #x2A7A)	; &I-JX1-2A7A; [10-90]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER ENG")
       (=ucs		  . #x014A)	; Ŋ
@@ -3009,6 +3004,11 @@
     (=ks-x1001		. #x282F)	; &JSP-292B; [08-15]
     (=jis-x0212		. #x292B)	; &I-JSP-292B; [09-11]
     (=ucs@jis/fw	. #x014A)	; &JSP-292B;
+    (->lowercase
+     ((=ks-x1001	  . #x292F)	; &JX1-2A7A; [09-15]
+      (=jis-x0212	  . #x294B)	; &I-JSP-294B; [09-43]
+      (=jis-x0213-1-2000  . #x2A7A)	; &I-JX1-2A7A; [10-90]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER ENG")
@@ -3016,23 +3016,19 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Sami")
+    (=ucs		. #x014B)	; ŋ
+    (latin-iso8859-4	. #xBF)	; &I-LATIN4-3F;
+    (ipa		. #xD5)	; &I-MULE-IPA-55;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER ENG")
       (=ucs		  . #x014A)	; Ŋ
       ))
-    (=ucs		. #x014B)	; ŋ
-    (latin-iso8859-4	. #xBF)	; &I-LATIN4-3F;
-    (ipa		. #xD5)	; &I-MULE-IPA-55;
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER ENG")
       (=ucs		  . #x014B)	; ŋ
       ))
-    (->uppercase
-     ((=ks-x1001	  . #x282F)	; &JSP-292B; [08-15]
-      (=jis-x0212	  . #x292B)	; &I-JSP-292B; [09-11]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER ENG")
       (=ucs		  . #x014B)	; ŋ
@@ -3041,16 +3037,16 @@
     (=jis-x0212		. #x294B)	; &I-JSP-294B; [09-43]
     (=jis-x0213-1-2000	. #x2A7A)	; &I-JX1-2A7A; [10-90]
     (=ucs@jis/fw	. #x014B)	; &JX1-2A7A;
+    (->uppercase
+     ((=ks-x1001	  . #x282F)	; &JSP-292B; [08-15]
+      (=jis-x0212	  . #x292B)	; &I-JSP-292B; [09-11]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH MACRON")
-      (=ucs		  . #x014D)	; ō
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
@@ -3060,17 +3056,16 @@
       ))
     (=ucs		. #x014C)	; Ō
     (latin-iso8859-4	. #xD2)	; &I-LATIN4-52;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH MACRON")
+      (=ucs		  . #x014D)	; ō
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER O WITH MACRON")
       (=ucs		  . #x014C)	; Ō
       ))
-    (->lowercase
-     ((=gb2312		  . #x282D)	; &JX1-297E; [08-13]
-      (=jis-x0212	  . #x2B57)	; &I-JSP-2B57; [11-55]
-      (=jis-x0213-1-2000  . #x297E)	; &I-JX1-297E; [09-94]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER O WITH MACRON")
       (=ucs		  . #x014C)	; Ō
@@ -3086,16 +3081,17 @@
     (=jis-x0213-1-2000	. #x2979)	; &I-JX1-2979; [09-89]
     (=jef-china3	. #x87B3)	; &I-JC3-87B3;
     (=ucs@jis/fw	. #x014C)	; &JX1-2979;
+    (->lowercase
+     ((=gb2312		  . #x282D)	; &JX1-297E; [08-13]
+      (=jis-x0212	  . #x2B57)	; &I-JSP-2B57; [11-55]
+      (=jis-x0213-1-2000  . #x297E)	; &I-JX1-297E; [09-94]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH MACRON")
-      (=ucs		  . #x014C)	; Ō
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
@@ -3105,16 +3101,16 @@
       ))
     (=ucs		. #x014D)	; ō
     (latin-iso8859-4	. #xF2)	; &I-LATIN4-72;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH MACRON")
+      (=ucs		  . #x014C)	; Ō
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER O WITH MACRON")
       (=ucs		  . #x014D)	; ō
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A57)	; &JX1-2979; [10-55]
-      (=jis-x0213-1-2000  . #x2979)	; &I-JX1-2979; [09-89]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER O WITH MACRON")
       (=ucs		  . #x014D)	; ō
@@ -3132,16 +3128,16 @@
     (=jef-china3	. #x87C7)	; &I-JC3-87C7;
     (=ucs@gb/fw		. #x014D)	; &JX1-297E;
     (=ucs@jis/fw	. #x014D)	; &JX1-297E;
+    (->uppercase
+     ((=jis-x0212	  . #x2A57)	; &JX1-2979; [10-55]
+      (=jis-x0213-1-2000  . #x2979)	; &I-JX1-2979; [09-89]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH BREVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH BREVE")
-      (=ucs		  . #x014F)	; ŏ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
@@ -3150,16 +3146,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x014E)	; Ŏ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH BREVE")
+      (=ucs		  . #x014F)	; ŏ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH BREVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH BREVE")
-      (=ucs		  . #x014E)	; Ŏ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
@@ -3168,16 +3164,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x014F)	; ŏ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH BREVE")
+      (=ucs		  . #x014E)	; Ŏ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH DOUBLE ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH DOUBLE ACUTE")
-      (=ucs		  . #x0151)	; ő
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
@@ -3187,16 +3183,16 @@
       ))
     (=ucs		. #x0150)	; Ő
     (latin-iso8859-2	. #xD5)	; &I-LATIN2-55;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH DOUBLE ACUTE")
+      (=ucs		  . #x0151)	; ő
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER O WITH DOUBLE ACUTE")
       (=ucs		  . #x0150)	; Ő
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B56)	; &JX1-2A53; [11-54]
-      (=jis-x0213-1-2000  . #x2A53)	; &I-JX1-2A53; [10-51]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER O WITH DOUBLE ACUTE")
       (=ucs		  . #x0150)	; Ő
@@ -3212,16 +3208,16 @@
     (=jis-x0213-1-2000	. #x2A43)	; &I-JX1-2A43; [10-35]
     (=jef-china3	. #x89E2)	; &I-JC3-89E2;
     (=ucs@jis/fw	. #x0150)	; &JX1-2A43;
+    (->lowercase
+     ((=jis-x0212	  . #x2B56)	; &JX1-2A53; [11-54]
+      (=jis-x0213-1-2000  . #x2A53)	; &I-JX1-2A53; [10-51]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH DOUBLE ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH DOUBLE ACUTE")
-      (=ucs		  . #x0150)	; Ő
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
@@ -3231,16 +3227,16 @@
       ))
     (=ucs		. #x0151)	; ő
     (latin-iso8859-2	. #xF5)	; &I-LATIN2-75;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH DOUBLE ACUTE")
+      (=ucs		  . #x0150)	; Ő
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER O WITH DOUBLE ACUTE")
       (=ucs		  . #x0151)	; ő
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A56)	; &JX1-2A43; [10-54]
-      (=jis-x0213-1-2000  . #x2A43)	; &I-JX1-2A43; [10-35]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER O WITH DOUBLE ACUTE")
       (=ucs		  . #x0151)	; ő
@@ -3256,28 +3252,27 @@
     (=jis-x0213-1-2000	. #x2A53)	; &I-JX1-2A53; [10-51]
     (=jef-china3	. #x89E5)	; &I-JC3-89E5;
     (=ucs@jis/fw	. #x0151)	; &JX1-2A53;
+    (->uppercase
+     ((=jis-x0212	  . #x2A56)	; &JX1-2A43; [10-54]
+      (=jis-x0213-1-2000  . #x2A43)	; &I-JX1-2A43; [10-35]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LIGATURE OE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0152)	; Œ
     (->lowercase
      ((name		  . "LATIN SMALL LIGATURE OE")
       (=ucs		  . #x0153)	; œ
       ))
-    (=ucs		. #x0152)	; Œ
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LIGATURE OE")
       (=ucs		  . #x0152)	; Œ
       ))
-    (->lowercase
-     ((=ks-x1001	  . #x292B)	; &JX1-2B2A; [09-11]
-      (=jis-x0212	  . #x294D)	; &I-JSP-294D; [09-45]
-      (=jis-x0213-1-2000  . #x2B2A)	; &I-JX1-2B2A; [11-10]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LIGATURE OE")
       (=ucs		  . #x0152)	; Œ
@@ -3287,29 +3282,29 @@
     (=jis-x0213-1-2000	. #x2B2B)	; &I-JX1-2B2B; [11-11]
     (=jef-china3	. #x83A6)	; &I-JC3-83A6;
     (=ucs@jis		. #x0152)	; &JX1-2B2B;
+    (->lowercase
+     ((=ks-x1001	  . #x292B)	; &JX1-2B2A; [09-11]
+      (=jis-x0212	  . #x294D)	; &I-JSP-294D; [09-45]
+      (=jis-x0213-1-2000  . #x2B2A)	; &I-JX1-2B2A; [11-10]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LIGATURE OE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0153)	; œ
+    (ipa		. #xB0)	; &I-MULE-IPA-30;
     (->uppercase
      ((name		  . "LATIN CAPITAL LIGATURE OE")
       (=ucs		  . #x0152)	; Œ
       ))
-    (=ucs		. #x0153)	; œ
-    (ipa		. #xB0)	; &I-MULE-IPA-30;
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LIGATURE OE")
       (=ucs		  . #x0153)	; œ
       ))
-    (->uppercase
-     ((=ks-x1001	  . #x282B)	; &JX1-2B2B; [08-11]
-      (=jis-x0212	  . #x292D)	; &I-JSP-292D; [09-13]
-      (=jis-x0213-1-2000  . #x2B2B)	; &I-JX1-2B2B; [11-11]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LIGATURE OE")
       (=ucs		  . #x0153)	; œ
@@ -3319,16 +3314,17 @@
     (=jis-x0213-1-2000	. #x2B2A)	; &I-JX1-2B2A; [11-10]
     (=jef-china3	. #x83B1)	; &I-JC3-83B1;
     (=ucs@jis		. #x0153)	; &JX1-2B2A;
+    (->uppercase
+     ((=ks-x1001	  . #x282B)	; &JX1-2B2B; [08-11]
+      (=jis-x0212	  . #x292D)	; &I-JSP-292D; [09-13]
+      (=jis-x0213-1-2000  . #x2B2B)	; &I-JX1-2B2B; [11-11]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER R WITH ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER R WITH ACUTE")
-      (=ucs		  . #x0155)	; ŕ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER R")
       (=ucs		  . #x0052)	; R
@@ -3338,16 +3334,16 @@
       ))
     (=ucs		. #x0154)	; Ŕ
     (latin-iso8859-2	. #xC0)	; &I-LATIN2-40;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER R WITH ACUTE")
+      (=ucs		  . #x0155)	; ŕ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER R WITH ACUTE")
       (=ucs		  . #x0154)	; Ŕ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B59)	; &JX1-2A48; [11-57]
-      (=jis-x0213-1-2000  . #x2A48)	; &I-JX1-2A48; [10-40]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER R WITH ACUTE")
       (=ucs		  . #x0154)	; Ŕ
@@ -3363,16 +3359,16 @@
     (=jis-x0213-1-2000	. #x2A39)	; &I-JX1-2A39; [10-25]
     (=jef-china3	. #x85E3)	; &I-JC3-85E3;
     (=ucs@jis/fw	. #x0154)	; &JX1-2A39;
+    (->lowercase
+     ((=jis-x0212	  . #x2B59)	; &JX1-2A48; [11-57]
+      (=jis-x0213-1-2000  . #x2A48)	; &I-JX1-2A48; [10-40]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER R WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER R WITH ACUTE")
-      (=ucs		  . #x0154)	; Ŕ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER R")
       (=ucs		  . #x0072)	; r
@@ -3382,16 +3378,16 @@
       ))
     (=ucs		. #x0155)	; ŕ
     (latin-iso8859-2	. #xE0)	; &I-LATIN2-60;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER R WITH ACUTE")
+      (=ucs		  . #x0154)	; Ŕ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER R WITH ACUTE")
       (=ucs		  . #x0155)	; ŕ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A59)	; &JX1-2A39; [10-57]
-      (=jis-x0213-1-2000  . #x2A39)	; &I-JX1-2A39; [10-25]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER R WITH ACUTE")
       (=ucs		  . #x0155)	; ŕ
@@ -3407,16 +3403,16 @@
     (=jis-x0213-1-2000	. #x2A48)	; &I-JX1-2A48; [10-40]
     (=jef-china3	. #x85F9)	; &I-JC3-85F9;
     (=ucs@jis/fw	. #x0155)	; &JX1-2A48;
+    (->uppercase
+     ((=jis-x0212	  . #x2A59)	; &JX1-2A39; [10-57]
+      (=jis-x0213-1-2000  . #x2A39)	; &I-JX1-2A39; [10-25]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER R WITH CEDILLA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER R WITH CEDILLA")
-      (=ucs		  . #x0157)	; ŗ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER R")
       (=ucs		  . #x0052)	; R
@@ -3426,15 +3422,16 @@
       ))
     (=ucs		. #x0156)	; Ŗ
     (latin-iso8859-4	. #xA3)	; &I-LATIN4-23;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER R WITH CEDILLA")
+      (=ucs		  . #x0157)	; ŗ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER R WITH CEDILLA")
       (=ucs		  . #x0156)	; Ŗ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B5B)	; &JSP-2B5B; [11-59]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER R WITH CEDILLA")
       (=ucs		  . #x0156)	; Ŗ
@@ -3448,16 +3445,15 @@
       ))
     (=jis-x0212		. #x2A5B)	; &JSP-2A5B; [10-59]
     (=ucs@jis/fw	. #x0156)	; &JSP-2A5B;
+    (->lowercase
+     ((=jis-x0212	  . #x2B5B)	; &JSP-2B5B; [11-59]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER R WITH CEDILLA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER R WITH CEDILLA")
-      (=ucs		  . #x0156)	; Ŗ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER R")
       (=ucs		  . #x0072)	; r
@@ -3467,15 +3463,16 @@
       ))
     (=ucs		. #x0157)	; ŗ
     (latin-iso8859-4	. #xB3)	; &I-LATIN4-33;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER R WITH CEDILLA")
+      (=ucs		  . #x0156)	; Ŗ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER R WITH CEDILLA")
       (=ucs		  . #x0157)	; ŗ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A5B)	; &JSP-2A5B; [10-59]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER R WITH CEDILLA")
       (=ucs		  . #x0157)	; ŗ
@@ -3489,16 +3486,15 @@
       ))
     (=jis-x0212		. #x2B5B)	; &JSP-2B5B; [11-59]
     (=ucs@jis/fw	. #x0157)	; &JSP-2B5B;
+    (->uppercase
+     ((=jis-x0212	  . #x2A5B)	; &JSP-2A5B; [10-59]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER R WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER R WITH CARON")
-      (=ucs		  . #x0159)	; ř
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER R")
       (=ucs		  . #x0052)	; R
@@ -3508,16 +3504,16 @@
       ))
     (=ucs		. #x0158)	; Ř
     (latin-iso8859-2	. #xD8)	; &I-LATIN2-58;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER R WITH CARON")
+      (=ucs		  . #x0159)	; ř
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER R WITH CARON")
       (=ucs		  . #x0158)	; Ř
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B5A)	; &JX1-2A54; [11-58]
-      (=jis-x0213-1-2000  . #x2A54)	; &I-JX1-2A54; [10-52]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER R WITH CARON")
       (=ucs		  . #x0158)	; Ř
@@ -3533,16 +3529,16 @@
     (=jis-x0213-1-2000	. #x2A44)	; &I-JX1-2A44; [10-36]
     (=jef-china3	. #x88E9)	; &I-JC3-88E9;
     (=ucs@jis/fw	. #x0158)	; &JX1-2A44;
+    (->lowercase
+     ((=jis-x0212	  . #x2B5A)	; &JX1-2A54; [11-58]
+      (=jis-x0213-1-2000  . #x2A54)	; &I-JX1-2A54; [10-52]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER R WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER R WITH CARON")
-      (=ucs		  . #x0158)	; Ř
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER R")
       (=ucs		  . #x0072)	; r
@@ -3552,16 +3548,16 @@
       ))
     (=ucs		. #x0159)	; ř
     (latin-iso8859-2	. #xF8)	; &I-LATIN2-78;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER R WITH CARON")
+      (=ucs		  . #x0158)	; Ř
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER R WITH CARON")
       (=ucs		  . #x0159)	; ř
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A5A)	; &JX1-2A44; [10-58]
-      (=jis-x0213-1-2000  . #x2A44)	; &I-JX1-2A44; [10-36]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER R WITH CARON")
       (=ucs		  . #x0159)	; ř
@@ -3577,16 +3573,16 @@
     (=jis-x0213-1-2000	. #x2A54)	; &I-JX1-2A54; [10-52]
     (=jef-china3	. #x88F8)	; &I-JC3-88F8;
     (=ucs@jis/fw	. #x0159)	; &JX1-2A54;
+    (->uppercase
+     ((=jis-x0212	  . #x2A5A)	; &JX1-2A44; [10-58]
+      (=jis-x0213-1-2000  . #x2A44)	; &I-JX1-2A44; [10-36]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER S WITH ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER S WITH ACUTE")
-      (=ucs		  . #x015B)	; ś
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER S")
       (=ucs		  . #x0053)	; S
@@ -3596,16 +3592,16 @@
       ))
     (=ucs		. #x015A)	; Ś
     (latin-iso8859-2	. #xA6)	; &I-LATIN2-26;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER S WITH ACUTE")
+      (=ucs		  . #x015B)	; ś
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER S WITH ACUTE")
       (=ucs		  . #x015A)	; Ś
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B5C)	; &JX1-2A30; [11-60]
-      (=jis-x0213-1-2000  . #x2A30)	; &I-JX1-2A30; [10-16]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER S WITH ACUTE")
       (=ucs		  . #x015A)	; Ś
@@ -3621,16 +3617,16 @@
     (=jis-x0213-1-2000	. #x2A25)	; &I-JX1-2A25; [10-05]
     (=jef-china3	. #x85E4)	; &I-JC3-85E4;
     (=ucs@jis/fw	. #x015A)	; &JX1-2A25;
+    (->lowercase
+     ((=jis-x0212	  . #x2B5C)	; &JX1-2A30; [11-60]
+      (=jis-x0213-1-2000  . #x2A30)	; &I-JX1-2A30; [10-16]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER S WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER S WITH ACUTE")
-      (=ucs		  . #x015A)	; Ś
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER S")
       (=ucs		  . #x0073)	; s
@@ -3640,16 +3636,16 @@
       ))
     (=ucs		. #x015B)	; ś
     (latin-iso8859-2	. #xB6)	; &I-LATIN2-36;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER S WITH ACUTE")
+      (=ucs		  . #x015A)	; Ś
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER S WITH ACUTE")
       (=ucs		  . #x015B)	; ś
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A5C)	; &JX1-2A25; [10-60]
-      (=jis-x0213-1-2000  . #x2A25)	; &I-JX1-2A25; [10-05]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER S WITH ACUTE")
       (=ucs		  . #x015B)	; ś
@@ -3665,16 +3661,16 @@
     (=jis-x0213-1-2000	. #x2A30)	; &I-JX1-2A30; [10-16]
     (=jef-china3	. #x85FA)	; &I-JC3-85FA;
     (=ucs@jis/fw	. #x015B)	; &JX1-2A30;
+    (->uppercase
+     ((=jis-x0212	  . #x2A5C)	; &JX1-2A25; [10-60]
+      (=jis-x0213-1-2000  . #x2A25)	; &I-JX1-2A25; [10-05]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER S WITH CIRCUMFLEX")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER S WITH CIRCUMFLEX")
-      (=ucs		  . #x015D)	; ŝ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER S")
       (=ucs		  . #x0053)	; S
@@ -3684,16 +3680,16 @@
       ))
     (=ucs		. #x015C)	; Ŝ
     (latin-iso8859-3	. #xDE)	; &I-LATIN3-5E;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER S WITH CIRCUMFLEX")
+      (=ucs		  . #x015D)	; ŝ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER S WITH CIRCUMFLEX")
       (=ucs		  . #x015C)	; Ŝ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B5D)	; &JX1-2A63; [11-61]
-      (=jis-x0213-1-2000  . #x2A63)	; &I-JX1-2A63; [10-67]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER S WITH CIRCUMFLEX")
       (=ucs		  . #x015C)	; Ŝ
@@ -3709,16 +3705,16 @@
     (=jis-x0213-1-2000	. #x2A5D)	; &I-JX1-2A5D; [10-61]
     (=jef-china3	. #x86C0)	; &I-JC3-86C0;
     (=ucs@jis/fw	. #x015C)	; &JX1-2A5D;
+    (->lowercase
+     ((=jis-x0212	  . #x2B5D)	; &JX1-2A63; [11-61]
+      (=jis-x0213-1-2000  . #x2A63)	; &I-JX1-2A63; [10-67]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER S WITH CIRCUMFLEX")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER S WITH CIRCUMFLEX")
-      (=ucs		  . #x015C)	; Ŝ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER S")
       (=ucs		  . #x0073)	; s
@@ -3728,16 +3724,16 @@
       ))
     (=ucs		. #x015D)	; ŝ
     (latin-iso8859-3	. #xFE)	; &I-LATIN3-7E;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER S WITH CIRCUMFLEX")
+      (=ucs		  . #x015C)	; Ŝ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER S WITH CIRCUMFLEX")
       (=ucs		  . #x015D)	; ŝ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A5D)	; &JX1-2A5D; [10-61]
-      (=jis-x0213-1-2000  . #x2A5D)	; &I-JX1-2A5D; [10-61]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER S WITH CIRCUMFLEX")
       (=ucs		  . #x015D)	; ŝ
@@ -3753,16 +3749,16 @@
     (=jis-x0213-1-2000	. #x2A63)	; &I-JX1-2A63; [10-67]
     (=jef-china3	. #x86CD)	; &I-JC3-86CD;
     (=ucs@jis/fw	. #x015D)	; &JX1-2A63;
+    (->uppercase
+     ((=jis-x0212	  . #x2A5D)	; &JX1-2A5D; [10-61]
+      (=jis-x0213-1-2000  . #x2A5D)	; &I-JX1-2A5D; [10-61]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER S WITH CEDILLA")
     (general-category	letter uppercase) ; Normative Category
-    (bidi-category	. "L")
-    (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER S WITH CEDILLA")
-      (=ucs		  . #x015F)	; ş
-      ))
+    (bidi-category	. "L")
+    (mirrored		. nil)
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER S")
       (=ucs		  . #x0053)	; S
@@ -3774,16 +3770,16 @@
     (latin-iso8859-2	. #xAA)	; &I-LATIN2-2A;
     (latin-iso8859-3	. #xAA)	; &I-LATIN3-2A;
     (latin-iso8859-9	. #xDE)	; &I-LATIN5-5E;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER S WITH CEDILLA")
+      (=ucs		  . #x015F)	; ş
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER S WITH CEDILLA")
       (=ucs		  . #x015E)	; Ş
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B5F)	; &JX1-2A33; [11-63]
-      (=jis-x0213-1-2000  . #x2A33)	; &I-JX1-2A33; [10-19]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER S WITH CEDILLA")
       (=ucs		  . #x015E)	; Ş
@@ -3798,6 +3794,10 @@
     (=jis-x0212		. #x2A5F)	; &JX1-2A27; [10-63]
     (=jis-x0213-1-2000	. #x2A27)	; &I-JX1-2A27; [10-07]
     (=ucs@jis/fw	. #x015E)	; &JX1-2A27;
+    (->lowercase
+     ((=jis-x0212	  . #x2B5F)	; &JX1-2A33; [11-63]
+      (=jis-x0213-1-2000  . #x2A33)	; &I-JX1-2A33; [10-19]
+      ))
     (->subsumptive
      ((=jef-china3	  . #x89FA)	; &JC3-89FA;
       )
@@ -3809,10 +3809,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER S WITH CEDILLA")
-      (=ucs		  . #x015E)	; Ş
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER S")
       (=ucs		  . #x0073)	; s
@@ -3824,16 +3820,16 @@
     (latin-iso8859-2	. #xBA)	; &I-LATIN2-3A;
     (latin-iso8859-3	. #xBA)	; &I-LATIN3-3A;
     (latin-iso8859-9	. #xFE)	; &I-LATIN5-7E;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER S WITH CEDILLA")
+      (=ucs		  . #x015E)	; Ş
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER S WITH CEDILLA")
       (=ucs		  . #x015F)	; ş
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A5F)	; &JX1-2A27; [10-63]
-      (=jis-x0213-1-2000  . #x2A27)	; &I-JX1-2A27; [10-07]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER S WITH CEDILLA")
       (=ucs		  . #x015F)	; ş
@@ -3849,16 +3845,16 @@
     (=jis-x0213-1-2000	. #x2A33)	; &I-JX1-2A33; [10-19]
     (=jef-china3	. #x8AA2)	; &I-JC3-8AA2;
     (=ucs@jis/fw	. #x015F)	; &JX1-2A33;
+    (->uppercase
+     ((=jis-x0212	  . #x2A5F)	; &JX1-2A27; [10-63]
+      (=jis-x0213-1-2000  . #x2A27)	; &I-JX1-2A27; [10-07]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER S WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER S WITH CARON")
-      (=ucs		  . #x0161)	; Å¡
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER S")
       (=ucs		  . #x0053)	; S
@@ -3869,16 +3865,16 @@
     (=ucs		. #x0160)	; Å 
     (latin-iso8859-2	. #xA9)	; &I-LATIN2-29;
     (latin-iso8859-4	. #xA9)	; &I-LATIN4-29;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER S WITH CARON")
+      (=ucs		  . #x0161)	; Å¡
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER S WITH CARON")
       (=ucs		  . #x0160)	; Å 
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B5E)	; &JX1-2A32; [11-62]
-      (=jis-x0213-1-2000  . #x2A32)	; &I-JX1-2A32; [10-18]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER S WITH CARON")
       (=ucs		  . #x0160)	; Å 
@@ -3894,16 +3890,16 @@
     (=jis-x0213-1-2000	. #x2A26)	; &I-JX1-2A26; [10-06]
     (=jef-china3	. #x88EA)	; &I-JC3-88EA;
     (=ucs@jis/fw	. #x0160)	; &JX1-2A26;
+    (->lowercase
+     ((=jis-x0212	  . #x2B5E)	; &JX1-2A32; [11-62]
+      (=jis-x0213-1-2000  . #x2A32)	; &I-JX1-2A32; [10-18]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER S WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER S WITH CARON")
-      (=ucs		  . #x0160)	; Å 
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER S")
       (=ucs		  . #x0073)	; s
@@ -3914,16 +3910,16 @@
     (=ucs		. #x0161)	; Å¡
     (latin-iso8859-2	. #xB9)	; &I-LATIN2-39;
     (latin-iso8859-4	. #xB9)	; &I-LATIN4-39;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER S WITH CARON")
+      (=ucs		  . #x0160)	; Å 
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER S WITH CARON")
       (=ucs		  . #x0161)	; Å¡
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A5E)	; &JX1-2A26; [10-62]
-      (=jis-x0213-1-2000  . #x2A26)	; &I-JX1-2A26; [10-06]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER S WITH CARON")
       (=ucs		  . #x0161)	; Å¡
@@ -3939,16 +3935,16 @@
     (=jis-x0213-1-2000	. #x2A32)	; &I-JX1-2A32; [10-18]
     (=jef-china3	. #x88F9)	; &I-JC3-88F9;
     (=ucs@jis/fw	. #x0161)	; &JX1-2A32;
+    (->uppercase
+     ((=jis-x0212	  . #x2A5E)	; &JX1-2A26; [10-62]
+      (=jis-x0213-1-2000  . #x2A26)	; &I-JX1-2A26; [10-06]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER T WITH CEDILLA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER T WITH CEDILLA")
-      (=ucs		  . #x0163)	; ţ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER T")
       (=ucs		  . #x0054)	; T
@@ -3958,16 +3954,16 @@
       ))
     (=ucs		. #x0162)	; Ţ
     (latin-iso8859-2	. #xDE)	; &I-LATIN2-5E;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER T WITH CEDILLA")
+      (=ucs		  . #x0163)	; ţ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER T WITH CEDILLA")
       (=ucs		  . #x0162)	; Ţ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B61)	; &JX1-2A57; [11-65]
-      (=jis-x0213-1-2000  . #x2A57)	; &I-JX1-2A57; [10-55]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER T WITH CEDILLA")
       (=ucs		  . #x0162)	; Ţ
@@ -3983,16 +3979,16 @@
     (=jis-x0213-1-2000	. #x2A47)	; &I-JX1-2A47; [10-39]
     (=jef-china3	. #x8BCC)	; &I-JC3-8BCC;
     (=ucs@jis/fw	. #x0162)	; &JX1-2A47;
+    (->lowercase
+     ((=jis-x0212	  . #x2B61)	; &JX1-2A57; [11-65]
+      (=jis-x0213-1-2000  . #x2A57)	; &I-JX1-2A57; [10-55]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER T WITH CEDILLA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER T WITH CEDILLA")
-      (=ucs		  . #x0162)	; Ţ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER T")
       (=ucs		  . #x0074)	; t
@@ -4002,16 +3998,16 @@
       ))
     (=ucs		. #x0163)	; ţ
     (latin-iso8859-2	. #xFE)	; &I-LATIN2-7E;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER T WITH CEDILLA")
+      (=ucs		  . #x0162)	; Ţ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER T WITH CEDILLA")
       (=ucs		  . #x0163)	; ţ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A61)	; &JX1-2A47; [10-65]
-      (=jis-x0213-1-2000  . #x2A47)	; &I-JX1-2A47; [10-39]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER T WITH CEDILLA")
       (=ucs		  . #x0163)	; ţ
@@ -4026,16 +4022,16 @@
     (=jis-x0212		. #x2B61)	; &JX1-2A57; [11-65]
     (=jis-x0213-1-2000	. #x2A57)	; &I-JX1-2A57; [10-55]
     (=ucs@jis/fw	. #x0163)	; &JX1-2A57;
+    (->uppercase
+     ((=jis-x0212	  . #x2A61)	; &JX1-2A47; [10-65]
+      (=jis-x0213-1-2000  . #x2A47)	; &I-JX1-2A47; [10-39]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER T WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER T WITH CARON")
-      (=ucs		  . #x0165)	; ť
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER T")
       (=ucs		  . #x0054)	; T
@@ -4045,16 +4041,16 @@
       ))
     (=ucs		. #x0164)	; Ť
     (latin-iso8859-2	. #xAB)	; &I-LATIN2-2B;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER T WITH CARON")
+      (=ucs		  . #x0165)	; ť
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER T WITH CARON")
       (=ucs		  . #x0164)	; Ť
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B60)	; &JX1-2A34; [11-64]
-      (=jis-x0213-1-2000  . #x2A34)	; &I-JX1-2A34; [10-20]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER T WITH CARON")
       (=ucs		  . #x0164)	; Ť
@@ -4070,16 +4066,16 @@
     (=jis-x0213-1-2000	. #x2A28)	; &I-JX1-2A28; [10-08]
     (=jef-china3	. #x88EB)	; &I-JC3-88EB;
     (=ucs@jis/fw	. #x0164)	; &JX1-2A28;
+    (->lowercase
+     ((=jis-x0212	  . #x2B60)	; &JX1-2A34; [11-64]
+      (=jis-x0213-1-2000  . #x2A34)	; &I-JX1-2A34; [10-20]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER T WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER T WITH CARON")
-      (=ucs		  . #x0164)	; Ť
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER T")
       (=ucs		  . #x0074)	; t
@@ -4089,16 +4085,16 @@
       ))
     (=ucs		. #x0165)	; ť
     (latin-iso8859-2	. #xBB)	; &I-LATIN2-3B;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER T WITH CARON")
+      (=ucs		  . #x0164)	; Ť
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER T WITH CARON")
       (=ucs		  . #x0165)	; ť
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A60)	; &JX1-2A28; [10-64]
-      (=jis-x0213-1-2000  . #x2A28)	; &I-JX1-2A28; [10-08]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER T WITH CARON")
       (=ucs		  . #x0165)	; ť
@@ -4114,28 +4110,28 @@
     (=jis-x0213-1-2000	. #x2A34)	; &I-JX1-2A34; [10-20]
     (=jef-china3	. #x88FA)	; &I-JC3-88FA;
     (=ucs@jis/fw	. #x0165)	; &JX1-2A34;
+    (->uppercase
+     ((=jis-x0212	  . #x2A60)	; &JX1-2A28; [10-64]
+      (=jis-x0213-1-2000  . #x2A28)	; &I-JX1-2A28; [10-08]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER T WITH STROKE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0166)	; Ŧ
+    (latin-iso8859-4	. #xAC)	; &I-LATIN4-2C;
     (->lowercase
      ((name		  . "LATIN SMALL LETTER T WITH STROKE")
       (=ucs		  . #x0167)	; ŧ
       ))
-    (=ucs		. #x0166)	; Ŧ
-    (latin-iso8859-4	. #xAC)	; &I-LATIN4-2C;
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER T WITH STROKE")
       (=ucs		  . #x0166)	; Ŧ
       ))
-    (->lowercase
-     ((=ks-x1001	  . #x292E)	; &JSP-294F; [09-14]
-      (=jis-x0212	  . #x294F)	; &I-JSP-294F; [09-47]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER T WITH STROKE")
       (=ucs		  . #x0166)	; Ŧ
@@ -4143,28 +4139,28 @@
     (=ks-x1001		. #x282E)	; &JSP-292F; [08-14]
     (=jis-x0212		. #x292F)	; &I-JSP-292F; [09-15]
     (=ucs@jis/fw	. #x0166)	; &JSP-292F;
+    (->lowercase
+     ((=ks-x1001	  . #x292E)	; &JSP-294F; [09-14]
+      (=jis-x0212	  . #x294F)	; &I-JSP-294F; [09-47]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER T WITH STROKE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0167)	; ŧ
+    (latin-iso8859-4	. #xBC)	; &I-LATIN4-3C;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER T WITH STROKE")
       (=ucs		  . #x0166)	; Ŧ
       ))
-    (=ucs		. #x0167)	; ŧ
-    (latin-iso8859-4	. #xBC)	; &I-LATIN4-3C;
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER T WITH STROKE")
       (=ucs		  . #x0167)	; ŧ
       ))
-    (->uppercase
-     ((=ks-x1001	  . #x282E)	; &JSP-292F; [08-14]
-      (=jis-x0212	  . #x292F)	; &I-JSP-292F; [09-15]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER T WITH STROKE")
       (=ucs		  . #x0167)	; ŧ
@@ -4172,16 +4168,16 @@
     (=ks-x1001		. #x292E)	; &JSP-294F; [09-14]
     (=jis-x0212		. #x294F)	; &I-JSP-294F; [09-47]
     (=ucs@jis/fw	. #x0167)	; &JSP-294F;
+    (->uppercase
+     ((=ks-x1001	  . #x282E)	; &JSP-292F; [08-14]
+      (=jis-x0212	  . #x292F)	; &I-JSP-292F; [09-15]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH TILDE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH TILDE")
-      (=ucs		  . #x0169)	; Å©
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -4193,15 +4189,16 @@
     (latin-iso8859-4	. #xDD)	; &I-LATIN4-5D;
     (latin-viscii	. #x9D)	; &I-MULE-VIET-U-7B;
     (latin-viscii-upper . #xFB)	; &I-MULE-VIET-U-7B;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH TILDE")
+      (=ucs		  . #x0169)	; Å©
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER U WITH TILDE")
       (=ucs		  . #x0168)	; Ũ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B6C)	; &JSP-2B6C; [11-76]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER U WITH TILDE")
       (=ucs		  . #x0168)	; Ũ
@@ -4216,16 +4213,15 @@
     (=jis-x0212		. #x2A6C)	; &JSP-2A6C; [10-76]
     (=jef-china3	. #x86EB)	; &I-JC3-86EB;
     (=ucs@jis/fw	. #x0168)	; &JSP-2A6C;
+    (->lowercase
+     ((=jis-x0212	  . #x2B6C)	; &JSP-2B6C; [11-76]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH TILDE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH TILDE")
-      (=ucs		  . #x0168)	; Ũ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -4238,15 +4234,16 @@
     (latin-tcvn5712	. #xF2)	; &I-VSCII2-72;
     (latin-viscii	. #xFB)	; &I-MULE-VIET-L-7B;
     (latin-viscii-lower . #xFB)	; &I-MULE-VIET-L-7B;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH TILDE")
+      (=ucs		  . #x0168)	; Ũ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER U WITH TILDE")
       (=ucs		  . #x0169)	; Å©
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A6C)	; &JSP-2A6C; [10-76]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER U WITH TILDE")
       (=ucs		  . #x0169)	; Å©
@@ -4261,16 +4258,15 @@
     (=jis-x0212		. #x2B6C)	; &JSP-2B6C; [11-76]
     (=jef-china3	. #x86F8)	; &I-JC3-86F8;
     (=ucs@jis/fw	. #x0169)	; &JSP-2B6C;
+    (->uppercase
+     ((=jis-x0212	  . #x2A6C)	; &JSP-2A6C; [10-76]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH MACRON")
-      (=ucs		  . #x016B)	; Å«
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -4280,17 +4276,16 @@
       ))
     (=ucs		. #x016A)	; Ū
     (latin-iso8859-4	. #xDE)	; &I-LATIN4-5E;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH MACRON")
+      (=ucs		  . #x016B)	; Å«
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER U WITH MACRON")
       (=ucs		  . #x016A)	; Ū
       ))
-    (->lowercase
-     ((=gb2312		  . #x2831)	; &JX1-297C; [08-17]
-      (=jis-x0212	  . #x2B69)	; &I-JSP-2B69; [11-73]
-      (=jis-x0213-1-2000  . #x297C)	; &I-JX1-297C; [09-92]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER U WITH MACRON")
       (=ucs		  . #x016A)	; Ū
@@ -4306,16 +4301,17 @@
     (=jis-x0213-1-2000	. #x2977)	; &I-JX1-2977; [09-87]
     (=jef-china3	. #x87B9)	; &I-JC3-87B9;
     (=ucs@jis/fw	. #x016A)	; &JX1-2977;
+    (->lowercase
+     ((=gb2312		  . #x2831)	; &JX1-297C; [08-17]
+      (=jis-x0212	  . #x2B69)	; &I-JSP-2B69; [11-73]
+      (=jis-x0213-1-2000  . #x297C)	; &I-JX1-297C; [09-92]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH MACRON")
-      (=ucs		  . #x016A)	; Ū
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -4325,16 +4321,16 @@
       ))
     (=ucs		. #x016B)	; Å«
     (latin-iso8859-4	. #xFE)	; &I-LATIN4-7E;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH MACRON")
+      (=ucs		  . #x016A)	; Ū
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER U WITH MACRON")
       (=ucs		  . #x016B)	; Å«
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A69)	; &JX1-2977; [10-73]
-      (=jis-x0213-1-2000  . #x2977)	; &I-JX1-2977; [09-87]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER U WITH MACRON")
       (=ucs		  . #x016B)	; Å«
@@ -4352,16 +4348,16 @@
     (=jef-china3	. #x87CD)	; &I-JC3-87CD;
     (=ucs@gb/fw		. #x016B)	; &JX1-297C;
     (=ucs@jis/fw	. #x016B)	; &JX1-297C;
+    (->uppercase
+     ((=jis-x0212	  . #x2A69)	; &JX1-2977; [10-73]
+      (=jis-x0213-1-2000  . #x2977)	; &I-JX1-2977; [09-87]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH BREVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH BREVE")
-      (=ucs		  . #x016D)	; Å­
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -4371,16 +4367,16 @@
       ))
     (=ucs		. #x016C)	; Ŭ
     (latin-iso8859-3	. #xDD)	; &I-LATIN3-5D;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH BREVE")
+      (=ucs		  . #x016D)	; Å­
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER U WITH BREVE")
       (=ucs		  . #x016C)	; Ŭ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B66)	; &JX1-2A64; [11-70]
-      (=jis-x0213-1-2000  . #x2A64)	; &I-JX1-2A64; [10-68]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER U WITH BREVE")
       (=ucs		  . #x016C)	; Ŭ
@@ -4396,16 +4392,16 @@
     (=jis-x0213-1-2000	. #x2A5E)	; &I-JX1-2A5E; [10-62]
     (=jef-china3	. #x87E5)	; &I-JC3-87E5;
     (=ucs@jis/fw	. #x016C)	; &JX1-2A5E;
+    (->lowercase
+     ((=jis-x0212	  . #x2B66)	; &JX1-2A64; [11-70]
+      (=jis-x0213-1-2000  . #x2A64)	; &I-JX1-2A64; [10-68]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH BREVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH BREVE")
-      (=ucs		  . #x016C)	; Ŭ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -4415,16 +4411,16 @@
       ))
     (=ucs		. #x016D)	; Å­
     (latin-iso8859-3	. #xFD)	; &I-LATIN3-7D;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH BREVE")
+      (=ucs		  . #x016C)	; Ŭ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER U WITH BREVE")
       (=ucs		  . #x016D)	; Å­
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A66)	; &JX1-2A5E; [10-70]
-      (=jis-x0213-1-2000  . #x2A5E)	; &I-JX1-2A5E; [10-62]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER U WITH BREVE")
       (=ucs		  . #x016D)	; Å­
@@ -4440,16 +4436,16 @@
     (=jis-x0213-1-2000	. #x2A64)	; &I-JX1-2A64; [10-68]
     (=jef-china3	. #x87EF)	; &I-JC3-87EF;
     (=ucs@jis/fw	. #x016D)	; &JX1-2A64;
+    (->uppercase
+     ((=jis-x0212	  . #x2A66)	; &JX1-2A5E; [10-70]
+      (=jis-x0213-1-2000  . #x2A5E)	; &I-JX1-2A5E; [10-62]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH RING ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH RING ABOVE")
-      (=ucs		  . #x016F)	; ů
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -4459,16 +4455,16 @@
       ))
     (=ucs		. #x016E)	; Å®
     (latin-iso8859-2	. #xD9)	; &I-LATIN2-59;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH RING ABOVE")
+      (=ucs		  . #x016F)	; ů
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER U WITH RING ABOVE")
       (=ucs		  . #x016E)	; Å®
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B6B)	; &JX1-2A55; [11-75]
-      (=jis-x0213-1-2000  . #x2A55)	; &I-JX1-2A55; [10-53]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER U WITH RING ABOVE")
       (=ucs		  . #x016E)	; Å®
@@ -4484,16 +4480,16 @@
     (=jis-x0213-1-2000	. #x2A45)	; &I-JX1-2A45; [10-37]
     (=jef-china3	. #x89A5)	; &I-JC3-89A5;
     (=ucs@jis/fw	. #x016E)	; &JX1-2A45;
+    (->lowercase
+     ((=jis-x0212	  . #x2B6B)	; &JX1-2A55; [11-75]
+      (=jis-x0213-1-2000  . #x2A55)	; &I-JX1-2A55; [10-53]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH RING ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH RING ABOVE")
-      (=ucs		  . #x016E)	; Å®
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -4503,16 +4499,16 @@
       ))
     (=ucs		. #x016F)	; ů
     (latin-iso8859-2	. #xF9)	; &I-LATIN2-79;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH RING ABOVE")
+      (=ucs		  . #x016E)	; Å®
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER U WITH RING ABOVE")
       (=ucs		  . #x016F)	; ů
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A6B)	; &JX1-2A45; [10-75]
-      (=jis-x0213-1-2000  . #x2A45)	; &I-JX1-2A45; [10-37]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER U WITH RING ABOVE")
       (=ucs		  . #x016F)	; ů
@@ -4528,16 +4524,16 @@
     (=jis-x0213-1-2000	. #x2A55)	; &I-JX1-2A55; [10-53]
     (=jef-china3	. #x89AD)	; &I-JC3-89AD;
     (=ucs@jis/fw	. #x016F)	; &JX1-2A55;
+    (->uppercase
+     ((=jis-x0212	  . #x2A6B)	; &JX1-2A45; [10-75]
+      (=jis-x0213-1-2000  . #x2A45)	; &I-JX1-2A45; [10-37]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH DOUBLE ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH DOUBLE ACUTE")
-      (=ucs		  . #x0171)	; ű
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -4547,16 +4543,16 @@
       ))
     (=ucs		. #x0170)	; Å°
     (latin-iso8859-2	. #xDB)	; &I-LATIN2-5B;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH DOUBLE ACUTE")
+      (=ucs		  . #x0171)	; ű
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER U WITH DOUBLE ACUTE")
       (=ucs		  . #x0170)	; Å°
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B68)	; &JX1-2A56; [11-72]
-      (=jis-x0213-1-2000  . #x2A56)	; &I-JX1-2A56; [10-54]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER U WITH DOUBLE ACUTE")
       (=ucs		  . #x0170)	; Å°
@@ -4572,16 +4568,16 @@
     (=jis-x0213-1-2000	. #x2A46)	; &I-JX1-2A46; [10-38]
     (=jef-china3	. #x89E3)	; &I-JC3-89E3;
     (=ucs@jis/fw	. #x0170)	; &JX1-2A46;
+    (->lowercase
+     ((=jis-x0212	  . #x2B68)	; &JX1-2A56; [11-72]
+      (=jis-x0213-1-2000  . #x2A56)	; &I-JX1-2A56; [10-54]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH DOUBLE ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH DOUBLE ACUTE")
-      (=ucs		  . #x0170)	; Å°
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -4591,16 +4587,16 @@
       ))
     (=ucs		. #x0171)	; ű
     (latin-iso8859-2	. #xFB)	; &I-LATIN2-7B;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH DOUBLE ACUTE")
+      (=ucs		  . #x0170)	; Å°
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER U WITH DOUBLE ACUTE")
       (=ucs		  . #x0171)	; ű
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A68)	; &JX1-2A46; [10-72]
-      (=jis-x0213-1-2000  . #x2A46)	; &I-JX1-2A46; [10-38]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER U WITH DOUBLE ACUTE")
       (=ucs		  . #x0171)	; ű
@@ -4616,16 +4612,16 @@
     (=jis-x0213-1-2000	. #x2A56)	; &I-JX1-2A56; [10-54]
     (=jef-china3	. #x89E6)	; &I-JC3-89E6;
     (=ucs@jis/fw	. #x0171)	; &JX1-2A56;
+    (->uppercase
+     ((=jis-x0212	  . #x2A68)	; &JX1-2A46; [10-72]
+      (=jis-x0213-1-2000  . #x2A46)	; &I-JX1-2A46; [10-38]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH OGONEK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH OGONEK")
-      (=ucs		  . #x0173)	; ų
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -4635,15 +4631,16 @@
       ))
     (=ucs		. #x0172)	; Ų
     (latin-iso8859-4	. #xD9)	; &I-LATIN4-59;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH OGONEK")
+      (=ucs		  . #x0173)	; ų
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER U WITH OGONEK")
       (=ucs		  . #x0172)	; Ų
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B6A)	; &JSP-2B6A; [11-74]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER U WITH OGONEK")
       (=ucs		  . #x0172)	; Ų
@@ -4658,16 +4655,15 @@
     (=jis-x0212		. #x2A6A)	; &JSP-2A6A; [10-74]
     (=jef-china3	. #x8AAA)	; &I-JC3-8AAA;
     (=ucs@jis/fw	. #x0172)	; &JSP-2A6A;
+    (->lowercase
+     ((=jis-x0212	  . #x2B6A)	; &JSP-2B6A; [11-74]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH OGONEK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH OGONEK")
-      (=ucs		  . #x0172)	; Ų
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -4677,15 +4673,16 @@
       ))
     (=ucs		. #x0173)	; ų
     (latin-iso8859-4	. #xF9)	; &I-LATIN4-79;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH OGONEK")
+      (=ucs		  . #x0172)	; Ų
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER U WITH OGONEK")
       (=ucs		  . #x0173)	; ų
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A6A)	; &JSP-2A6A; [10-74]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER U WITH OGONEK")
       (=ucs		  . #x0173)	; ų
@@ -4700,16 +4697,15 @@
     (=jis-x0212		. #x2B6A)	; &JSP-2B6A; [11-74]
     (=jef-china3	. #x8AB2)	; &I-JC3-8AB2;
     (=ucs@jis/fw	. #x0173)	; &JSP-2B6A;
+    (->uppercase
+     ((=jis-x0212	  . #x2A6A)	; &JSP-2A6A; [10-74]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER W WITH CIRCUMFLEX")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER W WITH CIRCUMFLEX")
-      (=ucs		  . #x0175)	; ŵ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER W")
       (=ucs		  . #x0057)	; W
@@ -4718,15 +4714,16 @@
       (=ucs		  . #x0302)	; ̂
       ))
     (=ucs		. #x0174)	; Å´
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER W WITH CIRCUMFLEX")
+      (=ucs		  . #x0175)	; ŵ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER W WITH CIRCUMFLEX")
       (=ucs		  . #x0174)	; Å´
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B71)	; &JSP-2B71; [11-81]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER W WITH CIRCUMFLEX")
       (=ucs		  . #x0174)	; Å´
@@ -4741,16 +4738,15 @@
     (=jis-x0212		. #x2A71)	; &JSP-2A71; [10-81]
     (=jef-china3	. #x86C2)	; &I-JC3-86C2;
     (=ucs@jis/fw	. #x0174)	; &JSP-2A71;
+    (->lowercase
+     ((=jis-x0212	  . #x2B71)	; &JSP-2B71; [11-81]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER W WITH CIRCUMFLEX")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER W WITH CIRCUMFLEX")
-      (=ucs		  . #x0174)	; Å´
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER W")
       (=ucs		  . #x0077)	; w
@@ -4759,15 +4755,16 @@
       (=ucs		  . #x0302)	; ̂
       ))
     (=ucs		. #x0175)	; ŵ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER W WITH CIRCUMFLEX")
+      (=ucs		  . #x0174)	; Å´
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER W WITH CIRCUMFLEX")
       (=ucs		  . #x0175)	; ŵ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A71)	; &JSP-2A71; [10-81]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER W WITH CIRCUMFLEX")
       (=ucs		  . #x0175)	; ŵ
@@ -4782,16 +4779,15 @@
     (=jis-x0212		. #x2B71)	; &JSP-2B71; [11-81]
     (=jef-china3	. #x86CF)	; &I-JC3-86CF;
     (=ucs@jis/fw	. #x0175)	; &JSP-2B71;
+    (->uppercase
+     ((=jis-x0212	  . #x2A71)	; &JSP-2A71; [10-81]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Y WITH CIRCUMFLEX")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER Y WITH CIRCUMFLEX")
-      (=ucs		  . #x0177)	; Å·
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER Y")
       (=ucs		  . #x0059)	; Y
@@ -4800,15 +4796,16 @@
       (=ucs		  . #x0302)	; ̂
       ))
     (=ucs		. #x0176)	; Ŷ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER Y WITH CIRCUMFLEX")
+      (=ucs		  . #x0177)	; Å·
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER Y WITH CIRCUMFLEX")
       (=ucs		  . #x0176)	; Ŷ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B74)	; &JSP-2B74; [11-84]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER Y WITH CIRCUMFLEX")
       (=ucs		  . #x0176)	; Ŷ
@@ -4823,16 +4820,15 @@
     (=jis-x0212		. #x2A74)	; &JSP-2A74; [10-84]
     (=jef-china3	. #x86C3)	; &I-JC3-86C3;
     (=ucs@jis/fw	. #x0176)	; &JSP-2A74;
+    (->lowercase
+     ((=jis-x0212	  . #x2B74)	; &JSP-2B74; [11-84]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Y WITH CIRCUMFLEX")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER Y WITH CIRCUMFLEX")
-      (=ucs		  . #x0176)	; Ŷ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER Y")
       (=ucs		  . #x0079)	; y
@@ -4841,15 +4837,16 @@
       (=ucs		  . #x0302)	; ̂
       ))
     (=ucs		. #x0177)	; Å·
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER Y WITH CIRCUMFLEX")
+      (=ucs		  . #x0176)	; Ŷ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER Y WITH CIRCUMFLEX")
       (=ucs		  . #x0177)	; Å·
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A74)	; &JSP-2A74; [10-84]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER Y WITH CIRCUMFLEX")
       (=ucs		  . #x0177)	; Å·
@@ -4864,16 +4861,15 @@
     (=jis-x0212		. #x2B74)	; &JSP-2B74; [11-84]
     (=jef-china3	. #x86D0)	; &I-JC3-86D0;
     (=ucs@jis/fw	. #x0177)	; &JSP-2B74;
+    (->uppercase
+     ((=jis-x0212	  . #x2A74)	; &JSP-2A74; [10-84]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Y WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER Y WITH DIAERESIS")
-      (=ucs		  . #x00FF)	; ÿ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER Y")
       (=ucs		  . #x0059)	; Y
@@ -4882,16 +4878,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x0178)	; Ÿ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER Y WITH DIAERESIS")
+      (=ucs		  . #x00FF)	; ÿ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER Y WITH DIAERESIS")
       (=ucs		  . #x0178)	; Ÿ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B73)	; &JX1-2974; [11-83]
-      (=jis-x0213-1-2000  . #x2974)	; &I-JX1-2974; [09-84]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER Y WITH DIAERESIS")
       (=ucs		  . #x0178)	; Ÿ
@@ -4905,16 +4901,16 @@
       ))
     (=jis-x0212		. #x2A73)	; &JSP-2A73; [10-83]
     (=ucs@jis/fw	. #x0178)	; &JSP-2A73;
+    (->lowercase
+     ((=jis-x0212	  . #x2B73)	; &JX1-2974; [11-83]
+      (=jis-x0213-1-2000  . #x2974)	; &I-JX1-2974; [09-84]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Z WITH ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER Z WITH ACUTE")
-      (=ucs		  . #x017A)	; ź
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER Z")
       (=ucs		  . #x005A)	; Z
@@ -4924,16 +4920,16 @@
       ))
     (=ucs		. #x0179)	; Ź
     (latin-iso8859-2	. #xAC)	; &I-LATIN2-2C;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER Z WITH ACUTE")
+      (=ucs		  . #x017A)	; ź
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER Z WITH ACUTE")
       (=ucs		  . #x0179)	; Ź
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B75)	; &JX1-2A35; [11-85]
-      (=jis-x0213-1-2000  . #x2A35)	; &I-JX1-2A35; [10-21]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER Z WITH ACUTE")
       (=ucs		  . #x0179)	; Ź
@@ -4949,16 +4945,16 @@
     (=jis-x0213-1-2000	. #x2A29)	; &I-JX1-2A29; [10-09]
     (=jef-china3	. #x85EA)	; &I-JC3-85EA;
     (=ucs@jis/fw	. #x0179)	; &JX1-2A29;
+    (->lowercase
+     ((=jis-x0212	  . #x2B75)	; &JX1-2A35; [11-85]
+      (=jis-x0213-1-2000  . #x2A35)	; &I-JX1-2A35; [10-21]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Z WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER Z WITH ACUTE")
-      (=ucs		  . #x0179)	; Ź
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER Z")
       (=ucs		  . #x007A)	; z
@@ -4968,16 +4964,16 @@
       ))
     (=ucs		. #x017A)	; ź
     (latin-iso8859-2	. #xBC)	; &I-LATIN2-3C;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER Z WITH ACUTE")
+      (=ucs		  . #x0179)	; Ź
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER Z WITH ACUTE")
       (=ucs		  . #x017A)	; ź
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A75)	; &JX1-2A29; [10-85]
-      (=jis-x0213-1-2000  . #x2A29)	; &I-JX1-2A29; [10-09]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER Z WITH ACUTE")
       (=ucs		  . #x017A)	; ź
@@ -4993,16 +4989,16 @@
     (=jis-x0213-1-2000	. #x2A35)	; &I-JX1-2A35; [10-21]
     (=jef-china3	. #x86A2)	; &I-JC3-86A2;
     (=ucs@jis/fw	. #x017A)	; &JX1-2A35;
+    (->uppercase
+     ((=jis-x0212	  . #x2A75)	; &JX1-2A29; [10-85]
+      (=jis-x0213-1-2000  . #x2A29)	; &I-JX1-2A29; [10-09]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Z WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER Z WITH DOT ABOVE")
-      (=ucs		  . #x017C)	; ż
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER Z")
       (=ucs		  . #x005A)	; Z
@@ -5013,16 +5009,16 @@
     (=ucs		. #x017B)	; Å»
     (latin-iso8859-2	. #xAF)	; &I-LATIN2-2F;
     (latin-iso8859-3	. #xAF)	; &I-LATIN3-2F;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER Z WITH DOT ABOVE")
+      (=ucs		  . #x017C)	; ż
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER Z WITH DOT ABOVE")
       (=ucs		  . #x017B)	; Å»
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B77)	; &JX1-2A38; [11-87]
-      (=jis-x0213-1-2000  . #x2A38)	; &I-JX1-2A38; [10-24]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER Z WITH DOT ABOVE")
       (=ucs		  . #x017B)	; Å»
@@ -5038,16 +5034,16 @@
     (=jis-x0213-1-2000	. #x2A2B)	; &I-JX1-2A2B; [10-11]
     (=jef-china3	. #x88AF)	; &I-JC3-88AF;
     (=ucs@jis/fw	. #x017B)	; &JX1-2A2B;
+    (->lowercase
+     ((=jis-x0212	  . #x2B77)	; &JX1-2A38; [11-87]
+      (=jis-x0213-1-2000  . #x2A38)	; &I-JX1-2A38; [10-24]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Z WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER Z WITH DOT ABOVE")
-      (=ucs		  . #x017B)	; Å»
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER Z")
       (=ucs		  . #x007A)	; z
@@ -5058,16 +5054,16 @@
     (=ucs		. #x017C)	; ż
     (latin-iso8859-2	. #xBF)	; &I-LATIN2-3F;
     (latin-iso8859-3	. #xBF)	; &I-LATIN3-3F;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER Z WITH DOT ABOVE")
+      (=ucs		  . #x017B)	; Å»
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER Z WITH DOT ABOVE")
       (=ucs		  . #x017C)	; ż
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A77)	; &JX1-2A2B; [10-87]
-      (=jis-x0213-1-2000  . #x2A2B)	; &I-JX1-2A2B; [10-11]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER Z WITH DOT ABOVE")
       (=ucs		  . #x017C)	; ż
@@ -5083,16 +5079,16 @@
     (=jis-x0213-1-2000	. #x2A38)	; &I-JX1-2A38; [10-24]
     (=jef-china3	. #x88C4)	; &I-JC3-88C4;
     (=ucs@jis/fw	. #x017C)	; &JX1-2A38;
+    (->uppercase
+     ((=jis-x0212	  . #x2A77)	; &JX1-2A2B; [10-87]
+      (=jis-x0213-1-2000  . #x2A2B)	; &I-JX1-2A2B; [10-11]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Z WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER Z WITH CARON")
-      (=ucs		  . #x017E)	; ž
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER Z")
       (=ucs		  . #x005A)	; Z
@@ -5103,16 +5099,16 @@
     (=ucs		. #x017D)	; Ž
     (latin-iso8859-2	. #xAE)	; &I-LATIN2-2E;
     (latin-iso8859-4	. #xAE)	; &I-LATIN4-2E;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER Z WITH CARON")
+      (=ucs		  . #x017E)	; ž
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER Z WITH CARON")
       (=ucs		  . #x017D)	; Ž
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B76)	; &JX1-2A37; [11-86]
-      (=jis-x0213-1-2000  . #x2A37)	; &I-JX1-2A37; [10-23]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER Z WITH CARON")
       (=ucs		  . #x017D)	; Ž
@@ -5128,16 +5124,16 @@
     (=jis-x0213-1-2000	. #x2A2A)	; &I-JX1-2A2A; [10-10]
     (=jef-china3	. #x88ED)	; &I-JC3-88ED;
     (=ucs@jis/fw	. #x017D)	; &JX1-2A2A;
+    (->lowercase
+     ((=jis-x0212	  . #x2B76)	; &JX1-2A37; [11-86]
+      (=jis-x0213-1-2000  . #x2A37)	; &I-JX1-2A37; [10-23]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Z WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER Z WITH CARON")
-      (=ucs		  . #x017D)	; Ž
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER Z")
       (=ucs		  . #x007A)	; z
@@ -5148,16 +5144,16 @@
     (=ucs		. #x017E)	; ž
     (latin-iso8859-2	. #xBE)	; &I-LATIN2-3E;
     (latin-iso8859-4	. #xBE)	; &I-LATIN4-3E;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER Z WITH CARON")
+      (=ucs		  . #x017D)	; Ž
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER Z WITH CARON")
       (=ucs		  . #x017E)	; ž
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A76)	; &JX1-2A2A; [10-86]
-      (=jis-x0213-1-2000  . #x2A2A)	; &I-JX1-2A2A; [10-10]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER Z WITH CARON")
       (=ucs		  . #x017E)	; ž
@@ -5173,19 +5169,23 @@
     (=jis-x0213-1-2000	. #x2A37)	; &I-JX1-2A37; [10-23]
     (=jef-china3	. #x88FC)	; &I-JC3-88FC;
     (=ucs@jis/fw	. #x017E)	; &JX1-2A37;
+    (->uppercase
+     ((=jis-x0212	  . #x2A76)	; &JX1-2A2A; [10-86]
+      (=jis-x0213-1-2000  . #x2A2A)	; &I-JX1-2A2A; [10-10]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER LONG S")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER S")
-      (=ucs		  . #x0053)	; S
-      ))
     (<-compat/formed
      ((name		  . "LATIN SMALL LETTER S")
       (=ucs		  . #x0073)	; s
       ))
     (=ucs		. #x017F)	; Å¿
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER S")
+      (=ucs		  . #x0053)	; S
+      ))
     ))
diff --git a/lisp/utf-2000/u00180-Latin-Extended-B.el b/lisp/utf-2000/u00180-Latin-Extended-B.el
index e22eeb7..c6fa708 100644
--- a/lisp/utf-2000/u00180-Latin-Extended-B.el
+++ b/lisp/utf-2000/u00180-Latin-Extended-B.el
@@ -11,132 +11,132 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0181)	; Ɓ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER B WITH HOOK")
       (=ucs		  . #x0253)	; ɓ
       ))
-    (=ucs		. #x0181)	; Ɓ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER B WITH TOPBAR")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0182)	; Ƃ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER B WITH TOPBAR")
       (=ucs		  . #x0183)	; ƃ
       ))
-    (=ucs		. #x0182)	; Ƃ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER B WITH TOPBAR")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0183)	; ƃ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER B WITH TOPBAR")
       (=ucs		  . #x0182)	; Ƃ
       ))
-    (=ucs		. #x0183)	; ƃ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER TONE SIX")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0184)	; Ƅ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER TONE SIX")
       (=ucs		  . #x0185)	; ƅ
       ))
-    (=ucs		. #x0184)	; Ƅ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER TONE SIX")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0185)	; ƅ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER TONE SIX")
       (=ucs		  . #x0184)	; Ƅ
       ))
-    (=ucs		. #x0185)	; ƅ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER OPEN O")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0186)	; Ɔ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER OPEN O")
       (=ucs		  . #x0254)	; ɔ
       ))
-    (=ucs		. #x0186)	; Ɔ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER C WITH HOOK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0187)	; Ƈ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER C WITH HOOK")
       (=ucs		  . #x0188)	; ƈ
       ))
-    (=ucs		. #x0187)	; Ƈ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER C WITH HOOK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0188)	; ƈ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER C WITH HOOK")
       (=ucs		  . #x0187)	; Ƈ
       ))
-    (=ucs		. #x0188)	; ƈ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER AFRICAN D")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0189)	; Ɖ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER D WITH TAIL")
       (=ucs		  . #x0256)	; ɖ
       ))
-    (=ucs		. #x0189)	; Ɖ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER D WITH HOOK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x018A)	; Ɗ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER D WITH HOOK")
       (=ucs		  . #x0257)	; ɗ
       ))
-    (=ucs		. #x018A)	; Ɗ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER D WITH TOPBAR")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x018B)	; Ƌ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER D WITH TOPBAR")
       (=ucs		  . #x018C)	; ƌ
       ))
-    (=ucs		. #x018B)	; Ƌ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER D WITH TOPBAR")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x018C)	; ƌ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER D WITH TOPBAR")
       (=ucs		  . #x018B)	; Ƌ
       ))
-    (=ucs		. #x018C)	; ƌ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER TURNED DELTA")
@@ -150,92 +150,92 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x018E)	; Ǝ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER TURNED E")
       (=ucs		  . #x01DD)	; ǝ
       ))
-    (=ucs		. #x018E)	; Ǝ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER SCHWA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x018F)	; Ə
     (->lowercase
      ((name		  . "LATIN SMALL LETTER SCHWA")
       (=ucs		  . #x0259)	; ə
       ))
-    (=ucs		. #x018F)	; Ə
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER OPEN E")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0190)	; Ɛ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER OPEN E")
       (=ucs		  . #x025B)	; ɛ
       ))
-    (=ucs		. #x0190)	; Ɛ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER F WITH HOOK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0191)	; Ƒ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER F WITH HOOK")
       (=ucs		  . #x0192)	; ƒ
       ))
-    (=ucs		. #x0191)	; Ƒ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER F WITH HOOK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0192)	; ƒ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER F WITH HOOK")
       (=ucs		  . #x0191)	; Ƒ
       ))
-    (=ucs		. #x0192)	; ƒ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER G WITH HOOK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0193)	; Ɠ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER G WITH HOOK")
       (=ucs		  . #x0260)	; É 
       ))
-    (=ucs		. #x0193)	; Ɠ
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER G WITH HOOK")
       (=ucs		  . #x0193)	; Ɠ
       ))
-    (->lowercase
-     ((=jis-x0213-1-2000  . #x2B28)	; &JX1-2B28; [11-08]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER G WITH HOOK")
       (=ucs		  . #x0193)	; Ɠ
       ))
     (=jis-x0213-1-2000	. #x2B29)	; &JX1-2B29; [11-09]
     (=ucs@jis/fw	. #x0193)	; &JX1-2B29;
+    (->lowercase
+     ((=jis-x0213-1-2000  . #x2B28)	; &JX1-2B28; [11-08]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER GAMMA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0194)	; Ɣ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER GAMMA")
       (=ucs		  . #x0263)	; ɣ
       ))
-    (=ucs		. #x0194)	; Ɣ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER HV")
@@ -243,55 +243,55 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "hwair")
+    (=ucs		. #x0195)	; ƕ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER HWAIR")
       (=ucs		  . #x01F6)	; Ƕ
       ))
-    (=ucs		. #x0195)	; ƕ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER IOTA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0196)	; Ɩ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER IOTA")
       (=ucs		  . #x0269)	; É©
       ))
-    (=ucs		. #x0196)	; Ɩ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I WITH STROKE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0197)	; Ɨ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER I WITH STROKE")
       (=ucs		  . #x0268)	; ɨ
       ))
-    (=ucs		. #x0197)	; Ɨ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER K WITH HOOK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0198)	; Ƙ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER K WITH HOOK")
       (=ucs		  . #x0199)	; ƙ
       ))
-    (=ucs		. #x0198)	; Ƙ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER K WITH HOOK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0199)	; ƙ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER K WITH HOOK")
       (=ucs		  . #x0198)	; Ƙ
       ))
-    (=ucs		. #x0199)	; ƙ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER L WITH BAR")
@@ -312,22 +312,22 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x019C)	; Ɯ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER TURNED M")
       (=ucs		  . #x026F)	; ɯ
       ))
-    (=ucs		. #x019C)	; Ɯ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER N WITH LEFT HOOK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x019D)	; Ɲ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER N WITH LEFT HOOK")
       (=ucs		  . #x0272)	; ɲ
       ))
-    (=ucs		. #x019D)	; Ɲ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER N WITH LONG RIGHT LEG")
@@ -341,21 +341,17 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x019F)	; Ɵ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER BARRED O")
       (=ucs		  . #x0275)	; ɵ
       ))
-    (=ucs		. #x019F)	; Ɵ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH HORN")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH HORN")
-      (=ucs		  . #x01A1)	; Æ¡
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
@@ -367,6 +363,10 @@
     (latin-tcvn5712	. #xA5)	; &I-VSCII2-25;
     (latin-viscii	. #xB4)	; &I-MULE-VIET-U-3D;
     (latin-viscii-upper . #xBD)	; &I-MULE-VIET-U-3D;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH HORN")
+      (=ucs		  . #x01A1)	; Æ¡
+      ))
     ))
 (define-char
   '((=>ucs		. #x01A0)	; Æ 
@@ -377,10 +377,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH HORN")
-      (=ucs		  . #x01A0)	; Æ 
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
@@ -392,6 +388,10 @@
     (latin-tcvn5712	. #xAC)	; &I-VSCII2-2C;
     (latin-viscii	. #xBD)	; &I-MULE-VIET-L-3D;
     (latin-viscii-lower . #xBD)	; &I-MULE-VIET-L-3D;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH HORN")
+      (=ucs		  . #x01A0)	; Æ 
+      ))
     ))
 (define-char
   '((=>ucs		. #x01A1)	; Æ¡
@@ -403,11 +403,11 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "gha")
+    (=ucs		. #x01A2)	; Ƣ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER OI")
       (=ucs		  . #x01A3)	; ƣ
       ))
-    (=ucs		. #x01A2)	; Ƣ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER OI")
@@ -415,77 +415,77 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "gha")
+    (=ucs		. #x01A3)	; ƣ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER OI")
       (=ucs		  . #x01A2)	; Ƣ
       ))
-    (=ucs		. #x01A3)	; ƣ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER P WITH HOOK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01A4)	; Ƥ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER P WITH HOOK")
       (=ucs		  . #x01A5)	; ƥ
       ))
-    (=ucs		. #x01A4)	; Ƥ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER P WITH HOOK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01A5)	; ƥ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER P WITH HOOK")
       (=ucs		  . #x01A4)	; Ƥ
       ))
-    (=ucs		. #x01A5)	; ƥ
     ))
 (define-char
   '((name		. "LATIN LETTER YR")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01A6)	; Ʀ
     (->lowercase
      ((name		  . "LATIN LETTER SMALL CAPITAL R")
       (=ucs		  . #x0280)	; ʀ
       ))
-    (=ucs		. #x01A6)	; Ʀ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER TONE TWO")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01A7)	; Ƨ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER TONE TWO")
       (=ucs		  . #x01A8)	; ƨ
       ))
-    (=ucs		. #x01A7)	; Ƨ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER TONE TWO")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01A8)	; ƨ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER TONE TWO")
       (=ucs		  . #x01A7)	; Ƨ
       ))
-    (=ucs		. #x01A8)	; ƨ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER ESH")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01A9)	; Æ©
     (->lowercase
      ((name		  . "LATIN SMALL LETTER ESH")
       (=ucs		  . #x0283)	; ʃ
       ))
-    (=ucs		. #x01A9)	; Æ©
     ))
 (define-char
   '((name		. "LATIN LETTER REVERSED ESH LOOP")
@@ -506,43 +506,39 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01AC)	; Ƭ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER T WITH HOOK")
       (=ucs		  . #x01AD)	; Æ­
       ))
-    (=ucs		. #x01AC)	; Ƭ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER T WITH HOOK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01AD)	; Æ­
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER T WITH HOOK")
       (=ucs		  . #x01AC)	; Ƭ
       ))
-    (=ucs		. #x01AD)	; Æ­
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER T WITH RETROFLEX HOOK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01AE)	; Æ®
     (->lowercase
      ((name		  . "LATIN SMALL LETTER T WITH RETROFLEX HOOK")
       (=ucs		  . #x0288)	; ʈ
       ))
-    (=ucs		. #x01AE)	; Æ®
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH HORN")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH HORN")
-      (=ucs		  . #x01B0)	; Æ°
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -554,6 +550,10 @@
     (latin-tcvn5712	. #xA6)	; &I-VSCII2-26;
     (latin-viscii	. #xBF)	; &I-MULE-VIET-U-5F;
     (latin-viscii-upper . #xDF)	; &I-MULE-VIET-U-5F;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH HORN")
+      (=ucs		  . #x01B0)	; Æ°
+      ))
     ))
 (define-char
   '((=>ucs		. #x01AF)	; Ư
@@ -564,10 +564,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH HORN")
-      (=ucs		  . #x01AF)	; Ư
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -579,6 +575,10 @@
     (latin-tcvn5712	. #xAD)	; &I-VSCII2-2D;
     (latin-viscii	. #xDF)	; &I-MULE-VIET-L-5F;
     (latin-viscii-lower . #xDF)	; &I-MULE-VIET-L-5F;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH HORN")
+      (=ucs		  . #x01AF)	; Ư
+      ))
     ))
 (define-char
   '((=>ucs		. #x01B0)	; Æ°
@@ -589,99 +589,99 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01B1)	; Ʊ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER UPSILON")
       (=ucs		  . #x028A)	; ʊ
       ))
-    (=ucs		. #x01B1)	; Ʊ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER V WITH HOOK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01B2)	; Ʋ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER V WITH HOOK")
       (=ucs		  . #x028B)	; ʋ
       ))
-    (=ucs		. #x01B2)	; Ʋ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Y WITH HOOK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01B3)	; Ƴ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER Y WITH HOOK")
       (=ucs		  . #x01B4)	; Æ´
       ))
-    (=ucs		. #x01B3)	; Ƴ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Y WITH HOOK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01B4)	; Æ´
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER Y WITH HOOK")
       (=ucs		  . #x01B3)	; Ƴ
       ))
-    (=ucs		. #x01B4)	; Æ´
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Z WITH STROKE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01B5)	; Ƶ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER Z WITH STROKE")
       (=ucs		  . #x01B6)	; ƶ
       ))
-    (=ucs		. #x01B5)	; Ƶ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Z WITH STROKE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01B6)	; ƶ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER Z WITH STROKE")
       (=ucs		  . #x01B5)	; Ƶ
       ))
-    (=ucs		. #x01B6)	; ƶ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER EZH")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01B7)	; Æ·
     (->lowercase
      ((name		  . "LATIN SMALL LETTER EZH")
       (=ucs		  . #x0292)	; ʒ
       ))
-    (=ucs		. #x01B7)	; Æ·
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER EZH REVERSED")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01B8)	; Ƹ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER EZH REVERSED")
       (=ucs		  . #x01B9)	; ƹ
       ))
-    (=ucs		. #x01B8)	; Ƹ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER EZH REVERSED")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01B9)	; ƹ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER EZH REVERSED")
       (=ucs		  . #x01B8)	; Ƹ
       ))
-    (=ucs		. #x01B9)	; ƹ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER EZH WITH TAIL")
@@ -702,22 +702,22 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01BC)	; Ƽ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER TONE FIVE")
       (=ucs		  . #x01BD)	; ƽ
       ))
-    (=ucs		. #x01BC)	; Ƽ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER TONE FIVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01BD)	; ƽ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER TONE FIVE")
       (=ucs		  . #x01BC)	; Ƽ
       ))
-    (=ucs		. #x01BD)	; ƽ
     ))
 (define-char
   '((name . "LATIN LETTER INVERTED GLOTTAL STOP WITH STROKE")
@@ -731,11 +731,11 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01BF)	; Æ¿
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER WYNN")
       (=ucs		  . #x01F7)	; Ç·
       ))
-    (=ucs		. #x01BF)	; Æ¿
     ))
 (define-char
   '((name		. "LATIN LETTER DENTAL CLICK")
@@ -771,14 +771,6 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER DZ WITH CARON")
-      (=ucs		  . #x01C6)	; dž
-      ))
-    (->titlecase
-     ((name . "LATIN CAPITAL LETTER D WITH SMALL LETTER Z WITH CARON")
-      (=ucs		  . #x01C5)	; Dž
-      ))
     (=>decomposition@compat
      ((name		  . "LATIN CAPITAL LETTER D")
       (=ucs		  . #x0044)	; D
@@ -787,20 +779,20 @@
       (=ucs		  . #x017D)	; Ž
       ))
     (=ucs		. #x01C4)	; DŽ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER DZ WITH CARON")
+      (=ucs		  . #x01C6)	; dž
+      ))
+    (->titlecase
+     ((name . "LATIN CAPITAL LETTER D WITH SMALL LETTER Z WITH CARON")
+      (=ucs		  . #x01C5)	; Dž
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER D WITH SMALL LETTER Z WITH CARON")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER DZ WITH CARON")
-      (=ucs		  . #x01C6)	; dž
-      ))
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER DZ WITH CARON")
-      (=ucs		  . #x01C4)	; DŽ
-      ))
     (=>decomposition@compat
      ((name		  . "LATIN CAPITAL LETTER D")
       (=ucs		  . #x0044)	; D
@@ -809,20 +801,20 @@
       (=ucs		  . #x017E)	; ž
       ))
     (=ucs		. #x01C5)	; Dž
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER DZ WITH CARON")
+      (=ucs		  . #x01C6)	; dž
+      ))
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER DZ WITH CARON")
+      (=ucs		  . #x01C4)	; DŽ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER DZ WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->titlecase
-     ((name . "LATIN CAPITAL LETTER D WITH SMALL LETTER Z WITH CARON")
-      (=ucs		  . #x01C5)	; Dž
-      ))
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER DZ WITH CARON")
-      (=ucs		  . #x01C4)	; DŽ
-      ))
     (=>decomposition@compat
      ((name		  . "LATIN SMALL LETTER D")
       (=ucs		  . #x0064)	; d
@@ -831,20 +823,20 @@
       (=ucs		  . #x017E)	; ž
       ))
     (=ucs		. #x01C6)	; dž
+    (->titlecase
+     ((name . "LATIN CAPITAL LETTER D WITH SMALL LETTER Z WITH CARON")
+      (=ucs		  . #x01C5)	; Dž
+      ))
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER DZ WITH CARON")
+      (=ucs		  . #x01C4)	; DŽ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER LJ")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER LJ")
-      (=ucs		  . #x01C9)	; lj
-      ))
-    (->titlecase
-     ((name		  . "LATIN CAPITAL LETTER L WITH SMALL LETTER J")
-      (=ucs		  . #x01C8)	; Lj
-      ))
     (=>decomposition@compat
      ((name		  . "LATIN CAPITAL LETTER L")
       (=ucs		  . #x004C)	; L
@@ -853,20 +845,20 @@
       (=ucs		  . #x004A)	; J
       ))
     (=ucs		. #x01C7)	; LJ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER LJ")
+      (=ucs		  . #x01C9)	; lj
+      ))
+    (->titlecase
+     ((name		  . "LATIN CAPITAL LETTER L WITH SMALL LETTER J")
+      (=ucs		  . #x01C8)	; Lj
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER L WITH SMALL LETTER J")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER LJ")
-      (=ucs		  . #x01C9)	; lj
-      ))
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER LJ")
-      (=ucs		  . #x01C7)	; LJ
-      ))
     (=>decomposition@compat
      ((name		  . "LATIN CAPITAL LETTER L")
       (=ucs		  . #x004C)	; L
@@ -875,20 +867,20 @@
       (=ucs		  . #x006A)	; j
       ))
     (=ucs		. #x01C8)	; Lj
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER LJ")
+      (=ucs		  . #x01C9)	; lj
+      ))
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER LJ")
+      (=ucs		  . #x01C7)	; LJ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER LJ")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->titlecase
-     ((name		  . "LATIN CAPITAL LETTER L WITH SMALL LETTER J")
-      (=ucs		  . #x01C8)	; Lj
-      ))
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER LJ")
-      (=ucs		  . #x01C7)	; LJ
-      ))
     (=>decomposition@compat
      ((name		  . "LATIN SMALL LETTER L")
       (=ucs		  . #x006C)	; l
@@ -897,20 +889,20 @@
       (=ucs		  . #x006A)	; j
       ))
     (=ucs		. #x01C9)	; lj
+    (->titlecase
+     ((name		  . "LATIN CAPITAL LETTER L WITH SMALL LETTER J")
+      (=ucs		  . #x01C8)	; Lj
+      ))
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER LJ")
+      (=ucs		  . #x01C7)	; LJ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER NJ")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER NJ")
-      (=ucs		  . #x01CC)	; nj
-      ))
-    (->titlecase
-     ((name		  . "LATIN CAPITAL LETTER N WITH SMALL LETTER J")
-      (=ucs		  . #x01CB)	; Nj
-      ))
     (=>decomposition@compat
      ((name		  . "LATIN CAPITAL LETTER N")
       (=ucs		  . #x004E)	; N
@@ -919,20 +911,20 @@
       (=ucs		  . #x004A)	; J
       ))
     (=ucs		. #x01CA)	; NJ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER NJ")
+      (=ucs		  . #x01CC)	; nj
+      ))
+    (->titlecase
+     ((name		  . "LATIN CAPITAL LETTER N WITH SMALL LETTER J")
+      (=ucs		  . #x01CB)	; Nj
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER N WITH SMALL LETTER J")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER NJ")
-      (=ucs		  . #x01CC)	; nj
-      ))
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER NJ")
-      (=ucs		  . #x01CA)	; NJ
-      ))
     (=>decomposition@compat
      ((name		  . "LATIN CAPITAL LETTER N")
       (=ucs		  . #x004E)	; N
@@ -941,20 +933,20 @@
       (=ucs		  . #x006A)	; j
       ))
     (=ucs		. #x01CB)	; Nj
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER NJ")
+      (=ucs		  . #x01CC)	; nj
+      ))
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER NJ")
+      (=ucs		  . #x01CA)	; NJ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER NJ")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->titlecase
-     ((name		  . "LATIN CAPITAL LETTER N WITH SMALL LETTER J")
-      (=ucs		  . #x01CB)	; Nj
-      ))
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER NJ")
-      (=ucs		  . #x01CA)	; NJ
-      ))
     (=>decomposition@compat
      ((name		  . "LATIN SMALL LETTER N")
       (=ucs		  . #x006E)	; n
@@ -963,16 +955,20 @@
       (=ucs		  . #x006A)	; j
       ))
     (=ucs		. #x01CC)	; nj
+    (->titlecase
+     ((name		  . "LATIN CAPITAL LETTER N WITH SMALL LETTER J")
+      (=ucs		  . #x01CB)	; Nj
+      ))
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER NJ")
+      (=ucs		  . #x01CA)	; NJ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH CARON")
-      (=ucs		  . #x01CE)	; ǎ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
@@ -981,17 +977,16 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x01CD)	; Ǎ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH CARON")
+      (=ucs		  . #x01CE)	; ǎ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER A WITH CARON")
       (=ucs		  . #x01CD)	; Ǎ
       ))
-    (->lowercase
-     ((=gb2312		  . #x2823)	; &JX1-2870; [08-03]
-      (=jis-x0212	  . #x2B26)	; &I-JSP-2B26; [11-06]
-      (=jis-x0213-1-2000  . #x2870)	; &I-JX1-2870; [08-80]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER A WITH CARON")
       (=ucs		  . #x01CD)	; Ǎ
@@ -1007,16 +1002,17 @@
     (=jis-x0213-1-2000	. #x286F)	; &I-JX1-286F; [08-79]
     (=jef-china3	. #x88DF)	; &I-JC3-88DF;
     (=ucs@jis/fw	. #x01CD)	; &JX1-286F;
+    (->lowercase
+     ((=gb2312		  . #x2823)	; &JX1-2870; [08-03]
+      (=jis-x0212	  . #x2B26)	; &I-JSP-2B26; [11-06]
+      (=jis-x0213-1-2000  . #x2870)	; &I-JX1-2870; [08-80]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER A WITH CARON")
-      (=ucs		  . #x01CD)	; Ǎ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
@@ -1025,16 +1021,16 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x01CE)	; ǎ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER A WITH CARON")
+      (=ucs		  . #x01CD)	; Ǎ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER A WITH CARON")
       (=ucs		  . #x01CE)	; ǎ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A26)	; &JX1-286F; [10-06]
-      (=jis-x0213-1-2000  . #x286F)	; &I-JX1-286F; [08-79]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER A WITH CARON")
       (=ucs		  . #x01CE)	; ǎ
@@ -1052,16 +1048,16 @@
     (=jef-china3	. #x88EE)	; &I-JC3-88EE;
     (=ucs@gb/fw		. #x01CE)	; &JX1-2870;
     (=ucs@jis/fw	. #x01CE)	; &JX1-2870;
+    (->uppercase
+     ((=jis-x0212	  . #x2A26)	; &JX1-286F; [10-06]
+      (=jis-x0213-1-2000  . #x286F)	; &I-JX1-286F; [08-79]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER I WITH CARON")
-      (=ucs		  . #x01D0)	; ǐ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
@@ -1070,17 +1066,16 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x01CF)	; Ǐ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER I WITH CARON")
+      (=ucs		  . #x01D0)	; ǐ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER I WITH CARON")
       (=ucs		  . #x01CF)	; Ǐ
       ))
-    (->lowercase
-     ((=gb2312		  . #x282B)	; &JX1-2871; [08-11]
-      (=jis-x0212	  . #x2B43)	; &I-JSP-2B43; [11-35]
-      (=jis-x0213-1-2000  . #x2871)	; &I-JX1-2871; [08-81]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER I WITH CARON")
       (=ucs		  . #x01CF)	; Ǐ
@@ -1095,16 +1090,17 @@
     (=jis-x0212		. #x2A43)	; &JSP-2A43; [10-35]
     (=jef-china3	. #x88E4)	; &I-JC3-88E4;
     (=ucs@jis/fw	. #x01CF)	; &JSP-2A43;
+    (->lowercase
+     ((=gb2312		  . #x282B)	; &JX1-2871; [08-11]
+      (=jis-x0212	  . #x2B43)	; &I-JSP-2B43; [11-35]
+      (=jis-x0213-1-2000  . #x2871)	; &I-JX1-2871; [08-81]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER I WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER I WITH CARON")
-      (=ucs		  . #x01CF)	; Ǐ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER I")
       (=ucs		  . #x0069)	; i
@@ -1113,15 +1109,16 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x01D0)	; ǐ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER I WITH CARON")
+      (=ucs		  . #x01CF)	; Ǐ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER I WITH CARON")
       (=ucs		  . #x01D0)	; ǐ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A43)	; &JSP-2A43; [10-35]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER I WITH CARON")
       (=ucs		  . #x01D0)	; ǐ
@@ -1138,16 +1135,15 @@
     (=jis-x0213-1-2000	. #x2871)	; &I-JX1-2871; [08-81]
     (=ucs@gb/fw		. #x01D0)	; &JX1-2871;
     (=ucs@jis/fw	. #x01D0)	; &JX1-2871;
+    (->uppercase
+     ((=jis-x0212	  . #x2A43)	; &JSP-2A43; [10-35]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH CARON")
-      (=ucs		  . #x01D2)	; ǒ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
@@ -1156,17 +1152,16 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x01D1)	; Ǒ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH CARON")
+      (=ucs		  . #x01D2)	; ǒ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER O WITH CARON")
       (=ucs		  . #x01D1)	; Ǒ
       ))
-    (->lowercase
-     ((=gb2312		  . #x282F)	; &JX1-2877; [08-15]
-      (=jis-x0212	  . #x2B55)	; &I-JSP-2B55; [11-53]
-      (=jis-x0213-1-2000  . #x2877)	; &I-JX1-2877; [08-87]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER O WITH CARON")
       (=ucs		  . #x01D1)	; Ǒ
@@ -1182,16 +1177,17 @@
     (=jis-x0213-1-2000	. #x2876)	; &I-JX1-2876; [08-86]
     (=jef-china3	. #x88E8)	; &I-JC3-88E8;
     (=ucs@jis/fw	. #x01D1)	; &JX1-2876;
+    (->lowercase
+     ((=gb2312		  . #x282F)	; &JX1-2877; [08-15]
+      (=jis-x0212	  . #x2B55)	; &I-JSP-2B55; [11-53]
+      (=jis-x0213-1-2000  . #x2877)	; &I-JX1-2877; [08-87]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH CARON")
-      (=ucs		  . #x01D1)	; Ǒ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
@@ -1200,16 +1196,16 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x01D2)	; ǒ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH CARON")
+      (=ucs		  . #x01D1)	; Ǒ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER O WITH CARON")
       (=ucs		  . #x01D2)	; ǒ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A55)	; &JX1-2876; [10-53]
-      (=jis-x0213-1-2000  . #x2876)	; &I-JX1-2876; [08-86]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER O WITH CARON")
       (=ucs		  . #x01D2)	; ǒ
@@ -1227,16 +1223,16 @@
     (=jef-china3	. #x88F7)	; &I-JC3-88F7;
     (=ucs@gb/fw		. #x01D2)	; &JX1-2877;
     (=ucs@jis/fw	. #x01D2)	; &JX1-2877;
+    (->uppercase
+     ((=jis-x0212	  . #x2A55)	; &JX1-2876; [10-53]
+      (=jis-x0213-1-2000  . #x2876)	; &I-JX1-2876; [08-86]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH CARON")
-      (=ucs		  . #x01D4)	; ǔ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -1245,17 +1241,16 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x01D3)	; Ǔ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH CARON")
+      (=ucs		  . #x01D4)	; ǔ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER U WITH CARON")
       (=ucs		  . #x01D3)	; Ǔ
       ))
-    (->lowercase
-     ((=gb2312		  . #x2833)	; &JX1-2878; [08-19]
-      (=jis-x0212	  . #x2B67)	; &I-JSP-2B67; [11-71]
-      (=jis-x0213-1-2000  . #x2878)	; &I-JX1-2878; [08-88]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER U WITH CARON")
       (=ucs		  . #x01D3)	; Ǔ
@@ -1270,16 +1265,17 @@
     (=jis-x0212		. #x2A67)	; &JSP-2A67; [10-71]
     (=jef-china3	. #x88EC)	; &I-JC3-88EC;
     (=ucs@jis/fw	. #x01D3)	; &JSP-2A67;
+    (->lowercase
+     ((=gb2312		  . #x2833)	; &JX1-2878; [08-19]
+      (=jis-x0212	  . #x2B67)	; &I-JSP-2B67; [11-71]
+      (=jis-x0213-1-2000  . #x2878)	; &I-JX1-2878; [08-88]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH CARON")
-      (=ucs		  . #x01D3)	; Ǔ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -1288,15 +1284,16 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x01D4)	; ǔ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH CARON")
+      (=ucs		  . #x01D3)	; Ǔ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER U WITH CARON")
       (=ucs		  . #x01D4)	; ǔ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A67)	; &JSP-2A67; [10-71]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER U WITH CARON")
       (=ucs		  . #x01D4)	; ǔ
@@ -1314,16 +1311,15 @@
     (=jef-china3	. #x88FB)	; &I-JC3-88FB;
     (=ucs@gb/fw		. #x01D4)	; &JX1-2878;
     (=ucs@jis/fw	. #x01D4)	; &JX1-2878;
+    (->uppercase
+     ((=jis-x0212	  . #x2A67)	; &JSP-2A67; [10-71]
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER U WITH DIAERESIS AND MACRON")
-      (=ucs		  . #x01D6)	; ǖ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U WITH DIAERESIS")
       (=ucs		  . #x00DC)	; Ü
@@ -1332,33 +1328,33 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x01D5)	; Ǖ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER U WITH DIAERESIS AND MACRON")
+      (=ucs		  . #x01D6)	; ǖ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND MACRON")
       (=ucs		  . #x01D5)	; Ǖ
       ))
-    (->lowercase
-     ((=gb2312		  . #x2835)	; &JX1-2879; [08-21]
-      (=jis-x0212	  . #x2B70)	; &I-JSP-2B70; [11-80]
-      (=jis-x0213-1-2000  . #x2879)	; &I-JX1-2879; [08-89]
-      ))
     (<-fullwidth
      ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND MACRON")
       (=ucs		  . #x01D5)	; Ǖ
       ))
     (=jis-x0212		. #x2A70)	; &JSP-2A70; [10-80]
     (=ucs@jis/fw	. #x01D5)	; &JSP-2A70;
+    (->lowercase
+     ((=gb2312		  . #x2835)	; &JX1-2879; [08-21]
+      (=jis-x0212	  . #x2B70)	; &I-JSP-2B70; [11-80]
+      (=jis-x0213-1-2000  . #x2879)	; &I-JX1-2879; [08-89]
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER U WITH DIAERESIS AND MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND MACRON")
-      (=ucs		  . #x01D5)	; Ǖ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U WITH DIAERESIS")
       (=ucs		  . #x00FC)	; ü
@@ -1367,15 +1363,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x01D6)	; ǖ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND MACRON")
+      (=ucs		  . #x01D5)	; Ǖ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN SMALL LETTER U WITH DIAERESIS AND MACRON")
       (=ucs		  . #x01D6)	; ǖ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A70)	; &JSP-2A70; [10-80]
-      ))
     (<-fullwidth
      ((name . "LATIN SMALL LETTER U WITH DIAERESIS AND MACRON")
       (=ucs		  . #x01D6)	; ǖ
@@ -1385,16 +1382,15 @@
     (=jis-x0213-1-2000	. #x2879)	; &I-JX1-2879; [08-89]
     (=ucs@gb/fw		. #x01D6)	; &JX1-2879;
     (=ucs@jis/fw	. #x01D6)	; &JX1-2879;
+    (->uppercase
+     ((=jis-x0212	  . #x2A70)	; &JSP-2A70; [10-80]
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER U WITH DIAERESIS AND ACUTE")
-      (=ucs		  . #x01D8)	; ǘ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U WITH DIAERESIS")
       (=ucs		  . #x00DC)	; Ü
@@ -1403,33 +1399,33 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x01D7)	; Ǘ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER U WITH DIAERESIS AND ACUTE")
+      (=ucs		  . #x01D8)	; ǘ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND ACUTE")
       (=ucs		  . #x01D7)	; Ǘ
       ))
-    (->lowercase
-     ((=gb2312		  . #x2836)	; &JX1-287A; [08-22]
-      (=jis-x0212	  . #x2B6D)	; &I-JSP-2B6D; [11-77]
-      (=jis-x0213-1-2000  . #x287A)	; &I-JX1-287A; [08-90]
-      ))
     (<-fullwidth
      ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND ACUTE")
       (=ucs		  . #x01D7)	; Ǘ
       ))
     (=jis-x0212		. #x2A6D)	; &JSP-2A6D; [10-77]
     (=ucs@jis/fw	. #x01D7)	; &JSP-2A6D;
+    (->lowercase
+     ((=gb2312		  . #x2836)	; &JX1-287A; [08-22]
+      (=jis-x0212	  . #x2B6D)	; &I-JSP-2B6D; [11-77]
+      (=jis-x0213-1-2000  . #x287A)	; &I-JX1-287A; [08-90]
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER U WITH DIAERESIS AND ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND ACUTE")
-      (=ucs		  . #x01D7)	; Ǘ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U WITH DIAERESIS")
       (=ucs		  . #x00FC)	; ü
@@ -1438,15 +1434,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x01D8)	; ǘ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND ACUTE")
+      (=ucs		  . #x01D7)	; Ǘ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN SMALL LETTER U WITH DIAERESIS AND ACUTE")
       (=ucs		  . #x01D8)	; ǘ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A6D)	; &JSP-2A6D; [10-77]
-      ))
     (<-fullwidth
      ((name . "LATIN SMALL LETTER U WITH DIAERESIS AND ACUTE")
       (=ucs		  . #x01D8)	; ǘ
@@ -1456,16 +1453,15 @@
     (=jis-x0213-1-2000	. #x287A)	; &I-JX1-287A; [08-90]
     (=ucs@gb/fw		. #x01D8)	; &JX1-287A;
     (=ucs@jis/fw	. #x01D8)	; &JX1-287A;
+    (->uppercase
+     ((=jis-x0212	  . #x2A6D)	; &JSP-2A6D; [10-77]
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER U WITH DIAERESIS AND CARON")
-      (=ucs		  . #x01DA)	; ǚ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U WITH DIAERESIS")
       (=ucs		  . #x00DC)	; Ü
@@ -1474,33 +1470,33 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x01D9)	; Ǚ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER U WITH DIAERESIS AND CARON")
+      (=ucs		  . #x01DA)	; ǚ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND CARON")
       (=ucs		  . #x01D9)	; Ǚ
       ))
-    (->lowercase
-     ((=gb2312		  . #x2837)	; &JX1-287B; [08-23]
-      (=jis-x0212	  . #x2B6F)	; &I-JSP-2B6F; [11-79]
-      (=jis-x0213-1-2000  . #x287B)	; &I-JX1-287B; [08-91]
-      ))
     (<-fullwidth
      ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND CARON")
       (=ucs		  . #x01D9)	; Ǚ
       ))
     (=jis-x0212		. #x2A6F)	; &JSP-2A6F; [10-79]
     (=ucs@jis/fw	. #x01D9)	; &JSP-2A6F;
+    (->lowercase
+     ((=gb2312		  . #x2837)	; &JX1-287B; [08-23]
+      (=jis-x0212	  . #x2B6F)	; &I-JSP-2B6F; [11-79]
+      (=jis-x0213-1-2000  . #x287B)	; &I-JX1-287B; [08-91]
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER U WITH DIAERESIS AND CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND CARON")
-      (=ucs		  . #x01D9)	; Ǚ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U WITH DIAERESIS")
       (=ucs		  . #x00FC)	; ü
@@ -1509,15 +1505,16 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x01DA)	; ǚ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND CARON")
+      (=ucs		  . #x01D9)	; Ǚ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN SMALL LETTER U WITH DIAERESIS AND CARON")
       (=ucs		  . #x01DA)	; ǚ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A6F)	; &JSP-2A6F; [10-79]
-      ))
     (<-fullwidth
      ((name . "LATIN SMALL LETTER U WITH DIAERESIS AND CARON")
       (=ucs		  . #x01DA)	; ǚ
@@ -1527,16 +1524,15 @@
     (=jis-x0213-1-2000	. #x287B)	; &I-JX1-287B; [08-91]
     (=ucs@gb/fw		. #x01DA)	; &JX1-287B;
     (=ucs@jis/fw	. #x01DA)	; &JX1-287B;
+    (->uppercase
+     ((=jis-x0212	  . #x2A6F)	; &JSP-2A6F; [10-79]
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER U WITH DIAERESIS AND GRAVE")
-      (=ucs		  . #x01DC)	; ǜ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U WITH DIAERESIS")
       (=ucs		  . #x00DC)	; Ü
@@ -1545,33 +1541,33 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x01DB)	; Ǜ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER U WITH DIAERESIS AND GRAVE")
+      (=ucs		  . #x01DC)	; ǜ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND GRAVE")
       (=ucs		  . #x01DB)	; Ǜ
       ))
-    (->lowercase
-     ((=gb2312		  . #x2838)	; &JX1-287C; [08-24]
-      (=jis-x0212	  . #x2B6E)	; &I-JSP-2B6E; [11-78]
-      (=jis-x0213-1-2000  . #x287C)	; &I-JX1-287C; [08-92]
-      ))
     (<-fullwidth
      ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND GRAVE")
       (=ucs		  . #x01DB)	; Ǜ
       ))
     (=jis-x0212		. #x2A6E)	; &JSP-2A6E; [10-78]
     (=ucs@jis/fw	. #x01DB)	; &JSP-2A6E;
+    (->lowercase
+     ((=gb2312		  . #x2838)	; &JX1-287C; [08-24]
+      (=jis-x0212	  . #x2B6E)	; &I-JSP-2B6E; [11-78]
+      (=jis-x0213-1-2000  . #x287C)	; &I-JX1-287C; [08-92]
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER U WITH DIAERESIS AND GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND GRAVE")
-      (=ucs		  . #x01DB)	; Ǜ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U WITH DIAERESIS")
       (=ucs		  . #x00FC)	; ü
@@ -1580,15 +1576,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x01DC)	; ǜ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS AND GRAVE")
+      (=ucs		  . #x01DB)	; Ǜ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN SMALL LETTER U WITH DIAERESIS AND GRAVE")
       (=ucs		  . #x01DC)	; ǜ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2A6E)	; &JSP-2A6E; [10-78]
-      ))
     (<-fullwidth
      ((name . "LATIN SMALL LETTER U WITH DIAERESIS AND GRAVE")
       (=ucs		  . #x01DC)	; ǜ
@@ -1598,27 +1595,26 @@
     (=jis-x0213-1-2000	. #x287C)	; &I-JX1-287C; [08-92]
     (=ucs@gb/fw		. #x01DC)	; &JX1-287C;
     (=ucs@jis/fw	. #x01DC)	; &JX1-287C;
+    (->uppercase
+     ((=jis-x0212	  . #x2A6E)	; &JSP-2A6E; [10-78]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER TURNED E")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01DD)	; ǝ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER REVERSED E")
       (=ucs		  . #x018E)	; Ǝ
       ))
-    (=ucs		. #x01DD)	; ǝ
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER A WITH DIAERESIS AND MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER A WITH DIAERESIS AND MACRON")
-      (=ucs		  . #x01DF)	; ǟ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A WITH DIAERESIS")
       (=ucs		  . #x00C4)	; Ä
@@ -1627,16 +1623,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x01DE)	; Ǟ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER A WITH DIAERESIS AND MACRON")
+      (=ucs		  . #x01DF)	; ǟ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER A WITH DIAERESIS AND MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER A WITH DIAERESIS AND MACRON")
-      (=ucs		  . #x01DE)	; Ǟ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A WITH DIAERESIS")
       (=ucs		  . #x00E4)	; ä
@@ -1645,16 +1641,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x01DF)	; ǟ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER A WITH DIAERESIS AND MACRON")
+      (=ucs		  . #x01DE)	; Ǟ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER A WITH DOT ABOVE AND MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER A WITH DOT ABOVE AND MACRON")
-      (=ucs		  . #x01E1)	; Ç¡
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A WITH DOT ABOVE")
       (=ucs		  . #x0226)	; Ȧ
@@ -1663,16 +1659,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x01E0)	; Ç 
+    (->lowercase
+     ((name . "LATIN SMALL LETTER A WITH DOT ABOVE AND MACRON")
+      (=ucs		  . #x01E1)	; Ç¡
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER A WITH DOT ABOVE AND MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER A WITH DOT ABOVE AND MACRON")
-      (=ucs		  . #x01E0)	; Ç 
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A WITH DOT ABOVE")
       (=ucs		  . #x0227)	; ȧ
@@ -1681,6 +1677,10 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x01E1)	; Ç¡
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER A WITH DOT ABOVE AND MACRON")
+      (=ucs		  . #x01E0)	; Ç 
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER AE WITH MACRON")
@@ -1688,10 +1688,6 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "ash *")
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER AE WITH MACRON")
-      (=ucs		  . #x01E3)	; ǣ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER AE")
       (=ucs		  . #x00C6)	; Æ
@@ -1700,6 +1696,10 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x01E2)	; Ǣ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER AE WITH MACRON")
+      (=ucs		  . #x01E3)	; ǣ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER AE WITH MACRON")
@@ -1707,10 +1707,6 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "ash *")
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER AE WITH MACRON")
-      (=ucs		  . #x01E2)	; Ǣ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER AE")
       (=ucs		  . #x00E6)	; æ
@@ -1719,38 +1715,38 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x01E3)	; ǣ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER AE WITH MACRON")
+      (=ucs		  . #x01E2)	; Ǣ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER G WITH STROKE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01E4)	; Ǥ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER G WITH STROKE")
       (=ucs		  . #x01E5)	; ǥ
       ))
-    (=ucs		. #x01E4)	; Ǥ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER G WITH STROKE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01E5)	; ǥ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER G WITH STROKE")
       (=ucs		  . #x01E4)	; Ǥ
       ))
-    (=ucs		. #x01E5)	; ǥ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER G WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER G WITH CARON")
-      (=ucs		  . #x01E7)	; ǧ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER G")
       (=ucs		  . #x0047)	; G
@@ -1759,16 +1755,16 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x01E6)	; Ǧ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER G WITH CARON")
+      (=ucs		  . #x01E7)	; ǧ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER G WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER G WITH CARON")
-      (=ucs		  . #x01E6)	; Ǧ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER G")
       (=ucs		  . #x0067)	; g
@@ -1777,16 +1773,16 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x01E7)	; ǧ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER G WITH CARON")
+      (=ucs		  . #x01E6)	; Ǧ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER K WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER K WITH CARON")
-      (=ucs		  . #x01E9)	; Ç©
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER K")
       (=ucs		  . #x004B)	; K
@@ -1795,16 +1791,16 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x01E8)	; Ǩ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER K WITH CARON")
+      (=ucs		  . #x01E9)	; Ç©
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER K WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER K WITH CARON")
-      (=ucs		  . #x01E8)	; Ǩ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER K")
       (=ucs		  . #x006B)	; k
@@ -1813,16 +1809,16 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x01E9)	; Ç©
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER K WITH CARON")
+      (=ucs		  . #x01E8)	; Ǩ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH OGONEK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH OGONEK")
-      (=ucs		  . #x01EB)	; Ç«
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
@@ -1831,16 +1827,16 @@
       (=ucs		  . #x0328)	; ̨
       ))
     (=ucs		. #x01EA)	; Ǫ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH OGONEK")
+      (=ucs		  . #x01EB)	; Ç«
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH OGONEK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH OGONEK")
-      (=ucs		  . #x01EA)	; Ǫ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
@@ -1849,16 +1845,16 @@
       (=ucs		  . #x0328)	; ̨
       ))
     (=ucs		. #x01EB)	; Ç«
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH OGONEK")
+      (=ucs		  . #x01EA)	; Ǫ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER O WITH OGONEK AND MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER O WITH OGONEK AND MACRON")
-      (=ucs		  . #x01ED)	; Ç­
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH OGONEK")
       (=ucs		  . #x01EA)	; Ǫ
@@ -1867,16 +1863,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x01EC)	; Ǭ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER O WITH OGONEK AND MACRON")
+      (=ucs		  . #x01ED)	; Ç­
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH OGONEK AND MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER O WITH OGONEK AND MACRON")
-      (=ucs		  . #x01EC)	; Ǭ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH OGONEK")
       (=ucs		  . #x01EB)	; Ç«
@@ -1885,16 +1881,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x01ED)	; Ç­
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER O WITH OGONEK AND MACRON")
+      (=ucs		  . #x01EC)	; Ǭ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER EZH WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER EZH WITH CARON")
-      (=ucs		  . #x01EF)	; ǯ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER EZH")
       (=ucs		  . #x01B7)	; Æ·
@@ -1903,16 +1899,16 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x01EE)	; Ç®
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER EZH WITH CARON")
+      (=ucs		  . #x01EF)	; ǯ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER EZH WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER EZH WITH CARON")
-      (=ucs		  . #x01EE)	; Ç®
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER EZH")
       (=ucs		  . #x0292)	; ʒ
@@ -1921,6 +1917,10 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x01EF)	; ǯ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER EZH WITH CARON")
+      (=ucs		  . #x01EE)	; Ç®
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER J WITH CARON")
@@ -1941,14 +1941,6 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER DZ")
-      (=ucs		  . #x01F3)	; dz
-      ))
-    (->titlecase
-     ((name		  . "LATIN CAPITAL LETTER D WITH SMALL LETTER Z")
-      (=ucs		  . #x01F2)	; Dz
-      ))
     (=>decomposition@compat
      ((name		  . "LATIN CAPITAL LETTER D")
       (=ucs		  . #x0044)	; D
@@ -1957,20 +1949,20 @@
       (=ucs		  . #x005A)	; Z
       ))
     (=ucs		. #x01F1)	; DZ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER DZ")
+      (=ucs		  . #x01F3)	; dz
+      ))
+    (->titlecase
+     ((name		  . "LATIN CAPITAL LETTER D WITH SMALL LETTER Z")
+      (=ucs		  . #x01F2)	; Dz
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER D WITH SMALL LETTER Z")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER DZ")
-      (=ucs		  . #x01F3)	; dz
-      ))
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER DZ")
-      (=ucs		  . #x01F1)	; DZ
-      ))
     (=>decomposition@compat
      ((name		  . "LATIN CAPITAL LETTER D")
       (=ucs		  . #x0044)	; D
@@ -1979,20 +1971,20 @@
       (=ucs		  . #x007A)	; z
       ))
     (=ucs		. #x01F2)	; Dz
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER DZ")
+      (=ucs		  . #x01F3)	; dz
+      ))
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER DZ")
+      (=ucs		  . #x01F1)	; DZ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER DZ")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->titlecase
-     ((name		  . "LATIN CAPITAL LETTER D WITH SMALL LETTER Z")
-      (=ucs		  . #x01F2)	; Dz
-      ))
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER DZ")
-      (=ucs		  . #x01F1)	; DZ
-      ))
     (=>decomposition@compat
      ((name		  . "LATIN SMALL LETTER D")
       (=ucs		  . #x0064)	; d
@@ -2001,16 +1993,20 @@
       (=ucs		  . #x007A)	; z
       ))
     (=ucs		. #x01F3)	; dz
+    (->titlecase
+     ((name		  . "LATIN CAPITAL LETTER D WITH SMALL LETTER Z")
+      (=ucs		  . #x01F2)	; Dz
+      ))
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER DZ")
+      (=ucs		  . #x01F1)	; DZ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER G WITH ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER G WITH ACUTE")
-      (=ucs		  . #x01F5)	; ǵ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER G")
       (=ucs		  . #x0047)	; G
@@ -2019,15 +2015,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x01F4)	; Ç´
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER G WITH ACUTE")
+      (=ucs		  . #x01F5)	; ǵ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER G WITH ACUTE")
       (=ucs		  . #x01F4)	; Ç´
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2B39)	; &JSP-2B39; [11-25]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER G WITH ACUTE")
       (=ucs		  . #x01F4)	; Ç´
@@ -2040,16 +2037,15 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=jef-china3	. #x85D9)	; &JC3-85D9;
+    (->lowercase
+     ((=jis-x0212	  . #x2B39)	; &JSP-2B39; [11-25]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER G WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER G WITH ACUTE")
-      (=ucs		  . #x01F4)	; Ç´
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER G")
       (=ucs		  . #x0067)	; g
@@ -2058,15 +2054,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x01F5)	; ǵ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER G WITH ACUTE")
+      (=ucs		  . #x01F4)	; Ç´
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER G WITH ACUTE")
       (=ucs		  . #x01F5)	; ǵ
       ))
-    (->uppercase
-     ((=jef-china3	  . #x85D9)	; &JC3-85D9;
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER G WITH ACUTE")
       (=ucs		  . #x01F5)	; ǵ
@@ -2081,38 +2078,37 @@
     (=jis-x0212		. #x2B39)	; &JSP-2B39; [11-25]
     (=jef-china3	. #x85EF)	; &I-JC3-85EF;
     (=ucs@jis/fw	. #x01F5)	; &JSP-2B39;
+    (->uppercase
+     ((=jef-china3	  . #x85D9)	; &JC3-85D9;
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER HWAIR")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01F6)	; Ƕ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER HV")
       (=ucs		  . #x0195)	; ƕ
       ))
-    (=ucs		. #x01F6)	; Ƕ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER WYNN")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x01F7)	; Ç·
     (->lowercase
      ((name		  . "LATIN LETTER WYNN")
       (=ucs		  . #x01BF)	; Æ¿
       ))
-    (=ucs		. #x01F7)	; Ç·
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER N WITH GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER N WITH GRAVE")
-      (=ucs		  . #x01F9)	; ǹ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER N")
       (=ucs		  . #x004E)	; N
@@ -2121,15 +2117,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x01F8)	; Ǹ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER N WITH GRAVE")
+      (=ucs		  . #x01F9)	; ǹ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER N WITH GRAVE")
       (=ucs		  . #x01F8)	; Ǹ
       ))
-    (->lowercase
-     ((=jis-x0213-1-2000  . #x2875)	; &JX1-2875; [08-85]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER N WITH GRAVE")
       (=ucs		  . #x01F8)	; Ǹ
@@ -2144,16 +2141,15 @@
     (=jis-x0213-1-2000	. #x2874)	; &JX1-2874; [08-84]
     (=jef-china3	. #x85BC)	; &I-JC3-85BC;
     (=ucs@jis/fw	. #x01F8)	; &JX1-2874;
+    (->lowercase
+     ((=jis-x0213-1-2000  . #x2875)	; &JX1-2875; [08-85]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER N WITH GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER N WITH GRAVE")
-      (=ucs		  . #x01F8)	; Ǹ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER N")
       (=ucs		  . #x006E)	; n
@@ -2162,15 +2158,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x01F9)	; ǹ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER N WITH GRAVE")
+      (=ucs		  . #x01F8)	; Ǹ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER N WITH GRAVE")
       (=ucs		  . #x01F9)	; ǹ
       ))
-    (->uppercase
-     ((=jis-x0213-1-2000  . #x2874)	; &JX1-2874; [08-84]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER N WITH GRAVE")
       (=ucs		  . #x01F9)	; ǹ
@@ -2184,16 +2181,15 @@
       ))
     (=jis-x0213-1-2000	. #x2875)	; &JX1-2875; [08-85]
     (=ucs@jis/fw	. #x01F9)	; &JX1-2875;
+    (->uppercase
+     ((=jis-x0213-1-2000  . #x2874)	; &JX1-2874; [08-84]
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER A WITH RING ABOVE AND ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER A WITH RING ABOVE AND ACUTE")
-      (=ucs		  . #x01FB)	; Ç»
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A WITH RING ABOVE")
       (=ucs		  . #x00C5)	; Å
@@ -2202,16 +2198,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x01FA)	; Ǻ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER A WITH RING ABOVE AND ACUTE")
+      (=ucs		  . #x01FB)	; Ç»
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER A WITH RING ABOVE AND ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER A WITH RING ABOVE AND ACUTE")
-      (=ucs		  . #x01FA)	; Ǻ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A WITH RING ABOVE")
       (=ucs		  . #x00E5)	; å
@@ -2220,6 +2216,10 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x01FB)	; Ç»
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER A WITH RING ABOVE AND ACUTE")
+      (=ucs		  . #x01FA)	; Ǻ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER AE WITH ACUTE")
@@ -2227,10 +2227,6 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "ash *")
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER AE WITH ACUTE")
-      (=ucs		  . #x01FD)	; ǽ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER AE")
       (=ucs		  . #x00C6)	; Æ
@@ -2239,6 +2235,10 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x01FC)	; Ǽ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER AE WITH ACUTE")
+      (=ucs		  . #x01FD)	; ǽ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER AE WITH ACUTE")
@@ -2246,10 +2246,6 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "ash *")
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER AE WITH ACUTE")
-      (=ucs		  . #x01FC)	; Ǽ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER AE")
       (=ucs		  . #x00E6)	; æ
@@ -2258,6 +2254,10 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x01FD)	; ǽ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER AE WITH ACUTE")
+      (=ucs		  . #x01FC)	; Ǽ
+      ))
     ))
 (define-char
   '((<-denotational
@@ -2276,10 +2276,6 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH STROKE AND ACUTE")
-      (=ucs		  . #x01FF)	; Ç¿
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH STROKE")
       (=ucs		  . #x00D8)	; Ø
@@ -2288,16 +2284,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x01FE)	; Ǿ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH STROKE AND ACUTE")
+      (=ucs		  . #x01FF)	; Ç¿
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH STROKE AND ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER O WITH STROKE AND ACUTE")
-      (=ucs		  . #x01FE)	; Ǿ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH STROKE")
       (=ucs		  . #x00F8)	; ø
@@ -2306,16 +2302,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x01FF)	; Ç¿
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER O WITH STROKE AND ACUTE")
+      (=ucs		  . #x01FE)	; Ǿ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A WITH DOUBLE GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH DOUBLE GRAVE")
-      (=ucs		  . #x0201)	; ȁ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
@@ -2324,16 +2320,16 @@
       (=ucs		  . #x030F)	; ̏
       ))
     (=ucs		. #x0200)	; Ȁ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH DOUBLE GRAVE")
+      (=ucs		  . #x0201)	; ȁ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH DOUBLE GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER A WITH DOUBLE GRAVE")
-      (=ucs		  . #x0200)	; Ȁ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
@@ -2342,16 +2338,16 @@
       (=ucs		  . #x030F)	; ̏
       ))
     (=ucs		. #x0201)	; ȁ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER A WITH DOUBLE GRAVE")
+      (=ucs		  . #x0200)	; Ȁ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A WITH INVERTED BREVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH INVERTED BREVE")
-      (=ucs		  . #x0203)	; ȃ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
@@ -2360,16 +2356,16 @@
       (=ucs		  . #x0311)	; ̑
       ))
     (=ucs		. #x0202)	; Ȃ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH INVERTED BREVE")
+      (=ucs		  . #x0203)	; ȃ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH INVERTED BREVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER A WITH INVERTED BREVE")
-      (=ucs		  . #x0202)	; Ȃ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
@@ -2378,16 +2374,16 @@
       (=ucs		  . #x0311)	; ̑
       ))
     (=ucs		. #x0203)	; ȃ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER A WITH INVERTED BREVE")
+      (=ucs		  . #x0202)	; Ȃ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH DOUBLE GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH DOUBLE GRAVE")
-      (=ucs		  . #x0205)	; ȅ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -2396,16 +2392,16 @@
       (=ucs		  . #x030F)	; ̏
       ))
     (=ucs		. #x0204)	; Ȅ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH DOUBLE GRAVE")
+      (=ucs		  . #x0205)	; ȅ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH DOUBLE GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER E WITH DOUBLE GRAVE")
-      (=ucs		  . #x0204)	; Ȅ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -2414,16 +2410,16 @@
       (=ucs		  . #x030F)	; ̏
       ))
     (=ucs		. #x0205)	; ȅ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER E WITH DOUBLE GRAVE")
+      (=ucs		  . #x0204)	; Ȅ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH INVERTED BREVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH INVERTED BREVE")
-      (=ucs		  . #x0207)	; ȇ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -2432,16 +2428,16 @@
       (=ucs		  . #x0311)	; ̑
       ))
     (=ucs		. #x0206)	; Ȇ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH INVERTED BREVE")
+      (=ucs		  . #x0207)	; ȇ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH INVERTED BREVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER E WITH INVERTED BREVE")
-      (=ucs		  . #x0206)	; Ȇ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -2450,16 +2446,16 @@
       (=ucs		  . #x0311)	; ̑
       ))
     (=ucs		. #x0207)	; ȇ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER E WITH INVERTED BREVE")
+      (=ucs		  . #x0206)	; Ȇ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I WITH DOUBLE GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER I WITH DOUBLE GRAVE")
-      (=ucs		  . #x0209)	; ȉ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
@@ -2468,16 +2464,16 @@
       (=ucs		  . #x030F)	; ̏
       ))
     (=ucs		. #x0208)	; Ȉ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER I WITH DOUBLE GRAVE")
+      (=ucs		  . #x0209)	; ȉ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER I WITH DOUBLE GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER I WITH DOUBLE GRAVE")
-      (=ucs		  . #x0208)	; Ȉ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER I")
       (=ucs		  . #x0069)	; i
@@ -2486,16 +2482,16 @@
       (=ucs		  . #x030F)	; ̏
       ))
     (=ucs		. #x0209)	; ȉ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER I WITH DOUBLE GRAVE")
+      (=ucs		  . #x0208)	; Ȉ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I WITH INVERTED BREVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER I WITH INVERTED BREVE")
-      (=ucs		  . #x020B)	; ȋ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
@@ -2504,16 +2500,16 @@
       (=ucs		  . #x0311)	; ̑
       ))
     (=ucs		. #x020A)	; Ȋ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER I WITH INVERTED BREVE")
+      (=ucs		  . #x020B)	; ȋ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER I WITH INVERTED BREVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER I WITH INVERTED BREVE")
-      (=ucs		  . #x020A)	; Ȋ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER I")
       (=ucs		  . #x0069)	; i
@@ -2522,16 +2518,16 @@
       (=ucs		  . #x0311)	; ̑
       ))
     (=ucs		. #x020B)	; ȋ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER I WITH INVERTED BREVE")
+      (=ucs		  . #x020A)	; Ȋ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH DOUBLE GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH DOUBLE GRAVE")
-      (=ucs		  . #x020D)	; ȍ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
@@ -2540,16 +2536,16 @@
       (=ucs		  . #x030F)	; ̏
       ))
     (=ucs		. #x020C)	; Ȍ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH DOUBLE GRAVE")
+      (=ucs		  . #x020D)	; ȍ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH DOUBLE GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH DOUBLE GRAVE")
-      (=ucs		  . #x020C)	; Ȍ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
@@ -2558,16 +2554,16 @@
       (=ucs		  . #x030F)	; ̏
       ))
     (=ucs		. #x020D)	; ȍ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH DOUBLE GRAVE")
+      (=ucs		  . #x020C)	; Ȍ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH INVERTED BREVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH INVERTED BREVE")
-      (=ucs		  . #x020F)	; ȏ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
@@ -2576,16 +2572,16 @@
       (=ucs		  . #x0311)	; ̑
       ))
     (=ucs		. #x020E)	; Ȏ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH INVERTED BREVE")
+      (=ucs		  . #x020F)	; ȏ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH INVERTED BREVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH INVERTED BREVE")
-      (=ucs		  . #x020E)	; Ȏ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
@@ -2594,16 +2590,16 @@
       (=ucs		  . #x0311)	; ̑
       ))
     (=ucs		. #x020F)	; ȏ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH INVERTED BREVE")
+      (=ucs		  . #x020E)	; Ȏ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER R WITH DOUBLE GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER R WITH DOUBLE GRAVE")
-      (=ucs		  . #x0211)	; ȑ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER R")
       (=ucs		  . #x0052)	; R
@@ -2612,16 +2608,16 @@
       (=ucs		  . #x030F)	; ̏
       ))
     (=ucs		. #x0210)	; Ȑ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER R WITH DOUBLE GRAVE")
+      (=ucs		  . #x0211)	; ȑ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER R WITH DOUBLE GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER R WITH DOUBLE GRAVE")
-      (=ucs		  . #x0210)	; Ȑ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER R")
       (=ucs		  . #x0072)	; r
@@ -2630,16 +2626,16 @@
       (=ucs		  . #x030F)	; ̏
       ))
     (=ucs		. #x0211)	; ȑ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER R WITH DOUBLE GRAVE")
+      (=ucs		  . #x0210)	; Ȑ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER R WITH INVERTED BREVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER R WITH INVERTED BREVE")
-      (=ucs		  . #x0213)	; ȓ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER R")
       (=ucs		  . #x0052)	; R
@@ -2648,16 +2644,16 @@
       (=ucs		  . #x0311)	; ̑
       ))
     (=ucs		. #x0212)	; Ȓ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER R WITH INVERTED BREVE")
+      (=ucs		  . #x0213)	; ȓ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER R WITH INVERTED BREVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER R WITH INVERTED BREVE")
-      (=ucs		  . #x0212)	; Ȓ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER R")
       (=ucs		  . #x0072)	; r
@@ -2666,16 +2662,16 @@
       (=ucs		  . #x0311)	; ̑
       ))
     (=ucs		. #x0213)	; ȓ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER R WITH INVERTED BREVE")
+      (=ucs		  . #x0212)	; Ȓ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH DOUBLE GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH DOUBLE GRAVE")
-      (=ucs		  . #x0215)	; ȕ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -2684,16 +2680,16 @@
       (=ucs		  . #x030F)	; ̏
       ))
     (=ucs		. #x0214)	; Ȕ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH DOUBLE GRAVE")
+      (=ucs		  . #x0215)	; ȕ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH DOUBLE GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH DOUBLE GRAVE")
-      (=ucs		  . #x0214)	; Ȕ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -2702,16 +2698,16 @@
       (=ucs		  . #x030F)	; ̏
       ))
     (=ucs		. #x0215)	; ȕ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH DOUBLE GRAVE")
+      (=ucs		  . #x0214)	; Ȕ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH INVERTED BREVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH INVERTED BREVE")
-      (=ucs		  . #x0217)	; ȗ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -2720,16 +2716,16 @@
       (=ucs		  . #x0311)	; ̑
       ))
     (=ucs		. #x0216)	; Ȗ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH INVERTED BREVE")
+      (=ucs		  . #x0217)	; ȗ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH INVERTED BREVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH INVERTED BREVE")
-      (=ucs		  . #x0216)	; Ȗ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -2738,16 +2734,16 @@
       (=ucs		  . #x0311)	; ̑
       ))
     (=ucs		. #x0217)	; ȗ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH INVERTED BREVE")
+      (=ucs		  . #x0216)	; Ȗ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER S WITH COMMA BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER S WITH COMMA BELOW")
-      (=ucs		  . #x0219)	; ș
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER S")
       (=ucs		  . #x0053)	; S
@@ -2756,16 +2752,16 @@
       (=ucs		  . #x0326)	; ̦
       ))
     (=ucs		. #x0218)	; Ș
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER S WITH COMMA BELOW")
+      (=ucs		  . #x0219)	; ș
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER S WITH COMMA BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER S WITH COMMA BELOW")
-      (=ucs		  . #x0218)	; Ș
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER S")
       (=ucs		  . #x0073)	; s
@@ -2774,16 +2770,16 @@
       (=ucs		  . #x0326)	; ̦
       ))
     (=ucs		. #x0219)	; ș
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER S WITH COMMA BELOW")
+      (=ucs		  . #x0218)	; Ș
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER T WITH COMMA BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER T WITH COMMA BELOW")
-      (=ucs		  . #x021B)	; ț
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER T")
       (=ucs		  . #x0054)	; T
@@ -2792,16 +2788,16 @@
       (=ucs		  . #x0326)	; ̦
       ))
     (=ucs		. #x021A)	; Ț
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER T WITH COMMA BELOW")
+      (=ucs		  . #x021B)	; ț
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER T WITH COMMA BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER T WITH COMMA BELOW")
-      (=ucs		  . #x021A)	; Ț
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER T")
       (=ucs		  . #x0074)	; t
@@ -2810,38 +2806,38 @@
       (=ucs		  . #x0326)	; ̦
       ))
     (=ucs		. #x021B)	; ț
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER T WITH COMMA BELOW")
+      (=ucs		  . #x021A)	; Ț
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER YOGH")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x021C)	; Ȝ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER YOGH")
       (=ucs		  . #x021D)	; ȝ
       ))
-    (=ucs		. #x021C)	; Ȝ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER YOGH")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x021D)	; ȝ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER YOGH")
       (=ucs		  . #x021C)	; Ȝ
       ))
-    (=ucs		. #x021D)	; ȝ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER H WITH CARON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER H WITH CARON")
-      (=ucs		  . #x021F)	; ȟ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER H")
       (=ucs		  . #x0048)	; H
@@ -2850,16 +2846,16 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x021E)	; Ȟ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER H WITH CARON")
+      (=ucs		  . #x021F)	; ȟ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER H WITH CARON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER H WITH CARON")
-      (=ucs		  . #x021E)	; Ȟ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER H")
       (=ucs		  . #x0068)	; h
@@ -2868,60 +2864,60 @@
       (=ucs		  . #x030C)	; ̌
       ))
     (=ucs		. #x021F)	; ȟ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER H WITH CARON")
+      (=ucs		  . #x021E)	; Ȟ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER OU")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0222)	; Ȣ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER OU")
       (=ucs		  . #x0223)	; ȣ
       ))
-    (=ucs		. #x0222)	; Ȣ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER OU")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0223)	; ȣ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER OU")
       (=ucs		  . #x0222)	; Ȣ
       ))
-    (=ucs		. #x0223)	; ȣ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Z WITH HOOK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0224)	; Ȥ
     (->lowercase
      ((name		  . "LATIN SMALL LETTER Z WITH HOOK")
       (=ucs		  . #x0225)	; ȥ
       ))
-    (=ucs		. #x0224)	; Ȥ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Z WITH HOOK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0225)	; ȥ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER Z WITH HOOK")
       (=ucs		  . #x0224)	; Ȥ
       ))
-    (=ucs		. #x0225)	; ȥ
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH DOT ABOVE")
-      (=ucs		  . #x0227)	; ȧ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
@@ -2930,16 +2926,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x0226)	; Ȧ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH DOT ABOVE")
+      (=ucs		  . #x0227)	; ȧ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER A WITH DOT ABOVE")
-      (=ucs		  . #x0226)	; Ȧ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
@@ -2948,16 +2944,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x0227)	; ȧ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER A WITH DOT ABOVE")
+      (=ucs		  . #x0226)	; Ȧ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH CEDILLA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH CEDILLA")
-      (=ucs		  . #x0229)	; È©
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -2966,16 +2962,16 @@
       (=ucs		  . #x0327)	; ̧
       ))
     (=ucs		. #x0228)	; Ȩ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH CEDILLA")
+      (=ucs		  . #x0229)	; È©
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH CEDILLA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER E WITH CEDILLA")
-      (=ucs		  . #x0228)	; Ȩ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -2984,16 +2980,16 @@
       (=ucs		  . #x0327)	; ̧
       ))
     (=ucs		. #x0229)	; È©
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER E WITH CEDILLA")
+      (=ucs		  . #x0228)	; Ȩ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER O WITH DIAERESIS AND MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER O WITH DIAERESIS AND MACRON")
-      (=ucs		  . #x022B)	; È«
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH DIAERESIS")
       (=ucs		  . #x00D6)	; Ö
@@ -3002,16 +2998,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x022A)	; Ȫ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER O WITH DIAERESIS AND MACRON")
+      (=ucs		  . #x022B)	; È«
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER O WITH DIAERESIS AND MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER O WITH DIAERESIS AND MACRON")
-      (=ucs		  . #x022A)	; Ȫ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH DIAERESIS")
       (=ucs		  . #x00F6)	; ö
@@ -3020,16 +3016,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x022B)	; È«
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER O WITH DIAERESIS AND MACRON")
+      (=ucs		  . #x022A)	; Ȫ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH TILDE AND MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH TILDE AND MACRON")
-      (=ucs		  . #x022D)	; È­
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH TILDE")
       (=ucs		  . #x00D5)	; Õ
@@ -3038,16 +3034,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x022C)	; Ȭ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH TILDE AND MACRON")
+      (=ucs		  . #x022D)	; È­
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH TILDE AND MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER O WITH TILDE AND MACRON")
-      (=ucs		  . #x022C)	; Ȭ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH TILDE")
       (=ucs		  . #x00F5)	; õ
@@ -3056,16 +3052,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x022D)	; È­
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER O WITH TILDE AND MACRON")
+      (=ucs		  . #x022C)	; Ȭ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH DOT ABOVE")
-      (=ucs		  . #x022F)	; ȯ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
@@ -3074,16 +3070,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x022E)	; È®
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH DOT ABOVE")
+      (=ucs		  . #x022F)	; ȯ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH DOT ABOVE")
-      (=ucs		  . #x022E)	; È®
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
@@ -3092,16 +3088,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x022F)	; ȯ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH DOT ABOVE")
+      (=ucs		  . #x022E)	; È®
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER O WITH DOT ABOVE AND MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER O WITH DOT ABOVE AND MACRON")
-      (=ucs		  . #x0231)	; ȱ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH DOT ABOVE")
       (=ucs		  . #x022E)	; È®
@@ -3110,16 +3106,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x0230)	; È°
+    (->lowercase
+     ((name . "LATIN SMALL LETTER O WITH DOT ABOVE AND MACRON")
+      (=ucs		  . #x0231)	; ȱ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER O WITH DOT ABOVE AND MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER O WITH DOT ABOVE AND MACRON")
-      (=ucs		  . #x0230)	; È°
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH DOT ABOVE")
       (=ucs		  . #x022F)	; ȯ
@@ -3128,16 +3124,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x0231)	; ȱ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER O WITH DOT ABOVE AND MACRON")
+      (=ucs		  . #x0230)	; È°
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Y WITH MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER Y WITH MACRON")
-      (=ucs		  . #x0233)	; ȳ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER Y")
       (=ucs		  . #x0059)	; Y
@@ -3146,16 +3142,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x0232)	; Ȳ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER Y WITH MACRON")
+      (=ucs		  . #x0233)	; ȳ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Y WITH MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER Y WITH MACRON")
-      (=ucs		  . #x0232)	; Ȳ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER Y")
       (=ucs		  . #x0079)	; y
@@ -3164,4 +3160,8 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x0233)	; ȳ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER Y WITH MACRON")
+      (=ucs		  . #x0232)	; Ȳ
+      ))
     ))
diff --git a/lisp/utf-2000/u00250-IPA-Extensions.el b/lisp/utf-2000/u00250-IPA-Extensions.el
index 56cdee4..403079b 100644
--- a/lisp/utf-2000/u00250-IPA-Extensions.el
+++ b/lisp/utf-2000/u00250-IPA-Extensions.el
@@ -64,11 +64,11 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0253)	; ɓ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER B WITH HOOK")
       (=ucs		  . #x0181)	; Ɓ
       ))
-    (=ucs		. #x0253)	; ɓ
     ))
 (define-char
   '((<-denotational
@@ -87,12 +87,12 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0254)	; ɔ
+    (ipa		. #xB7)	; &I-MULE-IPA-37;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER OPEN O")
       (=ucs		  . #x0186)	; Ɔ
       ))
-    (=ucs		. #x0254)	; ɔ
-    (ipa		. #xB7)	; &I-MULE-IPA-37;
     ))
 (define-char
   '((<-denotational
@@ -130,11 +130,11 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0256)	; ɖ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER AFRICAN D")
       (=ucs		  . #x0189)	; Ɖ
       ))
-    (=ucs		. #x0256)	; ɖ
     ))
 (define-char
   '((<-denotational
@@ -153,11 +153,11 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0257)	; ɗ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER D WITH HOOK")
       (=ucs		  . #x018A)	; Ɗ
       ))
-    (=ucs		. #x0257)	; ɗ
     ))
 (define-char
   '((<-denotational
@@ -195,12 +195,12 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0259)	; ə
+    (ipa		. #xA7)	; &I-MULE-IPA-27;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER SCHWA")
       (=ucs		  . #x018F)	; Ə
       ))
-    (=ucs		. #x0259)	; ə
-    (ipa		. #xA7)	; &I-MULE-IPA-27;
     ))
 (define-char
   '((<-denotational
@@ -239,12 +239,12 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x025B)	; ɛ
+    (ipa		. #xA3)	; &I-MULE-IPA-23;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER OPEN E")
       (=ucs		  . #x0190)	; Ɛ
       ))
-    (=ucs		. #x025B)	; ɛ
-    (ipa		. #xA3)	; &I-MULE-IPA-23;
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER REVERSED OPEN E")
@@ -315,26 +315,26 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0260)	; É 
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER G WITH HOOK")
       (=ucs		  . #x0193)	; Ɠ
       ))
-    (=ucs		. #x0260)	; É 
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER G WITH HOOK")
       (=ucs		  . #x0260)	; É 
       ))
-    (->uppercase
-     ((=jis-x0213-1-2000  . #x2B29)	; &JX1-2B29; [11-09]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER G WITH HOOK")
       (=ucs		  . #x0260)	; É 
       ))
     (=jis-x0213-1-2000	. #x2B28)	; &JX1-2B28; [11-08]
     (=ucs@jis/fw	. #x0260)	; &JX1-2B28;
+    (->uppercase
+     ((=jis-x0213-1-2000  . #x2B29)	; &JX1-2B29; [11-09]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER SCRIPT G")
@@ -367,11 +367,11 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0263)	; ɣ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER GAMMA")
       (=ucs		  . #x0194)	; Ɣ
       ))
-    (=ucs		. #x0263)	; ɣ
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER RAMS HORN")
@@ -456,12 +456,12 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0268)	; ɨ
+    (ipa		. #xA6)	; &I-MULE-IPA-26;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER I WITH STROKE")
       (=ucs		  . #x0197)	; Ɨ
       ))
-    (=ucs		. #x0268)	; ɨ
-    (ipa		. #xA6)	; &I-MULE-IPA-26;
     ))
 (define-char
   '((<-denotational
@@ -480,11 +480,11 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0269)	; É©
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER IOTA")
       (=ucs		  . #x0196)	; Ɩ
       ))
-    (=ucs		. #x0269)	; É©
     ))
 (define-char
   '((name		. "LATIN LETTER SMALL CAPITAL I")
@@ -563,12 +563,12 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x026F)	; ɯ
+    (ipa		. #xA9)	; &I-MULE-IPA-29;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER TURNED M")
       (=ucs		  . #x019C)	; Ɯ
       ))
-    (=ucs		. #x026F)	; ɯ
-    (ipa		. #xA9)	; &I-MULE-IPA-29;
     ))
 (define-char
   '((<-denotational
@@ -626,12 +626,12 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0272)	; ɲ
+    (ipa		. #xD4)	; &I-MULE-IPA-54;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER N WITH LEFT HOOK")
       (=ucs		  . #x019D)	; Ɲ
       ))
-    (=ucs		. #x0272)	; ɲ
-    (ipa		. #xD4)	; &I-MULE-IPA-54;
     ))
 (define-char
   '((<-denotational
@@ -676,12 +676,12 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0275)	; ɵ
+    (ipa		. #xB3)	; &I-MULE-IPA-33;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER O WITH MIDDLE TILDE")
       (=ucs		  . #x019F)	; Ɵ
       ))
-    (=ucs		. #x0275)	; ɵ
-    (ipa		. #xB3)	; &I-MULE-IPA-33;
     ))
 (define-char
   '((<-denotational
@@ -832,12 +832,12 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0280)	; ʀ
+    (ipa		. #xD7)	; &I-MULE-IPA-57;
     (->uppercase
      ((name		  . "LATIN LETTER YR")
       (=ucs		  . #x01A6)	; Ʀ
       ))
-    (=ucs		. #x0280)	; ʀ
-    (ipa		. #xD7)	; &I-MULE-IPA-57;
     ))
 (define-char
   '((name		. "LATIN LETTER SMALL CAPITAL INVERTED R")
@@ -883,12 +883,12 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0283)	; ʃ
+    (ipa		. #xCC)	; &I-MULE-IPA-4C;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER ESH")
       (=ucs		  . #x01A9)	; Æ©
       ))
-    (=ucs		. #x0283)	; ʃ
-    (ipa		. #xCC)	; &I-MULE-IPA-4C;
     ))
 (define-char
   '((<-denotational
@@ -947,11 +947,11 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0288)	; ʈ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER T WITH RETROFLEX HOOK")
       (=ucs		  . #x01AE)	; Æ®
       ))
-    (=ucs		. #x0288)	; ʈ
     ))
 (define-char
   '((<-denotational
@@ -990,12 +990,12 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x028A)	; ʊ
+    (ipa		. #xB5)	; &I-MULE-IPA-35;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER UPSILON")
       (=ucs		  . #x01B1)	; Ʊ
       ))
-    (=ucs		. #x028A)	; ʊ
-    (ipa		. #xB5)	; &I-MULE-IPA-35;
     ))
 (define-char
   '((<-denotational
@@ -1014,11 +1014,11 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x028B)	; ʋ
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER V WITH HOOK")
       (=ucs		  . #x01B2)	; Ʋ
       ))
-    (=ucs		. #x028B)	; ʋ
     ))
 (define-char
   '((<-denotational
@@ -1143,12 +1143,12 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0292)	; ʒ
+    (ipa		. #xCD)	; &I-MULE-IPA-4D;
     (->uppercase
      ((name		  . "LATIN CAPITAL LETTER EZH")
       (=ucs		  . #x01B7)	; Æ·
       ))
-    (=ucs		. #x0292)	; ʒ
-    (ipa		. #xCD)	; &I-MULE-IPA-4D;
     ))
 (define-char
   '((<-denotational
diff --git a/lisp/utf-2000/u00300-Combining-Diacritical-Marks.el b/lisp/utf-2000/u00300-Combining-Diacritical-Marks.el
index f757596..6e9e509 100644
--- a/lisp/utf-2000/u00300-Combining-Diacritical-Marks.el
+++ b/lisp/utf-2000/u00300-Combining-Diacritical-Marks.el
@@ -496,11 +496,11 @@
     (bidi-category	. "NSM")
     (mirrored		. nil)
     (iso-10646-comment	. "Vietnamese")
+    (=ucs		. #x0340)	; ̀
     (->canonical
      ((name		  . "COMBINING GRAVE ACCENT")
       (=ucs		  . #x0300)	; ̀
       ))
-    (=ucs		. #x0340)	; ̀
     ))
 (define-char
   '((name		. "COMBINING ACUTE TONE MARK")
@@ -508,11 +508,11 @@
     (bidi-category	. "NSM")
     (mirrored		. nil)
     (iso-10646-comment	. "Vietnamese")
+    (=ucs		. #x0341)	; ́
     (->canonical
      ((name		  . "COMBINING ACUTE ACCENT")
       (=ucs		  . #x0301)	; ́
       ))
-    (=ucs		. #x0341)	; ́
     ))
 (define-char
   '((name		. "COMBINING GREEK PERISPOMENI")
@@ -526,11 +526,11 @@
     (general-category	mark non-spacing) ; Normative Category
     (bidi-category	. "NSM")
     (mirrored		. nil)
+    (=ucs		. #x0343)	; ̓
     (->canonical
      ((name		  . "COMBINING COMMA ABOVE")
       (=ucs		  . #x0313)	; ̓
       ))
-    (=ucs		. #x0343)	; ̓
     ))
 (define-char
   '((name		. "COMBINING GREEK DIALYTIKA TONOS")
@@ -551,11 +551,11 @@
     (general-category	mark non-spacing) ; Normative Category
     (bidi-category	. "NSM")
     (mirrored		. nil)
+    (=ucs		. #x0345)	; ͅ
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER IOTA")
       (=ucs		  . #x0399)	; Ι
       ))
-    (=ucs		. #x0345)	; ͅ
     ))
 (define-char
   '((name		. "COMBINING BRIDGE ABOVE")
diff --git a/lisp/utf-2000/u00370-Greek.el b/lisp/utf-2000/u00370-Greek.el
index ad8915a..eb6da76 100644
--- a/lisp/utf-2000/u00370-Greek.el
+++ b/lisp/utf-2000/u00370-Greek.el
@@ -5,11 +5,11 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (iso-10646-comment	. "Dexia keraia")
+    (=ucs		. #x0374)	; Í´
     (->canonical
      ((name		  . "MODIFIER LETTER PRIME")
       (=ucs		  . #x02B9)	; ʹ
       ))
-    (=ucs		. #x0374)	; Í´
     ))
 (define-char
   '((name		. "GREEK LOWER NUMERAL SIGN")
@@ -39,11 +39,11 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (iso-10646-comment	. "Erotimatiko")
+    (=ucs		. #x037E)	; ;
     (->canonical
      ((name		  . "SEMICOLON")
       (=ucs		  . #x003B)	; ;
       ))
-    (=ucs		. #x037E)	; ;
     ))
 (define-char
   '((name		. "GREEK TONOS")
@@ -104,10 +104,6 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER ALPHA WITH TONOS")
-      (=ucs		  . #x03AC)	; ά
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ALPHA")
       (=ucs		  . #x0391)	; Α
@@ -117,15 +113,16 @@
       ))
     (=ucs		. #x0386)	; Ά
     (greek-iso8859-7	. #xB6)	; &I-GREEK-36;
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER ALPHA WITH TONOS")
+      (=ucs		  . #x03AC)	; ά
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER ALPHA WITH TONOS")
       (=ucs		  . #x0386)	; Ά
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2671)	; &JSP-2671; [06-81]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER ALPHA WITH TONOS")
       (=ucs		  . #x0386)	; Ά
@@ -141,27 +138,26 @@
       ))
     (=jis-x0212		. #x2661)	; &JSP-2661; [06-65]
     (=ucs@jis/fw	. #x0386)	; &JSP-2661;
+    (->lowercase
+     ((=jis-x0212	  . #x2671)	; &JSP-2671; [06-81]
+      ))
     ))
 (define-char
   '((name		. "GREEK ANO TELEIA")
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (=ucs		. #x0387)	; ·
     (->canonical
      ((name		  . "MIDDLE DOT")
       (=ucs		  . #x00B7)	; ·
       ))
-    (=ucs		. #x0387)	; ·
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER EPSILON WITH TONOS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER EPSILON WITH TONOS")
-      (=ucs		  . #x03AD)	; έ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER EPSILON")
       (=ucs		  . #x0395)	; Ε
@@ -171,15 +167,16 @@
       ))
     (=ucs		. #x0388)	; Έ
     (greek-iso8859-7	. #xB8)	; &I-GREEK-38;
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER EPSILON WITH TONOS")
+      (=ucs		  . #x03AD)	; έ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER EPSILON WITH TONOS")
       (=ucs		  . #x0388)	; Έ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2672)	; &JSP-2672; [06-82]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER EPSILON WITH TONOS")
       (=ucs		  . #x0388)	; Έ
@@ -195,16 +192,15 @@
       ))
     (=jis-x0212		. #x2662)	; &JSP-2662; [06-66]
     (=ucs@jis/fw	. #x0388)	; &JSP-2662;
+    (->lowercase
+     ((=jis-x0212	  . #x2672)	; &JSP-2672; [06-82]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER ETA WITH TONOS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER ETA WITH TONOS")
-      (=ucs		  . #x03AE)	; ή
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ETA")
       (=ucs		  . #x0397)	; Η
@@ -214,15 +210,16 @@
       ))
     (=ucs		. #x0389)	; Ή
     (greek-iso8859-7	. #xB9)	; &I-GREEK-39;
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER ETA WITH TONOS")
+      (=ucs		  . #x03AE)	; ή
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER ETA WITH TONOS")
       (=ucs		  . #x0389)	; Ή
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2673)	; &JSP-2673; [06-83]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER ETA WITH TONOS")
       (=ucs		  . #x0389)	; Ή
@@ -238,16 +235,15 @@
       ))
     (=jis-x0212		. #x2663)	; &JSP-2663; [06-67]
     (=ucs@jis/fw	. #x0389)	; &JSP-2663;
+    (->lowercase
+     ((=jis-x0212	  . #x2673)	; &JSP-2673; [06-83]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER IOTA WITH TONOS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER IOTA WITH TONOS")
-      (=ucs		  . #x03AF)	; ί
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER IOTA")
       (=ucs		  . #x0399)	; Ι
@@ -257,15 +253,16 @@
       ))
     (=ucs		. #x038A)	; Ί
     (greek-iso8859-7	. #xBA)	; &I-GREEK-3A;
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER IOTA WITH TONOS")
+      (=ucs		  . #x03AF)	; ί
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER IOTA WITH TONOS")
       (=ucs		  . #x038A)	; Ί
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2674)	; &JSP-2674; [06-84]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER IOTA WITH TONOS")
       (=ucs		  . #x038A)	; Ί
@@ -281,16 +278,15 @@
       ))
     (=jis-x0212		. #x2664)	; &JSP-2664; [06-68]
     (=ucs@jis/fw	. #x038A)	; &JSP-2664;
+    (->lowercase
+     ((=jis-x0212	  . #x2674)	; &JSP-2674; [06-84]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER OMICRON WITH TONOS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER OMICRON WITH TONOS")
-      (=ucs		  . #x03CC)	; ό
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMICRON")
       (=ucs		  . #x039F)	; Ο
@@ -300,15 +296,16 @@
       ))
     (=ucs		. #x038C)	; Ό
     (greek-iso8859-7	. #xBC)	; &I-GREEK-3C;
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER OMICRON WITH TONOS")
+      (=ucs		  . #x03CC)	; ό
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER OMICRON WITH TONOS")
       (=ucs		  . #x038C)	; Ό
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2677)	; &JSP-2677; [06-87]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER OMICRON WITH TONOS")
       (=ucs		  . #x038C)	; Ό
@@ -324,16 +321,15 @@
       ))
     (=jis-x0212		. #x2667)	; &JSP-2667; [06-71]
     (=ucs@jis/fw	. #x038C)	; &JSP-2667;
+    (->lowercase
+     ((=jis-x0212	  . #x2677)	; &JSP-2677; [06-87]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER UPSILON WITH TONOS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER UPSILON WITH TONOS")
-      (=ucs		  . #x03CD)	; ύ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER UPSILON")
       (=ucs		  . #x03A5)	; Υ
@@ -343,15 +339,16 @@
       ))
     (=ucs		. #x038E)	; Ύ
     (greek-iso8859-7	. #xBE)	; &I-GREEK-3E;
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER UPSILON WITH TONOS")
+      (=ucs		  . #x03CD)	; ύ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER UPSILON WITH TONOS")
       (=ucs		  . #x038E)	; Ύ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2679)	; &JSP-2679; [06-89]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER UPSILON WITH TONOS")
       (=ucs		  . #x038E)	; Ύ
@@ -367,16 +364,15 @@
       ))
     (=jis-x0212		. #x2669)	; &JSP-2669; [06-73]
     (=ucs@jis/fw	. #x038E)	; &JSP-2669;
+    (->lowercase
+     ((=jis-x0212	  . #x2679)	; &JSP-2679; [06-89]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER OMEGA WITH TONOS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER OMEGA WITH TONOS")
-      (=ucs		  . #x03CE)	; ώ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMEGA")
       (=ucs		  . #x03A9)	; Ω
@@ -386,15 +382,16 @@
       ))
     (=ucs		. #x038F)	; Ώ
     (greek-iso8859-7	. #xBF)	; &I-GREEK-3F;
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER OMEGA WITH TONOS")
+      (=ucs		  . #x03CE)	; ώ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER OMEGA WITH TONOS")
       (=ucs		  . #x038F)	; Ώ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x267C)	; &JSP-267C; [06-92]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER OMEGA WITH TONOS")
       (=ucs		  . #x038F)	; Ώ
@@ -410,6 +407,9 @@
       ))
     (=jis-x0212		. #x266C)	; &JSP-266C; [06-76]
     (=ucs@jis/fw	. #x038F)	; &JSP-266C;
+    (->lowercase
+     ((=jis-x0212	  . #x267C)	; &JSP-267C; [06-92]
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS")
@@ -443,24 +443,18 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0391)	; Α
+    (greek-iso8859-7	. #xC1)	; &I-GREEK-41;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER ALPHA")
       (=ucs		  . #x03B1)	; α
       ))
-    (=ucs		. #x0391)	; Α
-    (greek-iso8859-7	. #xC1)	; &I-GREEK-41;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER ALPHA")
       (=ucs		  . #x0391)	; Α
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2641)	; &J90-2641; [06-33]
-      (=gb2312		  . #x2641)	; &I-G0-2641; [06-33]
-      (=ks-x1001	  . #x2561)	; &I-K0-2561; [05-65]
-      (=cns11643-1	  . #x252F)	; &I-C1-252F; [05-15]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER ALPHA")
       (=ucs		  . #x0391)	; Α
@@ -472,30 +466,30 @@
     (=big5		. #xA344)	; &I-B-A344;
     (=ucs@gb/fw		. #x0391)	; &J90-2621;
     (=ucs@jis/fw	. #x0391)	; &J90-2621;
+    (->lowercase
+     ((=jis-x0208	  . #x2641)	; &J90-2641; [06-33]
+      (=gb2312		  . #x2641)	; &I-G0-2641; [06-33]
+      (=ks-x1001	  . #x2561)	; &I-K0-2561; [05-65]
+      (=cns11643-1	  . #x252F)	; &I-C1-252F; [05-15]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER BETA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0392)	; Β
+    (greek-iso8859-7	. #xC2)	; &I-GREEK-42;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER BETA")
       (=ucs		  . #x03B2)	; β
       ))
-    (=ucs		. #x0392)	; Β
-    (greek-iso8859-7	. #xC2)	; &I-GREEK-42;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER BETA")
       (=ucs		  . #x0392)	; Β
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2642)	; &J90-2642; [06-34]
-      (=gb2312		  . #x2642)	; &I-G0-2642; [06-34]
-      (=ks-x1001	  . #x2562)	; &I-K0-2562; [05-66]
-      (=cns11643-1	  . #x2530)	; &I-C1-2530; [05-16]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER BETA")
       (=ucs		  . #x0392)	; Β
@@ -507,30 +501,30 @@
     (=big5		. #xA345)	; &I-B-A345;
     (=ucs@gb/fw		. #x0392)	; &J90-2622;
     (=ucs@jis/fw	. #x0392)	; &J90-2622;
+    (->lowercase
+     ((=jis-x0208	  . #x2642)	; &J90-2642; [06-34]
+      (=gb2312		  . #x2642)	; &I-G0-2642; [06-34]
+      (=ks-x1001	  . #x2562)	; &I-K0-2562; [05-66]
+      (=cns11643-1	  . #x2530)	; &I-C1-2530; [05-16]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER GAMMA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0393)	; Γ
+    (greek-iso8859-7	. #xC3)	; &I-GREEK-43;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER GAMMA")
       (=ucs		  . #x03B3)	; γ
       ))
-    (=ucs		. #x0393)	; Γ
-    (greek-iso8859-7	. #xC3)	; &I-GREEK-43;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER GAMMA")
       (=ucs		  . #x0393)	; Γ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2643)	; &J90-2643; [06-35]
-      (=gb2312		  . #x2643)	; &I-G0-2643; [06-35]
-      (=ks-x1001	  . #x2563)	; &I-K0-2563; [05-67]
-      (=cns11643-1	  . #x2531)	; &I-C1-2531; [05-17]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER GAMMA")
       (=ucs		  . #x0393)	; Γ
@@ -542,30 +536,30 @@
     (=big5		. #xA346)	; &I-B-A346;
     (=ucs@gb/fw		. #x0393)	; &J90-2623;
     (=ucs@jis/fw	. #x0393)	; &J90-2623;
+    (->lowercase
+     ((=jis-x0208	  . #x2643)	; &J90-2643; [06-35]
+      (=gb2312		  . #x2643)	; &I-G0-2643; [06-35]
+      (=ks-x1001	  . #x2563)	; &I-K0-2563; [05-67]
+      (=cns11643-1	  . #x2531)	; &I-C1-2531; [05-17]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER DELTA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0394)	; Δ
+    (greek-iso8859-7	. #xC4)	; &I-GREEK-44;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER DELTA")
       (=ucs		  . #x03B4)	; δ
       ))
-    (=ucs		. #x0394)	; Δ
-    (greek-iso8859-7	. #xC4)	; &I-GREEK-44;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER DELTA")
       (=ucs		  . #x0394)	; Δ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2644)	; &J90-2644; [06-36]
-      (=gb2312		  . #x2644)	; &I-G0-2644; [06-36]
-      (=ks-x1001	  . #x2564)	; &I-K0-2564; [05-68]
-      (=cns11643-1	  . #x2532)	; &I-C1-2532; [05-18]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER DELTA")
       (=ucs		  . #x0394)	; Δ
@@ -577,30 +571,30 @@
     (=big5		. #xA347)	; &I-B-A347;
     (=ucs@gb/fw		. #x0394)	; &J90-2624;
     (=ucs@jis/fw	. #x0394)	; &J90-2624;
+    (->lowercase
+     ((=jis-x0208	  . #x2644)	; &J90-2644; [06-36]
+      (=gb2312		  . #x2644)	; &I-G0-2644; [06-36]
+      (=ks-x1001	  . #x2564)	; &I-K0-2564; [05-68]
+      (=cns11643-1	  . #x2532)	; &I-C1-2532; [05-18]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER EPSILON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0395)	; Ε
+    (greek-iso8859-7	. #xC5)	; &I-GREEK-45;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER EPSILON")
       (=ucs		  . #x03B5)	; ε
       ))
-    (=ucs		. #x0395)	; Ε
-    (greek-iso8859-7	. #xC5)	; &I-GREEK-45;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER EPSILON")
       (=ucs		  . #x0395)	; Ε
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2645)	; &J90-2645; [06-37]
-      (=gb2312		  . #x2645)	; &I-G0-2645; [06-37]
-      (=ks-x1001	  . #x2565)	; &I-K0-2565; [05-69]
-      (=cns11643-1	  . #x2533)	; &I-C1-2533; [05-19]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER EPSILON")
       (=ucs		  . #x0395)	; Ε
@@ -612,30 +606,30 @@
     (=big5		. #xA348)	; &I-B-A348;
     (=ucs@gb/fw		. #x0395)	; &J90-2625;
     (=ucs@jis/fw	. #x0395)	; &J90-2625;
+    (->lowercase
+     ((=jis-x0208	  . #x2645)	; &J90-2645; [06-37]
+      (=gb2312		  . #x2645)	; &I-G0-2645; [06-37]
+      (=ks-x1001	  . #x2565)	; &I-K0-2565; [05-69]
+      (=cns11643-1	  . #x2533)	; &I-C1-2533; [05-19]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER ZETA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0396)	; Ζ
+    (greek-iso8859-7	. #xC6)	; &I-GREEK-46;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER ZETA")
       (=ucs		  . #x03B6)	; ζ
       ))
-    (=ucs		. #x0396)	; Ζ
-    (greek-iso8859-7	. #xC6)	; &I-GREEK-46;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER ZETA")
       (=ucs		  . #x0396)	; Ζ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2646)	; &J90-2646; [06-38]
-      (=gb2312		  . #x2646)	; &I-G0-2646; [06-38]
-      (=ks-x1001	  . #x2566)	; &I-K0-2566; [05-70]
-      (=cns11643-1	  . #x2534)	; &I-C1-2534; [05-20]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER ZETA")
       (=ucs		  . #x0396)	; Ζ
@@ -647,30 +641,30 @@
     (=big5		. #xA349)	; &I-B-A349;
     (=ucs@gb/fw		. #x0396)	; &J90-2626;
     (=ucs@jis/fw	. #x0396)	; &J90-2626;
+    (->lowercase
+     ((=jis-x0208	  . #x2646)	; &J90-2646; [06-38]
+      (=gb2312		  . #x2646)	; &I-G0-2646; [06-38]
+      (=ks-x1001	  . #x2566)	; &I-K0-2566; [05-70]
+      (=cns11643-1	  . #x2534)	; &I-C1-2534; [05-20]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER ETA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0397)	; Η
+    (greek-iso8859-7	. #xC7)	; &I-GREEK-47;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER ETA")
       (=ucs		  . #x03B7)	; η
       ))
-    (=ucs		. #x0397)	; Η
-    (greek-iso8859-7	. #xC7)	; &I-GREEK-47;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER ETA")
       (=ucs		  . #x0397)	; Η
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2647)	; &J90-2647; [06-39]
-      (=gb2312		  . #x2647)	; &I-G0-2647; [06-39]
-      (=ks-x1001	  . #x2567)	; &I-K0-2567; [05-71]
-      (=cns11643-1	  . #x2535)	; &I-C1-2535; [05-21]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER ETA")
       (=ucs		  . #x0397)	; Η
@@ -682,30 +676,30 @@
     (=big5		. #xA34A)	; &I-B-A34A;
     (=ucs@gb/fw		. #x0397)	; &J90-2627;
     (=ucs@jis/fw	. #x0397)	; &J90-2627;
+    (->lowercase
+     ((=jis-x0208	  . #x2647)	; &J90-2647; [06-39]
+      (=gb2312		  . #x2647)	; &I-G0-2647; [06-39]
+      (=ks-x1001	  . #x2567)	; &I-K0-2567; [05-71]
+      (=cns11643-1	  . #x2535)	; &I-C1-2535; [05-21]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER THETA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0398)	; Θ
+    (greek-iso8859-7	. #xC8)	; &I-GREEK-48;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER THETA")
       (=ucs		  . #x03B8)	; θ
       ))
-    (=ucs		. #x0398)	; Θ
-    (greek-iso8859-7	. #xC8)	; &I-GREEK-48;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER THETA")
       (=ucs		  . #x0398)	; Θ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2648)	; &J90-2648; [06-40]
-      (=gb2312		  . #x2648)	; &I-G0-2648; [06-40]
-      (=ks-x1001	  . #x2568)	; &I-K0-2568; [05-72]
-      (=cns11643-1	  . #x2536)	; &I-C1-2536; [05-22]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER THETA")
       (=ucs		  . #x0398)	; Θ
@@ -717,30 +711,30 @@
     (=big5		. #xA34B)	; &I-B-A34B;
     (=ucs@gb/fw		. #x0398)	; &J90-2628;
     (=ucs@jis/fw	. #x0398)	; &J90-2628;
+    (->lowercase
+     ((=jis-x0208	  . #x2648)	; &J90-2648; [06-40]
+      (=gb2312		  . #x2648)	; &I-G0-2648; [06-40]
+      (=ks-x1001	  . #x2568)	; &I-K0-2568; [05-72]
+      (=cns11643-1	  . #x2536)	; &I-C1-2536; [05-22]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER IOTA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0399)	; Ι
+    (greek-iso8859-7	. #xC9)	; &I-GREEK-49;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER IOTA")
       (=ucs		  . #x03B9)	; ι
       ))
-    (=ucs		. #x0399)	; Ι
-    (greek-iso8859-7	. #xC9)	; &I-GREEK-49;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER IOTA")
       (=ucs		  . #x0399)	; Ι
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2649)	; &J90-2649; [06-41]
-      (=gb2312		  . #x2649)	; &I-G0-2649; [06-41]
-      (=ks-x1001	  . #x2569)	; &I-K0-2569; [05-73]
-      (=cns11643-1	  . #x2537)	; &I-C1-2537; [05-23]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER IOTA")
       (=ucs		  . #x0399)	; Ι
@@ -752,30 +746,30 @@
     (=big5		. #xA34C)	; &I-B-A34C;
     (=ucs@gb/fw		. #x0399)	; &J90-2629;
     (=ucs@jis/fw	. #x0399)	; &J90-2629;
+    (->lowercase
+     ((=jis-x0208	  . #x2649)	; &J90-2649; [06-41]
+      (=gb2312		  . #x2649)	; &I-G0-2649; [06-41]
+      (=ks-x1001	  . #x2569)	; &I-K0-2569; [05-73]
+      (=cns11643-1	  . #x2537)	; &I-C1-2537; [05-23]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER KAPPA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x039A)	; Κ
+    (greek-iso8859-7	. #xCA)	; &I-GREEK-4A;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER KAPPA")
       (=ucs		  . #x03BA)	; κ
       ))
-    (=ucs		. #x039A)	; Κ
-    (greek-iso8859-7	. #xCA)	; &I-GREEK-4A;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER KAPPA")
       (=ucs		  . #x039A)	; Κ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x264A)	; &J90-264A; [06-42]
-      (=gb2312		  . #x264A)	; &I-G0-264A; [06-42]
-      (=ks-x1001	  . #x256A)	; &I-K0-256A; [05-74]
-      (=cns11643-1	  . #x2538)	; &I-C1-2538; [05-24]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER KAPPA")
       (=ucs		  . #x039A)	; Κ
@@ -787,30 +781,30 @@
     (=big5		. #xA34D)	; &I-B-A34D;
     (=ucs@gb/fw		. #x039A)	; &J90-262A;
     (=ucs@jis/fw	. #x039A)	; &J90-262A;
+    (->lowercase
+     ((=jis-x0208	  . #x264A)	; &J90-264A; [06-42]
+      (=gb2312		  . #x264A)	; &I-G0-264A; [06-42]
+      (=ks-x1001	  . #x256A)	; &I-K0-256A; [05-74]
+      (=cns11643-1	  . #x2538)	; &I-C1-2538; [05-24]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER LAMDA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x039B)	; Λ
+    (greek-iso8859-7	. #xCB)	; &I-GREEK-4B;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER LAMDA")
       (=ucs		  . #x03BB)	; λ
       ))
-    (=ucs		. #x039B)	; Λ
-    (greek-iso8859-7	. #xCB)	; &I-GREEK-4B;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER LAMDA")
       (=ucs		  . #x039B)	; Λ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x264B)	; &J90-264B; [06-43]
-      (=gb2312		  . #x264B)	; &I-G0-264B; [06-43]
-      (=ks-x1001	  . #x256B)	; &I-K0-256B; [05-75]
-      (=cns11643-1	  . #x2539)	; &I-C1-2539; [05-25]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER LAMDA")
       (=ucs		  . #x039B)	; Λ
@@ -822,30 +816,30 @@
     (=big5		. #xA34E)	; &I-B-A34E;
     (=ucs@gb/fw		. #x039B)	; &J90-262B;
     (=ucs@jis/fw	. #x039B)	; &J90-262B;
+    (->lowercase
+     ((=jis-x0208	  . #x264B)	; &J90-264B; [06-43]
+      (=gb2312		  . #x264B)	; &I-G0-264B; [06-43]
+      (=ks-x1001	  . #x256B)	; &I-K0-256B; [05-75]
+      (=cns11643-1	  . #x2539)	; &I-C1-2539; [05-25]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER MU")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x039C)	; Μ
+    (greek-iso8859-7	. #xCC)	; &I-GREEK-4C;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER MU")
       (=ucs		  . #x03BC)	; μ
       ))
-    (=ucs		. #x039C)	; Μ
-    (greek-iso8859-7	. #xCC)	; &I-GREEK-4C;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER MU")
       (=ucs		  . #x039C)	; Μ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x264C)	; &J90-264C; [06-44]
-      (=gb2312		  . #x264C)	; &I-G0-264C; [06-44]
-      (=ks-x1001	  . #x256C)	; &I-K0-256C; [05-76]
-      (=cns11643-1	  . #x253A)	; &I-C1-253A; [05-26]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER MU")
       (=ucs		  . #x039C)	; Μ
@@ -857,30 +851,30 @@
     (=big5		. #xA34F)	; &I-B-A34F;
     (=ucs@gb/fw		. #x039C)	; &J90-262C;
     (=ucs@jis/fw	. #x039C)	; &J90-262C;
+    (->lowercase
+     ((=jis-x0208	  . #x264C)	; &J90-264C; [06-44]
+      (=gb2312		  . #x264C)	; &I-G0-264C; [06-44]
+      (=ks-x1001	  . #x256C)	; &I-K0-256C; [05-76]
+      (=cns11643-1	  . #x253A)	; &I-C1-253A; [05-26]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER NU")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x039D)	; Ν
+    (greek-iso8859-7	. #xCD)	; &I-GREEK-4D;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER NU")
       (=ucs		  . #x03BD)	; ν
       ))
-    (=ucs		. #x039D)	; Ν
-    (greek-iso8859-7	. #xCD)	; &I-GREEK-4D;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER NU")
       (=ucs		  . #x039D)	; Ν
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x264D)	; &J90-264D; [06-45]
-      (=gb2312		  . #x264D)	; &I-G0-264D; [06-45]
-      (=ks-x1001	  . #x256D)	; &I-K0-256D; [05-77]
-      (=cns11643-1	  . #x253B)	; &I-C1-253B; [05-27]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER NU")
       (=ucs		  . #x039D)	; Ν
@@ -892,30 +886,30 @@
     (=big5		. #xA350)	; &I-B-A350;
     (=ucs@gb/fw		. #x039D)	; &J90-262D;
     (=ucs@jis/fw	. #x039D)	; &J90-262D;
+    (->lowercase
+     ((=jis-x0208	  . #x264D)	; &J90-264D; [06-45]
+      (=gb2312		  . #x264D)	; &I-G0-264D; [06-45]
+      (=ks-x1001	  . #x256D)	; &I-K0-256D; [05-77]
+      (=cns11643-1	  . #x253B)	; &I-C1-253B; [05-27]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER XI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x039E)	; Ξ
+    (greek-iso8859-7	. #xCE)	; &I-GREEK-4E;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER XI")
       (=ucs		  . #x03BE)	; ξ
       ))
-    (=ucs		. #x039E)	; Ξ
-    (greek-iso8859-7	. #xCE)	; &I-GREEK-4E;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER XI")
       (=ucs		  . #x039E)	; Ξ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x264E)	; &J90-264E; [06-46]
-      (=gb2312		  . #x264E)	; &I-G0-264E; [06-46]
-      (=ks-x1001	  . #x256E)	; &I-K0-256E; [05-78]
-      (=cns11643-1	  . #x253C)	; &I-C1-253C; [05-28]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER XI")
       (=ucs		  . #x039E)	; Ξ
@@ -927,30 +921,30 @@
     (=big5		. #xA351)	; &I-B-A351;
     (=ucs@gb/fw		. #x039E)	; &J90-262E;
     (=ucs@jis/fw	. #x039E)	; &J90-262E;
+    (->lowercase
+     ((=jis-x0208	  . #x264E)	; &J90-264E; [06-46]
+      (=gb2312		  . #x264E)	; &I-G0-264E; [06-46]
+      (=ks-x1001	  . #x256E)	; &I-K0-256E; [05-78]
+      (=cns11643-1	  . #x253C)	; &I-C1-253C; [05-28]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER OMICRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x039F)	; Ο
+    (greek-iso8859-7	. #xCF)	; &I-GREEK-4F;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER OMICRON")
       (=ucs		  . #x03BF)	; ο
       ))
-    (=ucs		. #x039F)	; Ο
-    (greek-iso8859-7	. #xCF)	; &I-GREEK-4F;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER OMICRON")
       (=ucs		  . #x039F)	; Ο
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x264F)	; &J90-264F; [06-47]
-      (=gb2312		  . #x264F)	; &I-G0-264F; [06-47]
-      (=ks-x1001	  . #x256F)	; &I-K0-256F; [05-79]
-      (=cns11643-1	  . #x253D)	; &I-C1-253D; [05-29]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER OMICRON")
       (=ucs		  . #x039F)	; Ο
@@ -962,30 +956,30 @@
     (=big5		. #xA352)	; &I-B-A352;
     (=ucs@gb/fw		. #x039F)	; &J90-262F;
     (=ucs@jis/fw	. #x039F)	; &J90-262F;
+    (->lowercase
+     ((=jis-x0208	  . #x264F)	; &J90-264F; [06-47]
+      (=gb2312		  . #x264F)	; &I-G0-264F; [06-47]
+      (=ks-x1001	  . #x256F)	; &I-K0-256F; [05-79]
+      (=cns11643-1	  . #x253D)	; &I-C1-253D; [05-29]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER PI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03A0)	; Π
+    (greek-iso8859-7	. #xD0)	; &I-GREEK-50;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER PI")
       (=ucs		  . #x03C0)	; π
       ))
-    (=ucs		. #x03A0)	; Π
-    (greek-iso8859-7	. #xD0)	; &I-GREEK-50;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER PI")
       (=ucs		  . #x03A0)	; Π
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2650)	; &J90-2650; [06-48]
-      (=gb2312		  . #x2650)	; &I-G0-2650; [06-48]
-      (=ks-x1001	  . #x2570)	; &I-K0-2570; [05-80]
-      (=cns11643-1	  . #x253E)	; &I-C1-253E; [05-30]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER PI")
       (=ucs		  . #x03A0)	; Π
@@ -997,30 +991,30 @@
     (=big5		. #xA353)	; &I-B-A353;
     (=ucs@gb/fw		. #x03A0)	; &J90-2630;
     (=ucs@jis/fw	. #x03A0)	; &J90-2630;
+    (->lowercase
+     ((=jis-x0208	  . #x2650)	; &J90-2650; [06-48]
+      (=gb2312		  . #x2650)	; &I-G0-2650; [06-48]
+      (=ks-x1001	  . #x2570)	; &I-K0-2570; [05-80]
+      (=cns11643-1	  . #x253E)	; &I-C1-253E; [05-30]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER RHO")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03A1)	; Ρ
+    (greek-iso8859-7	. #xD1)	; &I-GREEK-51;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER RHO")
       (=ucs		  . #x03C1)	; ρ
       ))
-    (=ucs		. #x03A1)	; Ρ
-    (greek-iso8859-7	. #xD1)	; &I-GREEK-51;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER RHO")
       (=ucs		  . #x03A1)	; Ρ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2651)	; &J90-2651; [06-49]
-      (=gb2312		  . #x2651)	; &I-G0-2651; [06-49]
-      (=ks-x1001	  . #x2571)	; &I-K0-2571; [05-81]
-      (=cns11643-1	  . #x253F)	; &I-C1-253F; [05-31]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER RHO")
       (=ucs		  . #x03A1)	; Ρ
@@ -1032,30 +1026,30 @@
     (=big5		. #xA354)	; &I-B-A354;
     (=ucs@gb/fw		. #x03A1)	; &J90-2631;
     (=ucs@jis/fw	. #x03A1)	; &J90-2631;
+    (->lowercase
+     ((=jis-x0208	  . #x2651)	; &J90-2651; [06-49]
+      (=gb2312		  . #x2651)	; &I-G0-2651; [06-49]
+      (=ks-x1001	  . #x2571)	; &I-K0-2571; [05-81]
+      (=cns11643-1	  . #x253F)	; &I-C1-253F; [05-31]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER SIGMA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03A3)	; Σ
+    (greek-iso8859-7	. #xD3)	; &I-GREEK-53;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER SIGMA")
       (=ucs		  . #x03C3)	; σ
       ))
-    (=ucs		. #x03A3)	; Σ
-    (greek-iso8859-7	. #xD3)	; &I-GREEK-53;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER SIGMA")
       (=ucs		  . #x03A3)	; Σ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2652)	; &J90-2652; [06-50]
-      (=gb2312		  . #x2652)	; &I-G0-2652; [06-50]
-      (=ks-x1001	  . #x2572)	; &I-K0-2572; [05-82]
-      (=cns11643-1	  . #x2540)	; &I-C1-2540; [05-32]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER SIGMA")
       (=ucs		  . #x03A3)	; Σ
@@ -1067,30 +1061,30 @@
     (=big5		. #xA355)	; &I-B-A355;
     (=ucs@gb/fw		. #x03A3)	; &J90-2632;
     (=ucs@jis/fw	. #x03A3)	; &J90-2632;
+    (->lowercase
+     ((=jis-x0208	  . #x2652)	; &J90-2652; [06-50]
+      (=gb2312		  . #x2652)	; &I-G0-2652; [06-50]
+      (=ks-x1001	  . #x2572)	; &I-K0-2572; [05-82]
+      (=cns11643-1	  . #x2540)	; &I-C1-2540; [05-32]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER TAU")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03A4)	; Τ
+    (greek-iso8859-7	. #xD4)	; &I-GREEK-54;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER TAU")
       (=ucs		  . #x03C4)	; τ
       ))
-    (=ucs		. #x03A4)	; Τ
-    (greek-iso8859-7	. #xD4)	; &I-GREEK-54;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER TAU")
       (=ucs		  . #x03A4)	; Τ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2653)	; &J90-2653; [06-51]
-      (=gb2312		  . #x2653)	; &I-G0-2653; [06-51]
-      (=ks-x1001	  . #x2573)	; &I-K0-2573; [05-83]
-      (=cns11643-1	  . #x2541)	; &I-C1-2541; [05-33]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER TAU")
       (=ucs		  . #x03A4)	; Τ
@@ -1102,30 +1096,30 @@
     (=big5		. #xA356)	; &I-B-A356;
     (=ucs@gb/fw		. #x03A4)	; &J90-2633;
     (=ucs@jis/fw	. #x03A4)	; &J90-2633;
+    (->lowercase
+     ((=jis-x0208	  . #x2653)	; &J90-2653; [06-51]
+      (=gb2312		  . #x2653)	; &I-G0-2653; [06-51]
+      (=ks-x1001	  . #x2573)	; &I-K0-2573; [05-83]
+      (=cns11643-1	  . #x2541)	; &I-C1-2541; [05-33]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER UPSILON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03A5)	; Υ
+    (greek-iso8859-7	. #xD5)	; &I-GREEK-55;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER UPSILON")
       (=ucs		  . #x03C5)	; υ
       ))
-    (=ucs		. #x03A5)	; Υ
-    (greek-iso8859-7	. #xD5)	; &I-GREEK-55;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER UPSILON")
       (=ucs		  . #x03A5)	; Υ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2654)	; &J90-2654; [06-52]
-      (=gb2312		  . #x2654)	; &I-G0-2654; [06-52]
-      (=ks-x1001	  . #x2574)	; &I-K0-2574; [05-84]
-      (=cns11643-1	  . #x2542)	; &I-C1-2542; [05-34]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER UPSILON")
       (=ucs		  . #x03A5)	; Υ
@@ -1137,30 +1131,30 @@
     (=big5		. #xA357)	; &I-B-A357;
     (=ucs@gb/fw		. #x03A5)	; &J90-2634;
     (=ucs@jis/fw	. #x03A5)	; &J90-2634;
+    (->lowercase
+     ((=jis-x0208	  . #x2654)	; &J90-2654; [06-52]
+      (=gb2312		  . #x2654)	; &I-G0-2654; [06-52]
+      (=ks-x1001	  . #x2574)	; &I-K0-2574; [05-84]
+      (=cns11643-1	  . #x2542)	; &I-C1-2542; [05-34]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER PHI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03A6)	; Φ
+    (greek-iso8859-7	. #xD6)	; &I-GREEK-56;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER PHI")
       (=ucs		  . #x03C6)	; φ
       ))
-    (=ucs		. #x03A6)	; Φ
-    (greek-iso8859-7	. #xD6)	; &I-GREEK-56;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER PHI")
       (=ucs		  . #x03A6)	; Φ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2655)	; &J90-2655; [06-53]
-      (=gb2312		  . #x2655)	; &I-G0-2655; [06-53]
-      (=ks-x1001	  . #x2575)	; &I-K0-2575; [05-85]
-      (=cns11643-1	  . #x2543)	; &I-C1-2543; [05-35]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER PHI")
       (=ucs		  . #x03A6)	; Φ
@@ -1172,30 +1166,30 @@
     (=big5		. #xA358)	; &I-B-A358;
     (=ucs@gb/fw		. #x03A6)	; &J90-2635;
     (=ucs@jis/fw	. #x03A6)	; &J90-2635;
+    (->lowercase
+     ((=jis-x0208	  . #x2655)	; &J90-2655; [06-53]
+      (=gb2312		  . #x2655)	; &I-G0-2655; [06-53]
+      (=ks-x1001	  . #x2575)	; &I-K0-2575; [05-85]
+      (=cns11643-1	  . #x2543)	; &I-C1-2543; [05-35]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER CHI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03A7)	; Χ
+    (greek-iso8859-7	. #xD7)	; &I-GREEK-57;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER CHI")
       (=ucs		  . #x03C7)	; χ
       ))
-    (=ucs		. #x03A7)	; Χ
-    (greek-iso8859-7	. #xD7)	; &I-GREEK-57;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER CHI")
       (=ucs		  . #x03A7)	; Χ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2656)	; &J90-2656; [06-54]
-      (=gb2312		  . #x2656)	; &I-G0-2656; [06-54]
-      (=ks-x1001	  . #x2576)	; &I-K0-2576; [05-86]
-      (=cns11643-1	  . #x2544)	; &I-C1-2544; [05-36]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER CHI")
       (=ucs		  . #x03A7)	; Χ
@@ -1207,30 +1201,30 @@
     (=big5		. #xA359)	; &I-B-A359;
     (=ucs@gb/fw		. #x03A7)	; &J90-2636;
     (=ucs@jis/fw	. #x03A7)	; &J90-2636;
+    (->lowercase
+     ((=jis-x0208	  . #x2656)	; &J90-2656; [06-54]
+      (=gb2312		  . #x2656)	; &I-G0-2656; [06-54]
+      (=ks-x1001	  . #x2576)	; &I-K0-2576; [05-86]
+      (=cns11643-1	  . #x2544)	; &I-C1-2544; [05-36]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER PSI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03A8)	; Ψ
+    (greek-iso8859-7	. #xD8)	; &I-GREEK-58;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER PSI")
       (=ucs		  . #x03C8)	; ψ
       ))
-    (=ucs		. #x03A8)	; Ψ
-    (greek-iso8859-7	. #xD8)	; &I-GREEK-58;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER PSI")
       (=ucs		  . #x03A8)	; Ψ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2657)	; &J90-2657; [06-55]
-      (=gb2312		  . #x2657)	; &I-G0-2657; [06-55]
-      (=ks-x1001	  . #x2577)	; &I-K0-2577; [05-87]
-      (=cns11643-1	  . #x2545)	; &I-C1-2545; [05-37]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER PSI")
       (=ucs		  . #x03A8)	; Ψ
@@ -1242,30 +1236,30 @@
     (=big5		. #xA35A)	; &I-B-A35A;
     (=ucs@gb/fw		. #x03A8)	; &J90-2637;
     (=ucs@jis/fw	. #x03A8)	; &J90-2637;
+    (->lowercase
+     ((=jis-x0208	  . #x2657)	; &J90-2657; [06-55]
+      (=gb2312		  . #x2657)	; &I-G0-2657; [06-55]
+      (=ks-x1001	  . #x2577)	; &I-K0-2577; [05-87]
+      (=cns11643-1	  . #x2545)	; &I-C1-2545; [05-37]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER OMEGA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03A9)	; Ω
+    (greek-iso8859-7	. #xD9)	; &I-GREEK-59;
     (->lowercase
      ((name		  . "GREEK SMALL LETTER OMEGA")
       (=ucs		  . #x03C9)	; ω
       ))
-    (=ucs		. #x03A9)	; Ω
-    (greek-iso8859-7	. #xD9)	; &I-GREEK-59;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER OMEGA")
       (=ucs		  . #x03A9)	; Ω
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2658)	; &J90-2658; [06-56]
-      (=gb2312		  . #x2658)	; &I-G0-2658; [06-56]
-      (=ks-x1001	  . #x2578)	; &I-K0-2578; [05-88]
-      (=cns11643-1	  . #x2546)	; &I-C1-2546; [05-38]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER OMEGA")
       (=ucs		  . #x03A9)	; Ω
@@ -1277,16 +1271,18 @@
     (=big5		. #xA35B)	; &I-B-A35B;
     (=ucs@gb/fw		. #x03A9)	; &J90-2638;
     (=ucs@jis/fw	. #x03A9)	; &J90-2638;
+    (->lowercase
+     ((=jis-x0208	  . #x2658)	; &J90-2658; [06-56]
+      (=gb2312		  . #x2658)	; &I-G0-2658; [06-56]
+      (=ks-x1001	  . #x2578)	; &I-K0-2578; [05-88]
+      (=cns11643-1	  . #x2546)	; &I-C1-2546; [05-38]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER IOTA WITH DIALYTIKA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER IOTA WITH DIALYTIKA")
-      (=ucs		  . #x03CA)	; ϊ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER IOTA")
       (=ucs		  . #x0399)	; Ι
@@ -1296,31 +1292,31 @@
       ))
     (=ucs		. #x03AA)	; Ϊ
     (greek-iso8859-7	. #xDA)	; &I-GREEK-5A;
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER IOTA WITH DIALYTIKA")
+      (=ucs		  . #x03CA)	; ϊ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK CAPITAL LETTER IOTA WITH DIALYTIKA")
       (=ucs		  . #x03AA)	; Ϊ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2675)	; &JSP-2675; [06-85]
-      ))
     (<-fullwidth
      ((name		  . "GREEK CAPITAL LETTER IOTA WITH DIALYTIKA")
       (=ucs		  . #x03AA)	; Ϊ
       ))
     (=jis-x0212		. #x2665)	; &JSP-2665; [06-69]
     (=ucs@jis/fw	. #x03AA)	; &JSP-2665;
+    (->lowercase
+     ((=jis-x0212	  . #x2675)	; &JSP-2675; [06-85]
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA")
-      (=ucs		  . #x03CB)	; ϋ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER UPSILON")
       (=ucs		  . #x03A5)	; Υ
@@ -1330,31 +1326,31 @@
       ))
     (=ucs		. #x03AB)	; Ϋ
     (greek-iso8859-7	. #xDB)	; &I-GREEK-5B;
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA")
+      (=ucs		  . #x03CB)	; ϋ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA")
       (=ucs		  . #x03AB)	; Ϋ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x267A)	; &JSP-267A; [06-90]
-      ))
     (<-fullwidth
      ((name . "GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA")
       (=ucs		  . #x03AB)	; Ϋ
       ))
     (=jis-x0212		. #x266A)	; &JSP-266A; [06-74]
     (=ucs@jis/fw	. #x03AB)	; &JSP-266A;
+    (->lowercase
+     ((=jis-x0212	  . #x267A)	; &JSP-267A; [06-90]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ALPHA WITH TONOS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER ALPHA WITH TONOS")
-      (=ucs		  . #x0386)	; Ά
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ALPHA")
       (=ucs		  . #x03B1)	; α
@@ -1364,31 +1360,31 @@
       ))
     (=ucs		. #x03AC)	; ά
     (greek-iso8859-7	. #xDC)	; &I-GREEK-5C;
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER ALPHA WITH TONOS")
+      (=ucs		  . #x0386)	; Ά
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER ALPHA WITH TONOS")
       (=ucs		  . #x03AC)	; ά
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2661)	; &JSP-2661; [06-65]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER ALPHA WITH TONOS")
       (=ucs		  . #x03AC)	; ά
       ))
     (=jis-x0212		. #x2671)	; &JSP-2671; [06-81]
     (=ucs@jis/fw	. #x03AC)	; &JSP-2671;
+    (->uppercase
+     ((=jis-x0212	  . #x2661)	; &JSP-2661; [06-65]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER EPSILON WITH TONOS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER EPSILON WITH TONOS")
-      (=ucs		  . #x0388)	; Έ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER EPSILON")
       (=ucs		  . #x03B5)	; ε
@@ -1398,31 +1394,31 @@
       ))
     (=ucs		. #x03AD)	; έ
     (greek-iso8859-7	. #xDD)	; &I-GREEK-5D;
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER EPSILON WITH TONOS")
+      (=ucs		  . #x0388)	; Έ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER EPSILON WITH TONOS")
       (=ucs		  . #x03AD)	; έ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2662)	; &JSP-2662; [06-66]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER EPSILON WITH TONOS")
       (=ucs		  . #x03AD)	; έ
       ))
     (=jis-x0212		. #x2672)	; &JSP-2672; [06-82]
     (=ucs@jis/fw	. #x03AD)	; &JSP-2672;
+    (->uppercase
+     ((=jis-x0212	  . #x2662)	; &JSP-2662; [06-66]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ETA WITH TONOS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER ETA WITH TONOS")
-      (=ucs		  . #x0389)	; Ή
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ETA")
       (=ucs		  . #x03B7)	; η
@@ -1432,31 +1428,31 @@
       ))
     (=ucs		. #x03AE)	; ή
     (greek-iso8859-7	. #xDE)	; &I-GREEK-5E;
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER ETA WITH TONOS")
+      (=ucs		  . #x0389)	; Ή
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER ETA WITH TONOS")
       (=ucs		  . #x03AE)	; ή
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2663)	; &JSP-2663; [06-67]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER ETA WITH TONOS")
       (=ucs		  . #x03AE)	; ή
       ))
     (=jis-x0212		. #x2673)	; &JSP-2673; [06-83]
     (=ucs@jis/fw	. #x03AE)	; &JSP-2673;
+    (->uppercase
+     ((=jis-x0212	  . #x2663)	; &JSP-2663; [06-67]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER IOTA WITH TONOS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER IOTA WITH TONOS")
-      (=ucs		  . #x038A)	; Ί
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER IOTA")
       (=ucs		  . #x03B9)	; ι
@@ -1466,21 +1462,25 @@
       ))
     (=ucs		. #x03AF)	; ί
     (greek-iso8859-7	. #xDF)	; &I-GREEK-5F;
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER IOTA WITH TONOS")
+      (=ucs		  . #x038A)	; Ί
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER IOTA WITH TONOS")
       (=ucs		  . #x03AF)	; ί
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2664)	; &JSP-2664; [06-68]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER IOTA WITH TONOS")
       (=ucs		  . #x03AF)	; ί
       ))
     (=jis-x0212		. #x2674)	; &JSP-2674; [06-84]
     (=ucs@jis/fw	. #x03AF)	; &JSP-2674;
+    (->uppercase
+     ((=jis-x0212	  . #x2664)	; &JSP-2664; [06-68]
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS")
@@ -1514,24 +1514,18 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03B1)	; α
+    (greek-iso8859-7	. #xE1)	; &I-GREEK-61;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER ALPHA")
       (=ucs		  . #x0391)	; Α
       ))
-    (=ucs		. #x03B1)	; α
-    (greek-iso8859-7	. #xE1)	; &I-GREEK-61;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER ALPHA")
       (=ucs		  . #x03B1)	; α
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2621)	; &J90-2621; [06-01]
-      (=gb2312		  . #x2621)	; &I-G0-2621; [06-01]
-      (=ks-x1001	  . #x2541)	; &I-K0-2541; [05-33]
-      (=cns11643-1	  . #x2475)	; &I-C1-2475; [04-85]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER ALPHA")
       (=ucs		  . #x03B1)	; α
@@ -1543,30 +1537,30 @@
     (=big5		. #xA35C)	; &I-B-A35C;
     (=ucs@gb/fw		. #x03B1)	; &J90-2641;
     (=ucs@jis/fw	. #x03B1)	; &J90-2641;
+    (->uppercase
+     ((=jis-x0208	  . #x2621)	; &J90-2621; [06-01]
+      (=gb2312		  . #x2621)	; &I-G0-2621; [06-01]
+      (=ks-x1001	  . #x2541)	; &I-K0-2541; [05-33]
+      (=cns11643-1	  . #x2475)	; &I-C1-2475; [04-85]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER BETA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03B2)	; β
+    (greek-iso8859-7	. #xE2)	; &I-GREEK-62;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER BETA")
       (=ucs		  . #x0392)	; Β
       ))
-    (=ucs		. #x03B2)	; β
-    (greek-iso8859-7	. #xE2)	; &I-GREEK-62;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER BETA")
       (=ucs		  . #x03B2)	; β
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2622)	; &J90-2622; [06-02]
-      (=gb2312		  . #x2622)	; &I-G0-2622; [06-02]
-      (=ks-x1001	  . #x2542)	; &I-K0-2542; [05-34]
-      (=cns11643-1	  . #x2476)	; &I-C1-2476; [04-86]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER BETA")
       (=ucs		  . #x03B2)	; β
@@ -1578,30 +1572,30 @@
     (=big5		. #xA35D)	; &I-B-A35D;
     (=ucs@gb/fw		. #x03B2)	; &J90-2642;
     (=ucs@jis/fw	. #x03B2)	; &J90-2642;
+    (->uppercase
+     ((=jis-x0208	  . #x2622)	; &J90-2622; [06-02]
+      (=gb2312		  . #x2622)	; &I-G0-2622; [06-02]
+      (=ks-x1001	  . #x2542)	; &I-K0-2542; [05-34]
+      (=cns11643-1	  . #x2476)	; &I-C1-2476; [04-86]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER GAMMA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03B3)	; γ
+    (greek-iso8859-7	. #xE3)	; &I-GREEK-63;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER GAMMA")
       (=ucs		  . #x0393)	; Γ
       ))
-    (=ucs		. #x03B3)	; γ
-    (greek-iso8859-7	. #xE3)	; &I-GREEK-63;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER GAMMA")
       (=ucs		  . #x03B3)	; γ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2623)	; &J90-2623; [06-03]
-      (=gb2312		  . #x2623)	; &I-G0-2623; [06-03]
-      (=ks-x1001	  . #x2543)	; &I-K0-2543; [05-35]
-      (=cns11643-1	  . #x2477)	; &I-C1-2477; [04-87]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER GAMMA")
       (=ucs		  . #x03B3)	; γ
@@ -1613,30 +1607,30 @@
     (=big5		. #xA35E)	; &I-B-A35E;
     (=ucs@gb/fw		. #x03B3)	; &J90-2643;
     (=ucs@jis/fw	. #x03B3)	; &J90-2643;
+    (->uppercase
+     ((=jis-x0208	  . #x2623)	; &J90-2623; [06-03]
+      (=gb2312		  . #x2623)	; &I-G0-2623; [06-03]
+      (=ks-x1001	  . #x2543)	; &I-K0-2543; [05-35]
+      (=cns11643-1	  . #x2477)	; &I-C1-2477; [04-87]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER DELTA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03B4)	; δ
+    (greek-iso8859-7	. #xE4)	; &I-GREEK-64;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER DELTA")
       (=ucs		  . #x0394)	; Δ
       ))
-    (=ucs		. #x03B4)	; δ
-    (greek-iso8859-7	. #xE4)	; &I-GREEK-64;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER DELTA")
       (=ucs		  . #x03B4)	; δ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2624)	; &J90-2624; [06-04]
-      (=gb2312		  . #x2624)	; &I-G0-2624; [06-04]
-      (=ks-x1001	  . #x2544)	; &I-K0-2544; [05-36]
-      (=cns11643-1	  . #x2478)	; &I-C1-2478; [04-88]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER DELTA")
       (=ucs		  . #x03B4)	; δ
@@ -1648,30 +1642,30 @@
     (=big5		. #xA35F)	; &I-B-A35F;
     (=ucs@gb/fw		. #x03B4)	; &J90-2644;
     (=ucs@jis/fw	. #x03B4)	; &J90-2644;
+    (->uppercase
+     ((=jis-x0208	  . #x2624)	; &J90-2624; [06-04]
+      (=gb2312		  . #x2624)	; &I-G0-2624; [06-04]
+      (=ks-x1001	  . #x2544)	; &I-K0-2544; [05-36]
+      (=cns11643-1	  . #x2478)	; &I-C1-2478; [04-88]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER EPSILON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03B5)	; ε
+    (greek-iso8859-7	. #xE5)	; &I-GREEK-65;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER EPSILON")
       (=ucs		  . #x0395)	; Ε
       ))
-    (=ucs		. #x03B5)	; ε
-    (greek-iso8859-7	. #xE5)	; &I-GREEK-65;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER EPSILON")
       (=ucs		  . #x03B5)	; ε
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2625)	; &J90-2625; [06-05]
-      (=gb2312		  . #x2625)	; &I-G0-2625; [06-05]
-      (=ks-x1001	  . #x2545)	; &I-K0-2545; [05-37]
-      (=cns11643-1	  . #x2479)	; &I-C1-2479; [04-89]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER EPSILON")
       (=ucs		  . #x03B5)	; ε
@@ -1683,30 +1677,30 @@
     (=big5		. #xA360)	; &I-B-A360;
     (=ucs@gb/fw		. #x03B5)	; &J90-2645;
     (=ucs@jis/fw	. #x03B5)	; &J90-2645;
+    (->uppercase
+     ((=jis-x0208	  . #x2625)	; &J90-2625; [06-05]
+      (=gb2312		  . #x2625)	; &I-G0-2625; [06-05]
+      (=ks-x1001	  . #x2545)	; &I-K0-2545; [05-37]
+      (=cns11643-1	  . #x2479)	; &I-C1-2479; [04-89]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ZETA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03B6)	; ζ
+    (greek-iso8859-7	. #xE6)	; &I-GREEK-66;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER ZETA")
       (=ucs		  . #x0396)	; Ζ
       ))
-    (=ucs		. #x03B6)	; ζ
-    (greek-iso8859-7	. #xE6)	; &I-GREEK-66;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER ZETA")
       (=ucs		  . #x03B6)	; ζ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2626)	; &J90-2626; [06-06]
-      (=gb2312		  . #x2626)	; &I-G0-2626; [06-06]
-      (=ks-x1001	  . #x2546)	; &I-K0-2546; [05-38]
-      (=cns11643-1	  . #x247A)	; &I-C1-247A; [04-90]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER ZETA")
       (=ucs		  . #x03B6)	; ζ
@@ -1718,30 +1712,30 @@
     (=big5		. #xA361)	; &I-B-A361;
     (=ucs@gb/fw		. #x03B6)	; &J90-2646;
     (=ucs@jis/fw	. #x03B6)	; &J90-2646;
+    (->uppercase
+     ((=jis-x0208	  . #x2626)	; &J90-2626; [06-06]
+      (=gb2312		  . #x2626)	; &I-G0-2626; [06-06]
+      (=ks-x1001	  . #x2546)	; &I-K0-2546; [05-38]
+      (=cns11643-1	  . #x247A)	; &I-C1-247A; [04-90]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ETA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03B7)	; η
+    (greek-iso8859-7	. #xE7)	; &I-GREEK-67;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER ETA")
       (=ucs		  . #x0397)	; Η
       ))
-    (=ucs		. #x03B7)	; η
-    (greek-iso8859-7	. #xE7)	; &I-GREEK-67;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER ETA")
       (=ucs		  . #x03B7)	; η
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2627)	; &J90-2627; [06-07]
-      (=gb2312		  . #x2627)	; &I-G0-2627; [06-07]
-      (=ks-x1001	  . #x2547)	; &I-K0-2547; [05-39]
-      (=cns11643-1	  . #x247B)	; &I-C1-247B; [04-91]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER ETA")
       (=ucs		  . #x03B7)	; η
@@ -1753,31 +1747,31 @@
     (=big5		. #xA362)	; &I-B-A362;
     (=ucs@gb/fw		. #x03B7)	; &J90-2647;
     (=ucs@jis/fw	. #x03B7)	; &J90-2647;
+    (->uppercase
+     ((=jis-x0208	  . #x2627)	; &J90-2627; [06-07]
+      (=gb2312		  . #x2627)	; &I-G0-2627; [06-07]
+      (=ks-x1001	  . #x2547)	; &I-K0-2547; [05-39]
+      (=cns11643-1	  . #x247B)	; &I-C1-247B; [04-91]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER THETA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03B8)	; θ
+    (greek-iso8859-7	. #xE8)	; &I-GREEK-68;
+    (ipa		. #xC8)	; &I-MULE-IPA-48;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER THETA")
       (=ucs		  . #x0398)	; Θ
       ))
-    (=ucs		. #x03B8)	; θ
-    (greek-iso8859-7	. #xE8)	; &I-GREEK-68;
-    (ipa		. #xC8)	; &I-MULE-IPA-48;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER THETA")
       (=ucs		  . #x03B8)	; θ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2628)	; &J90-2628; [06-08]
-      (=gb2312		  . #x2628)	; &I-G0-2628; [06-08]
-      (=ks-x1001	  . #x2548)	; &I-K0-2548; [05-40]
-      (=cns11643-1	  . #x247C)	; &I-C1-247C; [04-92]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER THETA")
       (=ucs		  . #x03B8)	; θ
@@ -1789,30 +1783,30 @@
     (=big5		. #xA363)	; &I-B-A363;
     (=ucs@gb/fw		. #x03B8)	; &J90-2648;
     (=ucs@jis/fw	. #x03B8)	; &J90-2648;
+    (->uppercase
+     ((=jis-x0208	  . #x2628)	; &J90-2628; [06-08]
+      (=gb2312		  . #x2628)	; &I-G0-2628; [06-08]
+      (=ks-x1001	  . #x2548)	; &I-K0-2548; [05-40]
+      (=cns11643-1	  . #x247C)	; &I-C1-247C; [04-92]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER IOTA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03B9)	; ι
+    (greek-iso8859-7	. #xE9)	; &I-GREEK-69;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER IOTA")
       (=ucs		  . #x0399)	; Ι
       ))
-    (=ucs		. #x03B9)	; ι
-    (greek-iso8859-7	. #xE9)	; &I-GREEK-69;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER IOTA")
       (=ucs		  . #x03B9)	; ι
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2629)	; &J90-2629; [06-09]
-      (=gb2312		  . #x2629)	; &I-G0-2629; [06-09]
-      (=ks-x1001	  . #x2549)	; &I-K0-2549; [05-41]
-      (=cns11643-1	  . #x247D)	; &I-C1-247D; [04-93]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER IOTA")
       (=ucs		  . #x03B9)	; ι
@@ -1824,30 +1818,30 @@
     (=big5		. #xA364)	; &I-B-A364;
     (=ucs@gb/fw		. #x03B9)	; &J90-2649;
     (=ucs@jis/fw	. #x03B9)	; &J90-2649;
+    (->uppercase
+     ((=jis-x0208	  . #x2629)	; &J90-2629; [06-09]
+      (=gb2312		  . #x2629)	; &I-G0-2629; [06-09]
+      (=ks-x1001	  . #x2549)	; &I-K0-2549; [05-41]
+      (=cns11643-1	  . #x247D)	; &I-C1-247D; [04-93]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER KAPPA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03BA)	; κ
+    (greek-iso8859-7	. #xEA)	; &I-GREEK-6A;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER KAPPA")
       (=ucs		  . #x039A)	; Κ
       ))
-    (=ucs		. #x03BA)	; κ
-    (greek-iso8859-7	. #xEA)	; &I-GREEK-6A;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER KAPPA")
       (=ucs		  . #x03BA)	; κ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x262A)	; &J90-262A; [06-10]
-      (=gb2312		  . #x262A)	; &I-G0-262A; [06-10]
-      (=ks-x1001	  . #x254A)	; &I-K0-254A; [05-42]
-      (=cns11643-1	  . #x247E)	; &I-C1-247E; [04-94]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER KAPPA")
       (=ucs		  . #x03BA)	; κ
@@ -1859,30 +1853,30 @@
     (=big5		. #xA365)	; &I-B-A365;
     (=ucs@gb/fw		. #x03BA)	; &J90-264A;
     (=ucs@jis/fw	. #x03BA)	; &J90-264A;
+    (->uppercase
+     ((=jis-x0208	  . #x262A)	; &J90-262A; [06-10]
+      (=gb2312		  . #x262A)	; &I-G0-262A; [06-10]
+      (=ks-x1001	  . #x254A)	; &I-K0-254A; [05-42]
+      (=cns11643-1	  . #x247E)	; &I-C1-247E; [04-94]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER LAMDA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03BB)	; λ
+    (greek-iso8859-7	. #xEB)	; &I-GREEK-6B;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER LAMDA")
       (=ucs		  . #x039B)	; Λ
       ))
-    (=ucs		. #x03BB)	; λ
-    (greek-iso8859-7	. #xEB)	; &I-GREEK-6B;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER LAMDA")
       (=ucs		  . #x03BB)	; λ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x262B)	; &J90-262B; [06-11]
-      (=gb2312		  . #x262B)	; &I-G0-262B; [06-11]
-      (=ks-x1001	  . #x254B)	; &I-K0-254B; [05-43]
-      (=cns11643-1	  . #x2521)	; &I-C1-2521; [05-01]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER LAMDA")
       (=ucs		  . #x03BB)	; λ
@@ -1894,30 +1888,30 @@
     (=big5		. #xA366)	; &I-B-A366;
     (=ucs@gb/fw		. #x03BB)	; &J90-264B;
     (=ucs@jis/fw	. #x03BB)	; &J90-264B;
+    (->uppercase
+     ((=jis-x0208	  . #x262B)	; &J90-262B; [06-11]
+      (=gb2312		  . #x262B)	; &I-G0-262B; [06-11]
+      (=ks-x1001	  . #x254B)	; &I-K0-254B; [05-43]
+      (=cns11643-1	  . #x2521)	; &I-C1-2521; [05-01]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER MU")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03BC)	; μ
+    (greek-iso8859-7	. #xEC)	; &I-GREEK-6C;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER MU")
       (=ucs		  . #x039C)	; Μ
       ))
-    (=ucs		. #x03BC)	; μ
-    (greek-iso8859-7	. #xEC)	; &I-GREEK-6C;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER MU")
       (=ucs		  . #x03BC)	; μ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x262C)	; &J90-262C; [06-12]
-      (=gb2312		  . #x262C)	; &I-G0-262C; [06-12]
-      (=ks-x1001	  . #x254C)	; &I-K0-254C; [05-44]
-      (=cns11643-1	  . #x2522)	; &I-C1-2522; [05-02]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER MU")
       (=ucs		  . #x03BC)	; μ
@@ -1929,30 +1923,30 @@
     (=big5		. #xA367)	; &I-B-A367;
     (=ucs@gb/fw		. #x03BC)	; &J90-264C;
     (=ucs@jis/fw	. #x03BC)	; &J90-264C;
+    (->uppercase
+     ((=jis-x0208	  . #x262C)	; &J90-262C; [06-12]
+      (=gb2312		  . #x262C)	; &I-G0-262C; [06-12]
+      (=ks-x1001	  . #x254C)	; &I-K0-254C; [05-44]
+      (=cns11643-1	  . #x2522)	; &I-C1-2522; [05-02]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER NU")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03BD)	; ν
+    (greek-iso8859-7	. #xED)	; &I-GREEK-6D;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER NU")
       (=ucs		  . #x039D)	; Ν
       ))
-    (=ucs		. #x03BD)	; ν
-    (greek-iso8859-7	. #xED)	; &I-GREEK-6D;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER NU")
       (=ucs		  . #x03BD)	; ν
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x262D)	; &J90-262D; [06-13]
-      (=gb2312		  . #x262D)	; &I-G0-262D; [06-13]
-      (=ks-x1001	  . #x254D)	; &I-K0-254D; [05-45]
-      (=cns11643-1	  . #x2523)	; &I-C1-2523; [05-03]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER NU")
       (=ucs		  . #x03BD)	; ν
@@ -1964,30 +1958,30 @@
     (=big5		. #xA368)	; &I-B-A368;
     (=ucs@gb/fw		. #x03BD)	; &J90-264D;
     (=ucs@jis/fw	. #x03BD)	; &J90-264D;
+    (->uppercase
+     ((=jis-x0208	  . #x262D)	; &J90-262D; [06-13]
+      (=gb2312		  . #x262D)	; &I-G0-262D; [06-13]
+      (=ks-x1001	  . #x254D)	; &I-K0-254D; [05-45]
+      (=cns11643-1	  . #x2523)	; &I-C1-2523; [05-03]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER XI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03BE)	; ξ
+    (greek-iso8859-7	. #xEE)	; &I-GREEK-6E;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER XI")
       (=ucs		  . #x039E)	; Ξ
       ))
-    (=ucs		. #x03BE)	; ξ
-    (greek-iso8859-7	. #xEE)	; &I-GREEK-6E;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER XI")
       (=ucs		  . #x03BE)	; ξ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x262E)	; &J90-262E; [06-14]
-      (=gb2312		  . #x262E)	; &I-G0-262E; [06-14]
-      (=ks-x1001	  . #x254E)	; &I-K0-254E; [05-46]
-      (=cns11643-1	  . #x2524)	; &I-C1-2524; [05-04]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER XI")
       (=ucs		  . #x03BE)	; ξ
@@ -1999,30 +1993,30 @@
     (=big5		. #xA369)	; &I-B-A369;
     (=ucs@gb/fw		. #x03BE)	; &J90-264E;
     (=ucs@jis/fw	. #x03BE)	; &J90-264E;
+    (->uppercase
+     ((=jis-x0208	  . #x262E)	; &J90-262E; [06-14]
+      (=gb2312		  . #x262E)	; &I-G0-262E; [06-14]
+      (=ks-x1001	  . #x254E)	; &I-K0-254E; [05-46]
+      (=cns11643-1	  . #x2524)	; &I-C1-2524; [05-04]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER OMICRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03BF)	; ο
+    (greek-iso8859-7	. #xEF)	; &I-GREEK-6F;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER OMICRON")
       (=ucs		  . #x039F)	; Ο
       ))
-    (=ucs		. #x03BF)	; ο
-    (greek-iso8859-7	. #xEF)	; &I-GREEK-6F;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER OMICRON")
       (=ucs		  . #x03BF)	; ο
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x262F)	; &J90-262F; [06-15]
-      (=gb2312		  . #x262F)	; &I-G0-262F; [06-15]
-      (=ks-x1001	  . #x254F)	; &I-K0-254F; [05-47]
-      (=cns11643-1	  . #x2525)	; &I-C1-2525; [05-05]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER OMICRON")
       (=ucs		  . #x03BF)	; ο
@@ -2034,30 +2028,30 @@
     (=big5		. #xA36A)	; &I-B-A36A;
     (=ucs@gb/fw		. #x03BF)	; &J90-264F;
     (=ucs@jis/fw	. #x03BF)	; &J90-264F;
+    (->uppercase
+     ((=jis-x0208	  . #x262F)	; &J90-262F; [06-15]
+      (=gb2312		  . #x262F)	; &I-G0-262F; [06-15]
+      (=ks-x1001	  . #x254F)	; &I-K0-254F; [05-47]
+      (=cns11643-1	  . #x2525)	; &I-C1-2525; [05-05]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER PI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03C0)	; π
+    (greek-iso8859-7	. #xF0)	; &I-GREEK-70;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER PI")
       (=ucs		  . #x03A0)	; Π
       ))
-    (=ucs		. #x03C0)	; π
-    (greek-iso8859-7	. #xF0)	; &I-GREEK-70;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER PI")
       (=ucs		  . #x03C0)	; π
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2630)	; &J90-2630; [06-16]
-      (=gb2312		  . #x2630)	; &I-G0-2630; [06-16]
-      (=ks-x1001	  . #x2550)	; &I-K0-2550; [05-48]
-      (=cns11643-1	  . #x2526)	; &I-C1-2526; [05-06]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER PI")
       (=ucs		  . #x03C0)	; π
@@ -2069,30 +2063,30 @@
     (=big5		. #xA36B)	; &I-B-A36B;
     (=ucs@gb/fw		. #x03C0)	; &J90-2650;
     (=ucs@jis/fw	. #x03C0)	; &J90-2650;
+    (->uppercase
+     ((=jis-x0208	  . #x2630)	; &J90-2630; [06-16]
+      (=gb2312		  . #x2630)	; &I-G0-2630; [06-16]
+      (=ks-x1001	  . #x2550)	; &I-K0-2550; [05-48]
+      (=cns11643-1	  . #x2526)	; &I-C1-2526; [05-06]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER RHO")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03C1)	; ρ
+    (greek-iso8859-7	. #xF1)	; &I-GREEK-71;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER RHO")
       (=ucs		  . #x03A1)	; Ρ
       ))
-    (=ucs		. #x03C1)	; ρ
-    (greek-iso8859-7	. #xF1)	; &I-GREEK-71;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER RHO")
       (=ucs		  . #x03C1)	; ρ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2631)	; &J90-2631; [06-17]
-      (=gb2312		  . #x2631)	; &I-G0-2631; [06-17]
-      (=ks-x1001	  . #x2551)	; &I-K0-2551; [05-49]
-      (=cns11643-1	  . #x2527)	; &I-C1-2527; [05-07]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER RHO")
       (=ucs		  . #x03C1)	; ρ
@@ -2104,30 +2098,30 @@
     (=big5		. #xA36C)	; &I-B-A36C;
     (=ucs@gb/fw		. #x03C1)	; &J90-2651;
     (=ucs@jis/fw	. #x03C1)	; &J90-2651;
+    (->uppercase
+     ((=jis-x0208	  . #x2631)	; &J90-2631; [06-17]
+      (=gb2312		  . #x2631)	; &I-G0-2631; [06-17]
+      (=ks-x1001	  . #x2551)	; &I-K0-2551; [05-49]
+      (=cns11643-1	  . #x2527)	; &I-C1-2527; [05-07]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER FINAL SIGMA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03C2)	; ς
+    (greek-iso8859-7	. #xF2)	; &I-GREEK-72;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER SIGMA")
       (=ucs		  . #x03A3)	; Σ
       ))
-    (=ucs		. #x03C2)	; ς
-    (greek-iso8859-7	. #xF2)	; &I-GREEK-72;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER FINAL SIGMA")
       (=ucs		  . #x03C2)	; ς
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2632)	; &J90-2632; [06-18]
-      (=gb2312		  . #x2632)	; &I-G0-2632; [06-18]
-      (=ks-x1001	  . #x2552)	; &I-K0-2552; [05-50]
-      (=cns11643-1	  . #x2528)	; &I-C1-2528; [05-08]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER FINAL SIGMA")
       (=ucs		  . #x03C2)	; ς
@@ -2135,30 +2129,30 @@
     (=jis-x0212		. #x2678)	; &JX1-2659; [06-88]
     (=jis-x0213-1-2000	. #x2659)	; &I-JX1-2659; [06-57]
     (=ucs@jis/fw	. #x03C2)	; &JX1-2659;
+    (->uppercase
+     ((=jis-x0208	  . #x2632)	; &J90-2632; [06-18]
+      (=gb2312		  . #x2632)	; &I-G0-2632; [06-18]
+      (=ks-x1001	  . #x2552)	; &I-K0-2552; [05-50]
+      (=cns11643-1	  . #x2528)	; &I-C1-2528; [05-08]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER SIGMA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03C3)	; σ
+    (greek-iso8859-7	. #xF3)	; &I-GREEK-73;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER SIGMA")
       (=ucs		  . #x03A3)	; Σ
       ))
-    (=ucs		. #x03C3)	; σ
-    (greek-iso8859-7	. #xF3)	; &I-GREEK-73;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER SIGMA")
       (=ucs		  . #x03C3)	; σ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2632)	; &J90-2632; [06-18]
-      (=gb2312		  . #x2632)	; &I-G0-2632; [06-18]
-      (=ks-x1001	  . #x2552)	; &I-K0-2552; [05-50]
-      (=cns11643-1	  . #x2528)	; &I-C1-2528; [05-08]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER SIGMA")
       (=ucs		  . #x03C3)	; σ
@@ -2170,30 +2164,30 @@
     (=big5		. #xA36D)	; &I-B-A36D;
     (=ucs@gb/fw		. #x03C3)	; &J90-2652;
     (=ucs@jis/fw	. #x03C3)	; &J90-2652;
+    (->uppercase
+     ((=jis-x0208	  . #x2632)	; &J90-2632; [06-18]
+      (=gb2312		  . #x2632)	; &I-G0-2632; [06-18]
+      (=ks-x1001	  . #x2552)	; &I-K0-2552; [05-50]
+      (=cns11643-1	  . #x2528)	; &I-C1-2528; [05-08]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER TAU")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03C4)	; τ
+    (greek-iso8859-7	. #xF4)	; &I-GREEK-74;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER TAU")
       (=ucs		  . #x03A4)	; Τ
       ))
-    (=ucs		. #x03C4)	; τ
-    (greek-iso8859-7	. #xF4)	; &I-GREEK-74;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER TAU")
       (=ucs		  . #x03C4)	; τ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2633)	; &J90-2633; [06-19]
-      (=gb2312		  . #x2633)	; &I-G0-2633; [06-19]
-      (=ks-x1001	  . #x2553)	; &I-K0-2553; [05-51]
-      (=cns11643-1	  . #x2529)	; &I-C1-2529; [05-09]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER TAU")
       (=ucs		  . #x03C4)	; τ
@@ -2205,30 +2199,30 @@
     (=big5		. #xA36E)	; &I-B-A36E;
     (=ucs@gb/fw		. #x03C4)	; &J90-2653;
     (=ucs@jis/fw	. #x03C4)	; &J90-2653;
+    (->uppercase
+     ((=jis-x0208	  . #x2633)	; &J90-2633; [06-19]
+      (=gb2312		  . #x2633)	; &I-G0-2633; [06-19]
+      (=ks-x1001	  . #x2553)	; &I-K0-2553; [05-51]
+      (=cns11643-1	  . #x2529)	; &I-C1-2529; [05-09]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER UPSILON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03C5)	; υ
+    (greek-iso8859-7	. #xF5)	; &I-GREEK-75;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER UPSILON")
       (=ucs		  . #x03A5)	; Υ
       ))
-    (=ucs		. #x03C5)	; υ
-    (greek-iso8859-7	. #xF5)	; &I-GREEK-75;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER UPSILON")
       (=ucs		  . #x03C5)	; υ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2634)	; &J90-2634; [06-20]
-      (=gb2312		  . #x2634)	; &I-G0-2634; [06-20]
-      (=ks-x1001	  . #x2554)	; &I-K0-2554; [05-52]
-      (=cns11643-1	  . #x252A)	; &I-C1-252A; [05-10]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER UPSILON")
       (=ucs		  . #x03C5)	; υ
@@ -2240,30 +2234,30 @@
     (=big5		. #xA36F)	; &I-B-A36F;
     (=ucs@gb/fw		. #x03C5)	; &J90-2654;
     (=ucs@jis/fw	. #x03C5)	; &J90-2654;
+    (->uppercase
+     ((=jis-x0208	  . #x2634)	; &J90-2634; [06-20]
+      (=gb2312		  . #x2634)	; &I-G0-2634; [06-20]
+      (=ks-x1001	  . #x2554)	; &I-K0-2554; [05-52]
+      (=cns11643-1	  . #x252A)	; &I-C1-252A; [05-10]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER PHI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03C6)	; φ
+    (greek-iso8859-7	. #xF6)	; &I-GREEK-76;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER PHI")
       (=ucs		  . #x03A6)	; Φ
       ))
-    (=ucs		. #x03C6)	; φ
-    (greek-iso8859-7	. #xF6)	; &I-GREEK-76;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER PHI")
       (=ucs		  . #x03C6)	; φ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2635)	; &J90-2635; [06-21]
-      (=gb2312		  . #x2635)	; &I-G0-2635; [06-21]
-      (=ks-x1001	  . #x2555)	; &I-K0-2555; [05-53]
-      (=cns11643-1	  . #x252B)	; &I-C1-252B; [05-11]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER PHI")
       (=ucs		  . #x03C6)	; φ
@@ -2275,30 +2269,30 @@
     (=big5		. #xA370)	; &I-B-A370;
     (=ucs@gb/fw		. #x03C6)	; &J90-2655;
     (=ucs@jis/fw	. #x03C6)	; &J90-2655;
+    (->uppercase
+     ((=jis-x0208	  . #x2635)	; &J90-2635; [06-21]
+      (=gb2312		  . #x2635)	; &I-G0-2635; [06-21]
+      (=ks-x1001	  . #x2555)	; &I-K0-2555; [05-53]
+      (=cns11643-1	  . #x252B)	; &I-C1-252B; [05-11]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER CHI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03C7)	; χ
+    (greek-iso8859-7	. #xF7)	; &I-GREEK-77;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER CHI")
       (=ucs		  . #x03A7)	; Χ
       ))
-    (=ucs		. #x03C7)	; χ
-    (greek-iso8859-7	. #xF7)	; &I-GREEK-77;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER CHI")
       (=ucs		  . #x03C7)	; χ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2636)	; &J90-2636; [06-22]
-      (=gb2312		  . #x2636)	; &I-G0-2636; [06-22]
-      (=ks-x1001	  . #x2556)	; &I-K0-2556; [05-54]
-      (=cns11643-1	  . #x252C)	; &I-C1-252C; [05-12]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER CHI")
       (=ucs		  . #x03C7)	; χ
@@ -2310,30 +2304,30 @@
     (=big5		. #xA371)	; &I-B-A371;
     (=ucs@gb/fw		. #x03C7)	; &J90-2656;
     (=ucs@jis/fw	. #x03C7)	; &J90-2656;
+    (->uppercase
+     ((=jis-x0208	  . #x2636)	; &J90-2636; [06-22]
+      (=gb2312		  . #x2636)	; &I-G0-2636; [06-22]
+      (=ks-x1001	  . #x2556)	; &I-K0-2556; [05-54]
+      (=cns11643-1	  . #x252C)	; &I-C1-252C; [05-12]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER PSI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03C8)	; ψ
+    (greek-iso8859-7	. #xF8)	; &I-GREEK-78;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER PSI")
       (=ucs		  . #x03A8)	; Ψ
       ))
-    (=ucs		. #x03C8)	; ψ
-    (greek-iso8859-7	. #xF8)	; &I-GREEK-78;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER PSI")
       (=ucs		  . #x03C8)	; ψ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2637)	; &J90-2637; [06-23]
-      (=gb2312		  . #x2637)	; &I-G0-2637; [06-23]
-      (=ks-x1001	  . #x2557)	; &I-K0-2557; [05-55]
-      (=cns11643-1	  . #x252D)	; &I-C1-252D; [05-13]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER PSI")
       (=ucs		  . #x03C8)	; ψ
@@ -2345,30 +2339,30 @@
     (=big5		. #xA372)	; &I-B-A372;
     (=ucs@gb/fw		. #x03C8)	; &J90-2657;
     (=ucs@jis/fw	. #x03C8)	; &J90-2657;
+    (->uppercase
+     ((=jis-x0208	  . #x2637)	; &J90-2637; [06-23]
+      (=gb2312		  . #x2637)	; &I-G0-2637; [06-23]
+      (=ks-x1001	  . #x2557)	; &I-K0-2557; [05-55]
+      (=cns11643-1	  . #x252D)	; &I-C1-252D; [05-13]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER OMEGA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03C9)	; ω
+    (greek-iso8859-7	. #xF9)	; &I-GREEK-79;
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER OMEGA")
       (=ucs		  . #x03A9)	; Ω
       ))
-    (=ucs		. #x03C9)	; ω
-    (greek-iso8859-7	. #xF9)	; &I-GREEK-79;
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER OMEGA")
       (=ucs		  . #x03C9)	; ω
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2638)	; &J90-2638; [06-24]
-      (=gb2312		  . #x2638)	; &I-G0-2638; [06-24]
-      (=ks-x1001	  . #x2558)	; &I-K0-2558; [05-56]
-      (=cns11643-1	  . #x252E)	; &I-C1-252E; [05-14]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER OMEGA")
       (=ucs		  . #x03C9)	; ω
@@ -2380,16 +2374,18 @@
     (=big5		. #xA373)	; &I-B-A373;
     (=ucs@gb/fw		. #x03C9)	; &J90-2658;
     (=ucs@jis/fw	. #x03C9)	; &J90-2658;
+    (->uppercase
+     ((=jis-x0208	  . #x2638)	; &J90-2638; [06-24]
+      (=gb2312		  . #x2638)	; &I-G0-2638; [06-24]
+      (=ks-x1001	  . #x2558)	; &I-K0-2558; [05-56]
+      (=cns11643-1	  . #x252E)	; &I-C1-252E; [05-14]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER IOTA WITH DIALYTIKA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER IOTA WITH DIALYTIKA")
-      (=ucs		  . #x03AA)	; Ϊ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER IOTA")
       (=ucs		  . #x03B9)	; ι
@@ -2399,31 +2395,31 @@
       ))
     (=ucs		. #x03CA)	; ϊ
     (greek-iso8859-7	. #xFA)	; &I-GREEK-7A;
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER IOTA WITH DIALYTIKA")
+      (=ucs		  . #x03AA)	; Ϊ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER IOTA WITH DIALYTIKA")
       (=ucs		  . #x03CA)	; ϊ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2665)	; &JSP-2665; [06-69]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER IOTA WITH DIALYTIKA")
       (=ucs		  . #x03CA)	; ϊ
       ))
     (=jis-x0212		. #x2675)	; &JSP-2675; [06-85]
     (=ucs@jis/fw	. #x03CA)	; &JSP-2675;
+    (->uppercase
+     ((=jis-x0212	  . #x2665)	; &JSP-2665; [06-69]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER UPSILON WITH DIALYTIKA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA")
-      (=ucs		  . #x03AB)	; Ϋ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER UPSILON")
       (=ucs		  . #x03C5)	; υ
@@ -2433,31 +2429,31 @@
       ))
     (=ucs		. #x03CB)	; ϋ
     (greek-iso8859-7	. #xFB)	; &I-GREEK-7B;
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA")
+      (=ucs		  . #x03AB)	; Ϋ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA")
       (=ucs		  . #x03CB)	; ϋ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x266A)	; &JSP-266A; [06-74]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA")
       (=ucs		  . #x03CB)	; ϋ
       ))
     (=jis-x0212		. #x267A)	; &JSP-267A; [06-90]
     (=ucs@jis/fw	. #x03CB)	; &JSP-267A;
+    (->uppercase
+     ((=jis-x0212	  . #x266A)	; &JSP-266A; [06-74]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER OMICRON WITH TONOS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER OMICRON WITH TONOS")
-      (=ucs		  . #x038C)	; Ό
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMICRON")
       (=ucs		  . #x03BF)	; ο
@@ -2467,31 +2463,31 @@
       ))
     (=ucs		. #x03CC)	; ό
     (greek-iso8859-7	. #xFC)	; &I-GREEK-7C;
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER OMICRON WITH TONOS")
+      (=ucs		  . #x038C)	; Ό
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER OMICRON WITH TONOS")
       (=ucs		  . #x03CC)	; ό
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2667)	; &JSP-2667; [06-71]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER OMICRON WITH TONOS")
       (=ucs		  . #x03CC)	; ό
       ))
     (=jis-x0212		. #x2677)	; &JSP-2677; [06-87]
     (=ucs@jis/fw	. #x03CC)	; &JSP-2677;
+    (->uppercase
+     ((=jis-x0212	  . #x2667)	; &JSP-2667; [06-71]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER UPSILON WITH TONOS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER UPSILON WITH TONOS")
-      (=ucs		  . #x038E)	; Ύ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER UPSILON")
       (=ucs		  . #x03C5)	; υ
@@ -2501,31 +2497,31 @@
       ))
     (=ucs		. #x03CD)	; ύ
     (greek-iso8859-7	. #xFD)	; &I-GREEK-7D;
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER UPSILON WITH TONOS")
+      (=ucs		  . #x038E)	; Ύ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER UPSILON WITH TONOS")
       (=ucs		  . #x03CD)	; ύ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2669)	; &JSP-2669; [06-73]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER UPSILON WITH TONOS")
       (=ucs		  . #x03CD)	; ύ
       ))
     (=jis-x0212		. #x2679)	; &JSP-2679; [06-89]
     (=ucs@jis/fw	. #x03CD)	; &JSP-2679;
+    (->uppercase
+     ((=jis-x0212	  . #x2669)	; &JSP-2669; [06-73]
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER OMEGA WITH TONOS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER OMEGA WITH TONOS")
-      (=ucs		  . #x038F)	; Ώ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMEGA")
       (=ucs		  . #x03C9)	; ω
@@ -2535,51 +2531,55 @@
       ))
     (=ucs		. #x03CE)	; ώ
     (greek-iso8859-7	. #xFE)	; &I-GREEK-7E;
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER OMEGA WITH TONOS")
+      (=ucs		  . #x038F)	; Ώ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "GREEK SMALL LETTER OMEGA WITH TONOS")
       (=ucs		  . #x03CE)	; ώ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x266C)	; &JSP-266C; [06-76]
-      ))
     (<-fullwidth
      ((name		  . "GREEK SMALL LETTER OMEGA WITH TONOS")
       (=ucs		  . #x03CE)	; ώ
       ))
     (=jis-x0212		. #x267C)	; &JSP-267C; [06-92]
     (=ucs@jis/fw	. #x03CE)	; &JSP-267C;
+    (->uppercase
+     ((=jis-x0212	  . #x266C)	; &JSP-266C; [06-76]
+      ))
     ))
 (define-char
   '((name		. "GREEK BETA SYMBOL")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER BETA")
-      (=ucs		  . #x0392)	; Β
-      ))
     (<-compat
      ((name		  . "GREEK SMALL LETTER BETA")
       (=ucs		  . #x03B2)	; β
       ))
     (=ucs		. #x03D0)	; ϐ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER BETA")
+      (=ucs		  . #x0392)	; Β
+      ))
     ))
 (define-char
   '((name		. "GREEK THETA SYMBOL")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER THETA")
-      (=ucs		  . #x0398)	; Θ
-      ))
     (<-compat
      ((name		  . "GREEK SMALL LETTER THETA")
       (=ucs		  . #x03B8)	; θ
       ))
     (=ucs		. #x03D1)	; ϑ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER THETA")
+      (=ucs		  . #x0398)	; Θ
+      ))
     ))
 (define-char
   '((name		. "GREEK UPSILON WITH HOOK SYMBOL")
@@ -2625,30 +2625,30 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER PHI")
-      (=ucs		  . #x03A6)	; Φ
-      ))
     (<-compat
      ((name		  . "GREEK SMALL LETTER PHI")
       (=ucs		  . #x03C6)	; φ
       ))
     (=ucs		. #x03D5)	; ϕ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER PHI")
+      (=ucs		  . #x03A6)	; Φ
+      ))
     ))
 (define-char
   '((name		. "GREEK PI SYMBOL")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER PI")
-      (=ucs		  . #x03A0)	; Π
-      ))
     (<-compat
      ((name		  . "GREEK SMALL LETTER PI")
       (=ucs		  . #x03C0)	; π
       ))
     (=ucs		. #x03D6)	; ϖ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER PI")
+      (=ucs		  . #x03A0)	; Π
+      ))
     ))
 (define-char
   '((name		. "GREEK KAI SYMBOL")
@@ -2662,287 +2662,287 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03DA)	; Ϛ
     (->lowercase
      ((name		  . "GREEK SMALL LETTER STIGMA")
       (=ucs		  . #x03DB)	; ϛ
       ))
-    (=ucs		. #x03DA)	; Ϛ
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER STIGMA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03DB)	; ϛ
     (->uppercase
      ((name		  . "GREEK LETTER STIGMA")
       (=ucs		  . #x03DA)	; Ϛ
       ))
-    (=ucs		. #x03DB)	; ϛ
     ))
 (define-char
   '((name		. "GREEK LETTER DIGAMMA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03DC)	; Ϝ
     (->lowercase
      ((name		  . "GREEK SMALL LETTER DIGAMMA")
       (=ucs		  . #x03DD)	; ϝ
       ))
-    (=ucs		. #x03DC)	; Ϝ
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER DIGAMMA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03DD)	; ϝ
     (->uppercase
      ((name		  . "GREEK LETTER DIGAMMA")
       (=ucs		  . #x03DC)	; Ϝ
       ))
-    (=ucs		. #x03DD)	; ϝ
     ))
 (define-char
   '((name		. "GREEK LETTER KOPPA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03DE)	; Ϟ
     (->lowercase
      ((name		  . "GREEK SMALL LETTER KOPPA")
       (=ucs		  . #x03DF)	; ϟ
       ))
-    (=ucs		. #x03DE)	; Ϟ
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER KOPPA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03DF)	; ϟ
     (->uppercase
      ((name		  . "GREEK LETTER KOPPA")
       (=ucs		  . #x03DE)	; Ϟ
       ))
-    (=ucs		. #x03DF)	; ϟ
     ))
 (define-char
   '((name		. "GREEK LETTER SAMPI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03E0)	; Ï 
     (->lowercase
      ((name		  . "GREEK SMALL LETTER SAMPI")
       (=ucs		  . #x03E1)	; Ï¡
       ))
-    (=ucs		. #x03E0)	; Ï 
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER SAMPI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03E1)	; Ï¡
     (->uppercase
      ((name		  . "GREEK LETTER SAMPI")
       (=ucs		  . #x03E0)	; Ï 
       ))
-    (=ucs		. #x03E1)	; Ï¡
     ))
 (define-char
   '((name		. "COPTIC CAPITAL LETTER SHEI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03E2)	; Ϣ
     (->lowercase
      ((name		  . "COPTIC SMALL LETTER SHEI")
       (=ucs		  . #x03E3)	; ϣ
       ))
-    (=ucs		. #x03E2)	; Ϣ
     ))
 (define-char
   '((name		. "COPTIC SMALL LETTER SHEI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03E3)	; ϣ
     (->uppercase
      ((name		  . "COPTIC CAPITAL LETTER SHEI")
       (=ucs		  . #x03E2)	; Ϣ
       ))
-    (=ucs		. #x03E3)	; ϣ
     ))
 (define-char
   '((name		. "COPTIC CAPITAL LETTER FEI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03E4)	; Ϥ
     (->lowercase
      ((name		  . "COPTIC SMALL LETTER FEI")
       (=ucs		  . #x03E5)	; ϥ
       ))
-    (=ucs		. #x03E4)	; Ϥ
     ))
 (define-char
   '((name		. "COPTIC SMALL LETTER FEI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03E5)	; ϥ
     (->uppercase
      ((name		  . "COPTIC CAPITAL LETTER FEI")
       (=ucs		  . #x03E4)	; Ϥ
       ))
-    (=ucs		. #x03E5)	; ϥ
     ))
 (define-char
   '((name		. "COPTIC CAPITAL LETTER KHEI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03E6)	; Ϧ
     (->lowercase
      ((name		  . "COPTIC SMALL LETTER KHEI")
       (=ucs		  . #x03E7)	; ϧ
       ))
-    (=ucs		. #x03E6)	; Ϧ
     ))
 (define-char
   '((name		. "COPTIC SMALL LETTER KHEI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03E7)	; ϧ
     (->uppercase
      ((name		  . "COPTIC CAPITAL LETTER KHEI")
       (=ucs		  . #x03E6)	; Ϧ
       ))
-    (=ucs		. #x03E7)	; ϧ
     ))
 (define-char
   '((name		. "COPTIC CAPITAL LETTER HORI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03E8)	; Ϩ
     (->lowercase
      ((name		  . "COPTIC SMALL LETTER HORI")
       (=ucs		  . #x03E9)	; Ï©
       ))
-    (=ucs		. #x03E8)	; Ϩ
     ))
 (define-char
   '((name		. "COPTIC SMALL LETTER HORI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03E9)	; Ï©
     (->uppercase
      ((name		  . "COPTIC CAPITAL LETTER HORI")
       (=ucs		  . #x03E8)	; Ϩ
       ))
-    (=ucs		. #x03E9)	; Ï©
     ))
 (define-char
   '((name		. "COPTIC CAPITAL LETTER GANGIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03EA)	; Ϫ
     (->lowercase
      ((name		  . "COPTIC SMALL LETTER GANGIA")
       (=ucs		  . #x03EB)	; Ï«
       ))
-    (=ucs		. #x03EA)	; Ϫ
     ))
 (define-char
   '((name		. "COPTIC SMALL LETTER GANGIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03EB)	; Ï«
     (->uppercase
      ((name		  . "COPTIC CAPITAL LETTER GANGIA")
       (=ucs		  . #x03EA)	; Ϫ
       ))
-    (=ucs		. #x03EB)	; Ï«
     ))
 (define-char
   '((name		. "COPTIC CAPITAL LETTER SHIMA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03EC)	; Ϭ
     (->lowercase
      ((name		  . "COPTIC SMALL LETTER SHIMA")
       (=ucs		  . #x03ED)	; Ï­
       ))
-    (=ucs		. #x03EC)	; Ϭ
     ))
 (define-char
   '((name		. "COPTIC SMALL LETTER SHIMA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03ED)	; Ï­
     (->uppercase
      ((name		  . "COPTIC CAPITAL LETTER SHIMA")
       (=ucs		  . #x03EC)	; Ϭ
       ))
-    (=ucs		. #x03ED)	; Ï­
     ))
 (define-char
   '((name		. "COPTIC CAPITAL LETTER DEI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03EE)	; Ï®
     (->lowercase
      ((name		  . "COPTIC SMALL LETTER DEI")
       (=ucs		  . #x03EF)	; ϯ
       ))
-    (=ucs		. #x03EE)	; Ï®
     ))
 (define-char
   '((name		. "COPTIC SMALL LETTER DEI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x03EF)	; ϯ
     (->uppercase
      ((name		  . "COPTIC CAPITAL LETTER DEI")
       (=ucs		  . #x03EE)	; Ï®
       ))
-    (=ucs		. #x03EF)	; ϯ
     ))
 (define-char
   '((name		. "GREEK KAPPA SYMBOL")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER KAPPA")
-      (=ucs		  . #x039A)	; Κ
-      ))
     (<-compat
      ((name		  . "GREEK SMALL LETTER KAPPA")
       (=ucs		  . #x03BA)	; κ
       ))
     (=ucs		. #x03F0)	; Ï°
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER KAPPA")
+      (=ucs		  . #x039A)	; Κ
+      ))
     ))
 (define-char
   '((name		. "GREEK RHO SYMBOL")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER RHO")
-      (=ucs		  . #x03A1)	; Ρ
-      ))
     (<-compat
      ((name		  . "GREEK SMALL LETTER RHO")
       (=ucs		  . #x03C1)	; ρ
       ))
     (=ucs		. #x03F1)	; ϱ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER RHO")
+      (=ucs		  . #x03A1)	; Ρ
+      ))
     ))
 (define-char
   '((name		. "GREEK LUNATE SIGMA SYMBOL")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER SIGMA")
-      (=ucs		  . #x03A3)	; Σ
-      ))
     (<-compat
      ((name		  . "GREEK SMALL LETTER FINAL SIGMA")
       (=ucs		  . #x03C2)	; ς
       ))
     (=ucs		. #x03F2)	; ϲ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER SIGMA")
+      (=ucs		  . #x03A3)	; Σ
+      ))
     ))
 (define-char
   '((name		. "GREEK LETTER YOT")
diff --git a/lisp/utf-2000/u00400-Cyrillic.el b/lisp/utf-2000/u00400-Cyrillic.el
index 465e931..6a9568b 100644
--- a/lisp/utf-2000/u00400-Cyrillic.el
+++ b/lisp/utf-2000/u00400-Cyrillic.el
@@ -4,10 +4,6 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER IE WITH GRAVE")
-      (=ucs		  . #x0450)	; ѐ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER IE")
       (=ucs		  . #x0415)	; Е
@@ -16,16 +12,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x0400)	; Ѐ
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER IE WITH GRAVE")
+      (=ucs		  . #x0450)	; ѐ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER IO")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER IO")
-      (=ucs		  . #x0451)	; ё
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER IE")
       (=ucs		  . #x0415)	; Е
@@ -35,17 +31,16 @@
       ))
     (=ucs		. #x0401)	; Ё
     (cyrillic-iso8859-5 . #xA1)	; &I-CYRILLIC-21;
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER IO")
+      (=ucs		  . #x0451)	; ё
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER IO")
       (=ucs		  . #x0401)	; Ё
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2757)	; &J90-2757; [07-55]
-      (=gb2312		  . #x2757)	; &I-G0-2757; [07-55]
-      (=ks-x1001	  . #x2C57)	; &I-K0-2C57; [12-55]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER IO")
       (=ucs		  . #x0401)	; Ё
@@ -64,6 +59,11 @@
     (=big5-eten		. #xC7F9)	; &B-C7F9;
     (=ucs@gb/fw		. #x0401)	; &J90-2727;
     (=ucs@jis/fw	. #x0401)	; &J90-2727;
+    (->lowercase
+     ((=jis-x0208	  . #x2757)	; &J90-2757; [07-55]
+      (=gb2312		  . #x2757)	; &I-G0-2757; [07-55]
+      (=ks-x1001	  . #x2C57)	; &I-K0-2C57; [12-55]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER DJE")
@@ -71,37 +71,33 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Serbocroatian")
+    (=ucs		. #x0402)	; Ђ
+    (cyrillic-iso8859-5 . #xA2)	; &I-CYRILLIC-22;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER DJE")
       (=ucs		  . #x0452)	; ђ
       ))
-    (=ucs		. #x0402)	; Ђ
-    (cyrillic-iso8859-5 . #xA2)	; &I-CYRILLIC-22;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER DJE")
       (=ucs		  . #x0402)	; Ђ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2772)	; &JSP-2772; [07-82]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER DJE")
       (=ucs		  . #x0402)	; Ђ
       ))
     (=jis-x0212		. #x2742)	; &JSP-2742; [07-34]
     (=ucs@jis/fw	. #x0402)	; &JSP-2742;
+    (->lowercase
+     ((=jis-x0212	  . #x2772)	; &JSP-2772; [07-82]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER GJE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER GJE")
-      (=ucs		  . #x0453)	; ѓ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER GHE")
       (=ucs		  . #x0413)	; Г
@@ -111,15 +107,16 @@
       ))
     (=ucs		. #x0403)	; Ѓ
     (cyrillic-iso8859-5 . #xA3)	; &I-CYRILLIC-23;
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER GJE")
+      (=ucs		  . #x0453)	; ѓ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER GJE")
       (=ucs		  . #x0403)	; Ѓ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2773)	; &JSP-2773; [07-83]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER GJE")
       (=ucs		  . #x0403)	; Ѓ
@@ -134,87 +131,90 @@
       ))
     (=jis-x0212		. #x2743)	; &JSP-2743; [07-35]
     (=ucs@jis/fw	. #x0403)	; &JSP-2743;
+    (->lowercase
+     ((=jis-x0212	  . #x2773)	; &JSP-2773; [07-83]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER UKRAINIAN IE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0404)	; Є
+    (cyrillic-iso8859-5 . #xA4)	; &I-CYRILLIC-24;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER UKRAINIAN IE")
       (=ucs		  . #x0454)	; є
       ))
-    (=ucs		. #x0404)	; Є
-    (cyrillic-iso8859-5 . #xA4)	; &I-CYRILLIC-24;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER UKRAINIAN IE")
       (=ucs		  . #x0404)	; Є
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2774)	; &JSP-2774; [07-84]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER UKRAINIAN IE")
       (=ucs		  . #x0404)	; Є
       ))
     (=jis-x0212		. #x2744)	; &JSP-2744; [07-36]
     (=ucs@jis/fw	. #x0404)	; &JSP-2744;
+    (->lowercase
+     ((=jis-x0212	  . #x2774)	; &JSP-2774; [07-84]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER DZE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0405)	; Ѕ
+    (cyrillic-iso8859-5 . #xA5)	; &I-CYRILLIC-25;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER DZE")
       (=ucs		  . #x0455)	; ѕ
       ))
-    (=ucs		. #x0405)	; Ѕ
-    (cyrillic-iso8859-5 . #xA5)	; &I-CYRILLIC-25;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER DZE")
       (=ucs		  . #x0405)	; Ѕ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2775)	; &JSP-2775; [07-85]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER DZE")
       (=ucs		  . #x0405)	; Ѕ
       ))
     (=jis-x0212		. #x2745)	; &JSP-2745; [07-37]
     (=ucs@jis/fw	. #x0405)	; &JSP-2745;
+    (->lowercase
+     ((=jis-x0212	  . #x2775)	; &JSP-2775; [07-85]
+      ))
     ))
 (define-char
   '((name . "CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0406)	; І
+    (cyrillic-iso8859-5 . #xA6)	; &I-CYRILLIC-26;
     (->lowercase
      ((name . "CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I")
       (=ucs		  . #x0456)	; і
       ))
-    (=ucs		. #x0406)	; І
-    (cyrillic-iso8859-5 . #xA6)	; &I-CYRILLIC-26;
     ))
 (define-char
   '((<-denotational
      ((name . "CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I")
       (=ucs		  . #x0406)	; І
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2776)	; &JSP-2776; [07-86]
-      ))
     (<-fullwidth
      ((name . "CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I")
       (=ucs		  . #x0406)	; І
       ))
     (=jis-x0212		. #x2746)	; &JSP-2746; [07-38]
     (=ucs@jis/fw	. #x0406)	; &JSP-2746;
+    (->lowercase
+     ((=jis-x0212	  . #x2776)	; &JSP-2776; [07-86]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER YI")
@@ -222,10 +222,6 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Ukrainian")
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER YI")
-      (=ucs		  . #x0457)	; ї
-      ))
     (=decomposition
      ((name . "CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I")
       (=ucs		  . #x0406)	; І
@@ -235,15 +231,16 @@
       ))
     (=ucs		. #x0407)	; Ї
     (cyrillic-iso8859-5 . #xA7)	; &I-CYRILLIC-27;
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER YI")
+      (=ucs		  . #x0457)	; ї
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER YI")
       (=ucs		  . #x0407)	; Ї
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2777)	; &JSP-2777; [07-87]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER YI")
       (=ucs		  . #x0407)	; Ї
@@ -256,87 +253,90 @@
       ))
     (=jis-x0212		. #x2747)	; &JSP-2747; [07-39]
     (=ucs@jis/fw	. #x0407)	; &JSP-2747;
+    (->lowercase
+     ((=jis-x0212	  . #x2777)	; &JSP-2777; [07-87]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER JE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0408)	; Ј
+    (cyrillic-iso8859-5 . #xA8)	; &I-CYRILLIC-28;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER JE")
       (=ucs		  . #x0458)	; ј
       ))
-    (=ucs		. #x0408)	; Ј
-    (cyrillic-iso8859-5 . #xA8)	; &I-CYRILLIC-28;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER JE")
       (=ucs		  . #x0408)	; Ј
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2778)	; &JSP-2778; [07-88]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER JE")
       (=ucs		  . #x0408)	; Ј
       ))
     (=jis-x0212		. #x2748)	; &JSP-2748; [07-40]
     (=ucs@jis/fw	. #x0408)	; &JSP-2748;
+    (->lowercase
+     ((=jis-x0212	  . #x2778)	; &JSP-2778; [07-88]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER LJE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0409)	; Љ
+    (cyrillic-iso8859-5 . #xA9)	; &I-CYRILLIC-29;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER LJE")
       (=ucs		  . #x0459)	; љ
       ))
-    (=ucs		. #x0409)	; Љ
-    (cyrillic-iso8859-5 . #xA9)	; &I-CYRILLIC-29;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER LJE")
       (=ucs		  . #x0409)	; Љ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x2779)	; &JSP-2779; [07-89]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER LJE")
       (=ucs		  . #x0409)	; Љ
       ))
     (=jis-x0212		. #x2749)	; &JSP-2749; [07-41]
     (=ucs@jis/fw	. #x0409)	; &JSP-2749;
+    (->lowercase
+     ((=jis-x0212	  . #x2779)	; &JSP-2779; [07-89]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER NJE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x040A)	; Њ
+    (cyrillic-iso8859-5 . #xAA)	; &I-CYRILLIC-2A;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER NJE")
       (=ucs		  . #x045A)	; њ
       ))
-    (=ucs		. #x040A)	; Њ
-    (cyrillic-iso8859-5 . #xAA)	; &I-CYRILLIC-2A;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER NJE")
       (=ucs		  . #x040A)	; Њ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x277A)	; &JSP-277A; [07-90]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER NJE")
       (=ucs		  . #x040A)	; Њ
       ))
     (=jis-x0212		. #x274A)	; &JSP-274A; [07-42]
     (=ucs@jis/fw	. #x040A)	; &JSP-274A;
+    (->lowercase
+     ((=jis-x0212	  . #x277A)	; &JSP-277A; [07-90]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER TSHE")
@@ -344,37 +344,33 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Serbocroatian")
+    (=ucs		. #x040B)	; Ћ
+    (cyrillic-iso8859-5 . #xAB)	; &I-CYRILLIC-2B;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER TSHE")
       (=ucs		  . #x045B)	; ћ
       ))
-    (=ucs		. #x040B)	; Ћ
-    (cyrillic-iso8859-5 . #xAB)	; &I-CYRILLIC-2B;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER TSHE")
       (=ucs		  . #x040B)	; Ћ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x277B)	; &JSP-277B; [07-91]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER TSHE")
       (=ucs		  . #x040B)	; Ћ
       ))
     (=jis-x0212		. #x274B)	; &JSP-274B; [07-43]
     (=ucs@jis/fw	. #x040B)	; &JSP-274B;
+    (->lowercase
+     ((=jis-x0212	  . #x277B)	; &JSP-277B; [07-91]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER KJE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER KJE")
-      (=ucs		  . #x045C)	; ќ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER KA")
       (=ucs		  . #x041A)	; К
@@ -384,31 +380,31 @@
       ))
     (=ucs		. #x040C)	; Ќ
     (cyrillic-iso8859-5 . #xAC)	; &I-CYRILLIC-2C;
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER KJE")
+      (=ucs		  . #x045C)	; ќ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER KJE")
       (=ucs		  . #x040C)	; Ќ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x277C)	; &JSP-277C; [07-92]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER KJE")
       (=ucs		  . #x040C)	; Ќ
       ))
     (=jis-x0212		. #x274C)	; &JSP-274C; [07-44]
     (=ucs@jis/fw	. #x040C)	; &JSP-274C;
+    (->lowercase
+     ((=jis-x0212	  . #x277C)	; &JSP-277C; [07-92]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER I WITH GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER I WITH GRAVE")
-      (=ucs		  . #x045D)	; ѝ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER I")
       (=ucs		  . #x0418)	; И
@@ -417,6 +413,10 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x040D)	; Ѝ
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER I WITH GRAVE")
+      (=ucs		  . #x045D)	; ѝ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER SHORT U")
@@ -424,10 +424,6 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Byelorussian")
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER SHORT U")
-      (=ucs		  . #x045E)	; ў
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER U")
       (=ucs		  . #x0423)	; У
@@ -437,71 +433,70 @@
       ))
     (=ucs		. #x040E)	; Ў
     (cyrillic-iso8859-5 . #xAE)	; &I-CYRILLIC-2E;
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER SHORT U")
+      (=ucs		  . #x045E)	; ў
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER SHORT U")
       (=ucs		  . #x040E)	; Ў
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x277D)	; &JSP-277D; [07-93]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER SHORT U")
       (=ucs		  . #x040E)	; Ў
       ))
     (=jis-x0212		. #x274D)	; &JSP-274D; [07-45]
     (=ucs@jis/fw	. #x040E)	; &JSP-274D;
+    (->lowercase
+     ((=jis-x0212	  . #x277D)	; &JSP-277D; [07-93]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER DZHE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x040F)	; Џ
+    (cyrillic-iso8859-5 . #xAF)	; &I-CYRILLIC-2F;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER DZHE")
       (=ucs		  . #x045F)	; џ
       ))
-    (=ucs		. #x040F)	; Џ
-    (cyrillic-iso8859-5 . #xAF)	; &I-CYRILLIC-2F;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER DZHE")
       (=ucs		  . #x040F)	; Џ
       ))
-    (->lowercase
-     ((=jis-x0212	  . #x277E)	; &JSP-277E; [07-94]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER DZHE")
       (=ucs		  . #x040F)	; Џ
       ))
     (=jis-x0212		. #x274E)	; &JSP-274E; [07-46]
     (=ucs@jis/fw	. #x040F)	; &JSP-274E;
+    (->lowercase
+     ((=jis-x0212	  . #x277E)	; &JSP-277E; [07-94]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER A")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0410)	; А
+    (cyrillic-iso8859-5 . #xB0)	; &I-CYRILLIC-30;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER A")
       (=ucs		  . #x0430)	; а
       ))
-    (=ucs		. #x0410)	; А
-    (cyrillic-iso8859-5 . #xB0)	; &I-CYRILLIC-30;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER A")
       (=ucs		  . #x0410)	; А
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2751)	; &J90-2751; [07-49]
-      (=gb2312		  . #x2751)	; &I-G0-2751; [07-49]
-      (=ks-x1001	  . #x2C51)	; &I-K0-2C51; [12-49]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER A")
       (=ucs		  . #x0410)	; А
@@ -512,29 +507,29 @@
     (=big5-eten		. #xC7F3)	; &B-C7F3;
     (=ucs@gb/fw		. #x0410)	; &J90-2721;
     (=ucs@jis/fw	. #x0410)	; &J90-2721;
+    (->lowercase
+     ((=jis-x0208	  . #x2751)	; &J90-2751; [07-49]
+      (=gb2312		  . #x2751)	; &I-G0-2751; [07-49]
+      (=ks-x1001	  . #x2C51)	; &I-K0-2C51; [12-49]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER BE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0411)	; Б
+    (cyrillic-iso8859-5 . #xB1)	; &I-CYRILLIC-31;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER BE")
       (=ucs		  . #x0431)	; б
       ))
-    (=ucs		. #x0411)	; Б
-    (cyrillic-iso8859-5 . #xB1)	; &I-CYRILLIC-31;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER BE")
       (=ucs		  . #x0411)	; Б
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2752)	; &J90-2752; [07-50]
-      (=gb2312		  . #x2752)	; &I-G0-2752; [07-50]
-      (=ks-x1001	  . #x2C52)	; &I-K0-2C52; [12-50]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER BE")
       (=ucs		  . #x0411)	; Б
@@ -545,29 +540,29 @@
     (=big5-eten		. #xC7F4)	; &B-C7F4;
     (=ucs@gb/fw		. #x0411)	; &J90-2722;
     (=ucs@jis/fw	. #x0411)	; &J90-2722;
+    (->lowercase
+     ((=jis-x0208	  . #x2752)	; &J90-2752; [07-50]
+      (=gb2312		  . #x2752)	; &I-G0-2752; [07-50]
+      (=ks-x1001	  . #x2C52)	; &I-K0-2C52; [12-50]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER VE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0412)	; В
+    (cyrillic-iso8859-5 . #xB2)	; &I-CYRILLIC-32;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER VE")
       (=ucs		  . #x0432)	; в
       ))
-    (=ucs		. #x0412)	; В
-    (cyrillic-iso8859-5 . #xB2)	; &I-CYRILLIC-32;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER VE")
       (=ucs		  . #x0412)	; В
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2753)	; &J90-2753; [07-51]
-      (=gb2312		  . #x2753)	; &I-G0-2753; [07-51]
-      (=ks-x1001	  . #x2C53)	; &I-K0-2C53; [12-51]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER VE")
       (=ucs		  . #x0412)	; В
@@ -578,29 +573,29 @@
     (=big5-eten		. #xC7F5)	; &B-C7F5;
     (=ucs@gb/fw		. #x0412)	; &J90-2723;
     (=ucs@jis/fw	. #x0412)	; &J90-2723;
+    (->lowercase
+     ((=jis-x0208	  . #x2753)	; &J90-2753; [07-51]
+      (=gb2312		  . #x2753)	; &I-G0-2753; [07-51]
+      (=ks-x1001	  . #x2C53)	; &I-K0-2C53; [12-51]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER GHE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0413)	; Г
+    (cyrillic-iso8859-5 . #xB3)	; &I-CYRILLIC-33;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER GHE")
       (=ucs		  . #x0433)	; г
       ))
-    (=ucs		. #x0413)	; Г
-    (cyrillic-iso8859-5 . #xB3)	; &I-CYRILLIC-33;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER GHE")
       (=ucs		  . #x0413)	; Г
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2754)	; &J90-2754; [07-52]
-      (=gb2312		  . #x2754)	; &I-G0-2754; [07-52]
-      (=ks-x1001	  . #x2C54)	; &I-K0-2C54; [12-52]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER GHE")
       (=ucs		  . #x0413)	; Г
@@ -611,29 +606,29 @@
     (=big5-eten		. #xC7F6)	; &B-C7F6;
     (=ucs@gb/fw		. #x0413)	; &J90-2724;
     (=ucs@jis/fw	. #x0413)	; &J90-2724;
+    (->lowercase
+     ((=jis-x0208	  . #x2754)	; &J90-2754; [07-52]
+      (=gb2312		  . #x2754)	; &I-G0-2754; [07-52]
+      (=ks-x1001	  . #x2C54)	; &I-K0-2C54; [12-52]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER DE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0414)	; Д
+    (cyrillic-iso8859-5 . #xB4)	; &I-CYRILLIC-34;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER DE")
       (=ucs		  . #x0434)	; д
       ))
-    (=ucs		. #x0414)	; Д
-    (cyrillic-iso8859-5 . #xB4)	; &I-CYRILLIC-34;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER DE")
       (=ucs		  . #x0414)	; Д
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2755)	; &J90-2755; [07-53]
-      (=gb2312		  . #x2755)	; &I-G0-2755; [07-53]
-      (=ks-x1001	  . #x2C55)	; &I-K0-2C55; [12-53]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER DE")
       (=ucs		  . #x0414)	; Д
@@ -644,29 +639,29 @@
     (=big5-eten		. #xC7F7)	; &B-C7F7;
     (=ucs@gb/fw		. #x0414)	; &J90-2725;
     (=ucs@jis/fw	. #x0414)	; &J90-2725;
+    (->lowercase
+     ((=jis-x0208	  . #x2755)	; &J90-2755; [07-53]
+      (=gb2312		  . #x2755)	; &I-G0-2755; [07-53]
+      (=ks-x1001	  . #x2C55)	; &I-K0-2C55; [12-53]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER IE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0415)	; Е
+    (cyrillic-iso8859-5 . #xB5)	; &I-CYRILLIC-35;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER IE")
       (=ucs		  . #x0435)	; е
       ))
-    (=ucs		. #x0415)	; Е
-    (cyrillic-iso8859-5 . #xB5)	; &I-CYRILLIC-35;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER IE")
       (=ucs		  . #x0415)	; Е
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2756)	; &J90-2756; [07-54]
-      (=gb2312		  . #x2756)	; &I-G0-2756; [07-54]
-      (=ks-x1001	  . #x2C56)	; &I-K0-2C56; [12-54]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER IE")
       (=ucs		  . #x0415)	; Е
@@ -677,29 +672,29 @@
     (=big5-eten		. #xC7F8)	; &B-C7F8;
     (=ucs@gb/fw		. #x0415)	; &J90-2726;
     (=ucs@jis/fw	. #x0415)	; &J90-2726;
+    (->lowercase
+     ((=jis-x0208	  . #x2756)	; &J90-2756; [07-54]
+      (=gb2312		  . #x2756)	; &I-G0-2756; [07-54]
+      (=ks-x1001	  . #x2C56)	; &I-K0-2C56; [12-54]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER ZHE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0416)	; Ж
+    (cyrillic-iso8859-5 . #xB6)	; &I-CYRILLIC-36;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER ZHE")
       (=ucs		  . #x0436)	; ж
       ))
-    (=ucs		. #x0416)	; Ж
-    (cyrillic-iso8859-5 . #xB6)	; &I-CYRILLIC-36;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER ZHE")
       (=ucs		  . #x0416)	; Ж
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2758)	; &J90-2758; [07-56]
-      (=gb2312		  . #x2758)	; &I-G0-2758; [07-56]
-      (=ks-x1001	  . #x2C58)	; &I-K0-2C58; [12-56]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER ZHE")
       (=ucs		  . #x0416)	; Ж
@@ -710,29 +705,29 @@
     (=big5-eten		. #xC7FA)	; &B-C7FA;
     (=ucs@gb/fw		. #x0416)	; &J90-2728;
     (=ucs@jis/fw	. #x0416)	; &J90-2728;
+    (->lowercase
+     ((=jis-x0208	  . #x2758)	; &J90-2758; [07-56]
+      (=gb2312		  . #x2758)	; &I-G0-2758; [07-56]
+      (=ks-x1001	  . #x2C58)	; &I-K0-2C58; [12-56]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER ZE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0417)	; З
+    (cyrillic-iso8859-5 . #xB7)	; &I-CYRILLIC-37;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER ZE")
       (=ucs		  . #x0437)	; з
       ))
-    (=ucs		. #x0417)	; З
-    (cyrillic-iso8859-5 . #xB7)	; &I-CYRILLIC-37;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER ZE")
       (=ucs		  . #x0417)	; З
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2759)	; &J90-2759; [07-57]
-      (=gb2312		  . #x2759)	; &I-G0-2759; [07-57]
-      (=ks-x1001	  . #x2C59)	; &I-K0-2C59; [12-57]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER ZE")
       (=ucs		  . #x0417)	; З
@@ -743,29 +738,29 @@
     (=big5-eten		. #xC7FB)	; &B-C7FB;
     (=ucs@gb/fw		. #x0417)	; &J90-2729;
     (=ucs@jis/fw	. #x0417)	; &J90-2729;
+    (->lowercase
+     ((=jis-x0208	  . #x2759)	; &J90-2759; [07-57]
+      (=gb2312		  . #x2759)	; &I-G0-2759; [07-57]
+      (=ks-x1001	  . #x2C59)	; &I-K0-2C59; [12-57]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER I")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0418)	; И
+    (cyrillic-iso8859-5 . #xB8)	; &I-CYRILLIC-38;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER I")
       (=ucs		  . #x0438)	; и
       ))
-    (=ucs		. #x0418)	; И
-    (cyrillic-iso8859-5 . #xB8)	; &I-CYRILLIC-38;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER I")
       (=ucs		  . #x0418)	; И
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x275A)	; &J90-275A; [07-58]
-      (=gb2312		  . #x275A)	; &I-G0-275A; [07-58]
-      (=ks-x1001	  . #x2C5A)	; &I-K0-2C5A; [12-58]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER I")
       (=ucs		  . #x0418)	; И
@@ -776,16 +771,17 @@
     (=big5-eten		. #xC7FC)	; &B-C7FC;
     (=ucs@gb/fw		. #x0418)	; &J90-272A;
     (=ucs@jis/fw	. #x0418)	; &J90-272A;
+    (->lowercase
+     ((=jis-x0208	  . #x275A)	; &J90-275A; [07-58]
+      (=gb2312		  . #x275A)	; &I-G0-275A; [07-58]
+      (=ks-x1001	  . #x2C5A)	; &I-K0-2C5A; [12-58]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER SHORT I")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER SHORT I")
-      (=ucs		  . #x0439)	; й
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER I")
       (=ucs		  . #x0418)	; И
@@ -795,17 +791,16 @@
       ))
     (=ucs		. #x0419)	; Й
     (cyrillic-iso8859-5 . #xB9)	; &I-CYRILLIC-39;
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER SHORT I")
+      (=ucs		  . #x0439)	; й
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER SHORT I")
       (=ucs		  . #x0419)	; Й
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x275B)	; &J90-275B; [07-59]
-      (=gb2312		  . #x275B)	; &I-G0-275B; [07-59]
-      (=ks-x1001	  . #x2C5B)	; &I-K0-2C5B; [12-59]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER SHORT I")
       (=ucs		  . #x0419)	; Й
@@ -816,29 +811,29 @@
     (=big5-eten		. #xC7FD)	; &B-C7FD;
     (=ucs@gb/fw		. #x0419)	; &J90-272B;
     (=ucs@jis/fw	. #x0419)	; &J90-272B;
+    (->lowercase
+     ((=jis-x0208	  . #x275B)	; &J90-275B; [07-59]
+      (=gb2312		  . #x275B)	; &I-G0-275B; [07-59]
+      (=ks-x1001	  . #x2C5B)	; &I-K0-2C5B; [12-59]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER KA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x041A)	; К
+    (cyrillic-iso8859-5 . #xBA)	; &I-CYRILLIC-3A;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER KA")
       (=ucs		  . #x043A)	; к
       ))
-    (=ucs		. #x041A)	; К
-    (cyrillic-iso8859-5 . #xBA)	; &I-CYRILLIC-3A;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER KA")
       (=ucs		  . #x041A)	; К
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x275C)	; &J90-275C; [07-60]
-      (=gb2312		  . #x275C)	; &I-G0-275C; [07-60]
-      (=ks-x1001	  . #x2C5C)	; &I-K0-2C5C; [12-60]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER KA")
       (=ucs		  . #x041A)	; К
@@ -849,29 +844,29 @@
     (=big5-eten		. #xC7FE)	; &B-C7FE;
     (=ucs@gb/fw		. #x041A)	; &J90-272C;
     (=ucs@jis/fw	. #x041A)	; &J90-272C;
+    (->lowercase
+     ((=jis-x0208	  . #x275C)	; &J90-275C; [07-60]
+      (=gb2312		  . #x275C)	; &I-G0-275C; [07-60]
+      (=ks-x1001	  . #x2C5C)	; &I-K0-2C5C; [12-60]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER EL")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x041B)	; Л
+    (cyrillic-iso8859-5 . #xBB)	; &I-CYRILLIC-3B;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER EL")
       (=ucs		  . #x043B)	; л
       ))
-    (=ucs		. #x041B)	; Л
-    (cyrillic-iso8859-5 . #xBB)	; &I-CYRILLIC-3B;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER EL")
       (=ucs		  . #x041B)	; Л
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x275D)	; &J90-275D; [07-61]
-      (=gb2312		  . #x275D)	; &I-G0-275D; [07-61]
-      (=ks-x1001	  . #x2C5D)	; &I-K0-2C5D; [12-61]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER EL")
       (=ucs		  . #x041B)	; Л
@@ -882,29 +877,29 @@
     (=big5-eten		. #xC840)	; &B-C840;
     (=ucs@gb/fw		. #x041B)	; &J90-272D;
     (=ucs@jis/fw	. #x041B)	; &J90-272D;
+    (->lowercase
+     ((=jis-x0208	  . #x275D)	; &J90-275D; [07-61]
+      (=gb2312		  . #x275D)	; &I-G0-275D; [07-61]
+      (=ks-x1001	  . #x2C5D)	; &I-K0-2C5D; [12-61]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER EM")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x041C)	; М
+    (cyrillic-iso8859-5 . #xBC)	; &I-CYRILLIC-3C;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER EM")
       (=ucs		  . #x043C)	; м
       ))
-    (=ucs		. #x041C)	; М
-    (cyrillic-iso8859-5 . #xBC)	; &I-CYRILLIC-3C;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER EM")
       (=ucs		  . #x041C)	; М
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x275E)	; &J90-275E; [07-62]
-      (=gb2312		  . #x275E)	; &I-G0-275E; [07-62]
-      (=ks-x1001	  . #x2C5E)	; &I-K0-2C5E; [12-62]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER EM")
       (=ucs		  . #x041C)	; М
@@ -915,29 +910,29 @@
     (=big5-eten		. #xC841)	; &B-C841;
     (=ucs@gb/fw		. #x041C)	; &J90-272E;
     (=ucs@jis/fw	. #x041C)	; &J90-272E;
+    (->lowercase
+     ((=jis-x0208	  . #x275E)	; &J90-275E; [07-62]
+      (=gb2312		  . #x275E)	; &I-G0-275E; [07-62]
+      (=ks-x1001	  . #x2C5E)	; &I-K0-2C5E; [12-62]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER EN")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x041D)	; Н
+    (cyrillic-iso8859-5 . #xBD)	; &I-CYRILLIC-3D;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER EN")
       (=ucs		  . #x043D)	; н
       ))
-    (=ucs		. #x041D)	; Н
-    (cyrillic-iso8859-5 . #xBD)	; &I-CYRILLIC-3D;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER EN")
       (=ucs		  . #x041D)	; Н
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x275F)	; &J90-275F; [07-63]
-      (=gb2312		  . #x275F)	; &I-G0-275F; [07-63]
-      (=ks-x1001	  . #x2C5F)	; &I-K0-2C5F; [12-63]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER EN")
       (=ucs		  . #x041D)	; Н
@@ -948,29 +943,29 @@
     (=big5-eten		. #xC842)	; &B-C842;
     (=ucs@gb/fw		. #x041D)	; &J90-272F;
     (=ucs@jis/fw	. #x041D)	; &J90-272F;
+    (->lowercase
+     ((=jis-x0208	  . #x275F)	; &J90-275F; [07-63]
+      (=gb2312		  . #x275F)	; &I-G0-275F; [07-63]
+      (=ks-x1001	  . #x2C5F)	; &I-K0-2C5F; [12-63]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER O")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x041E)	; О
+    (cyrillic-iso8859-5 . #xBE)	; &I-CYRILLIC-3E;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER O")
       (=ucs		  . #x043E)	; о
       ))
-    (=ucs		. #x041E)	; О
-    (cyrillic-iso8859-5 . #xBE)	; &I-CYRILLIC-3E;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER O")
       (=ucs		  . #x041E)	; О
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2760)	; &J90-2760; [07-64]
-      (=gb2312		  . #x2760)	; &I-G0-2760; [07-64]
-      (=ks-x1001	  . #x2C60)	; &I-K0-2C60; [12-64]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER O")
       (=ucs		  . #x041E)	; О
@@ -981,29 +976,29 @@
     (=big5-eten		. #xC843)	; &B-C843;
     (=ucs@gb/fw		. #x041E)	; &J90-2730;
     (=ucs@jis/fw	. #x041E)	; &J90-2730;
+    (->lowercase
+     ((=jis-x0208	  . #x2760)	; &J90-2760; [07-64]
+      (=gb2312		  . #x2760)	; &I-G0-2760; [07-64]
+      (=ks-x1001	  . #x2C60)	; &I-K0-2C60; [12-64]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER PE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x041F)	; П
+    (cyrillic-iso8859-5 . #xBF)	; &I-CYRILLIC-3F;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER PE")
       (=ucs		  . #x043F)	; п
       ))
-    (=ucs		. #x041F)	; П
-    (cyrillic-iso8859-5 . #xBF)	; &I-CYRILLIC-3F;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER PE")
       (=ucs		  . #x041F)	; П
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2761)	; &J90-2761; [07-65]
-      (=gb2312		  . #x2761)	; &I-G0-2761; [07-65]
-      (=ks-x1001	  . #x2C61)	; &I-K0-2C61; [12-65]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER PE")
       (=ucs		  . #x041F)	; П
@@ -1014,29 +1009,29 @@
     (=big5-eten		. #xC844)	; &B-C844;
     (=ucs@gb/fw		. #x041F)	; &J90-2731;
     (=ucs@jis/fw	. #x041F)	; &J90-2731;
+    (->lowercase
+     ((=jis-x0208	  . #x2761)	; &J90-2761; [07-65]
+      (=gb2312		  . #x2761)	; &I-G0-2761; [07-65]
+      (=ks-x1001	  . #x2C61)	; &I-K0-2C61; [12-65]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER ER")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0420)	; Р
+    (cyrillic-iso8859-5 . #xC0)	; &I-CYRILLIC-40;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER ER")
       (=ucs		  . #x0440)	; р
       ))
-    (=ucs		. #x0420)	; Р
-    (cyrillic-iso8859-5 . #xC0)	; &I-CYRILLIC-40;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER ER")
       (=ucs		  . #x0420)	; Р
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2762)	; &J90-2762; [07-66]
-      (=gb2312		  . #x2762)	; &I-G0-2762; [07-66]
-      (=ks-x1001	  . #x2C62)	; &I-K0-2C62; [12-66]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER ER")
       (=ucs		  . #x0420)	; Р
@@ -1047,29 +1042,29 @@
     (=big5-eten		. #xC845)	; &B-C845;
     (=ucs@gb/fw		. #x0420)	; &J90-2732;
     (=ucs@jis/fw	. #x0420)	; &J90-2732;
+    (->lowercase
+     ((=jis-x0208	  . #x2762)	; &J90-2762; [07-66]
+      (=gb2312		  . #x2762)	; &I-G0-2762; [07-66]
+      (=ks-x1001	  . #x2C62)	; &I-K0-2C62; [12-66]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER ES")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0421)	; С
+    (cyrillic-iso8859-5 . #xC1)	; &I-CYRILLIC-41;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER ES")
       (=ucs		  . #x0441)	; с
       ))
-    (=ucs		. #x0421)	; С
-    (cyrillic-iso8859-5 . #xC1)	; &I-CYRILLIC-41;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER ES")
       (=ucs		  . #x0421)	; С
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2763)	; &J90-2763; [07-67]
-      (=gb2312		  . #x2763)	; &I-G0-2763; [07-67]
-      (=ks-x1001	  . #x2C63)	; &I-K0-2C63; [12-67]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER ES")
       (=ucs		  . #x0421)	; С
@@ -1080,29 +1075,29 @@
     (=big5-eten		. #xC846)	; &B-C846;
     (=ucs@gb/fw		. #x0421)	; &J90-2733;
     (=ucs@jis/fw	. #x0421)	; &J90-2733;
+    (->lowercase
+     ((=jis-x0208	  . #x2763)	; &J90-2763; [07-67]
+      (=gb2312		  . #x2763)	; &I-G0-2763; [07-67]
+      (=ks-x1001	  . #x2C63)	; &I-K0-2C63; [12-67]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER TE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0422)	; Т
+    (cyrillic-iso8859-5 . #xC2)	; &I-CYRILLIC-42;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER TE")
       (=ucs		  . #x0442)	; т
       ))
-    (=ucs		. #x0422)	; Т
-    (cyrillic-iso8859-5 . #xC2)	; &I-CYRILLIC-42;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER TE")
       (=ucs		  . #x0422)	; Т
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2764)	; &J90-2764; [07-68]
-      (=gb2312		  . #x2764)	; &I-G0-2764; [07-68]
-      (=ks-x1001	  . #x2C64)	; &I-K0-2C64; [12-68]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER TE")
       (=ucs		  . #x0422)	; Т
@@ -1113,29 +1108,29 @@
     (=big5-eten		. #xC847)	; &B-C847;
     (=ucs@gb/fw		. #x0422)	; &J90-2734;
     (=ucs@jis/fw	. #x0422)	; &J90-2734;
+    (->lowercase
+     ((=jis-x0208	  . #x2764)	; &J90-2764; [07-68]
+      (=gb2312		  . #x2764)	; &I-G0-2764; [07-68]
+      (=ks-x1001	  . #x2C64)	; &I-K0-2C64; [12-68]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER U")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0423)	; У
+    (cyrillic-iso8859-5 . #xC3)	; &I-CYRILLIC-43;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER U")
       (=ucs		  . #x0443)	; у
       ))
-    (=ucs		. #x0423)	; У
-    (cyrillic-iso8859-5 . #xC3)	; &I-CYRILLIC-43;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER U")
       (=ucs		  . #x0423)	; У
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2765)	; &J90-2765; [07-69]
-      (=gb2312		  . #x2765)	; &I-G0-2765; [07-69]
-      (=ks-x1001	  . #x2C65)	; &I-K0-2C65; [12-69]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER U")
       (=ucs		  . #x0423)	; У
@@ -1146,29 +1141,29 @@
     (=big5-eten		. #xC848)	; &B-C848;
     (=ucs@gb/fw		. #x0423)	; &J90-2735;
     (=ucs@jis/fw	. #x0423)	; &J90-2735;
+    (->lowercase
+     ((=jis-x0208	  . #x2765)	; &J90-2765; [07-69]
+      (=gb2312		  . #x2765)	; &I-G0-2765; [07-69]
+      (=ks-x1001	  . #x2C65)	; &I-K0-2C65; [12-69]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER EF")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0424)	; Ф
+    (cyrillic-iso8859-5 . #xC4)	; &I-CYRILLIC-44;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER EF")
       (=ucs		  . #x0444)	; ф
       ))
-    (=ucs		. #x0424)	; Ф
-    (cyrillic-iso8859-5 . #xC4)	; &I-CYRILLIC-44;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER EF")
       (=ucs		  . #x0424)	; Ф
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2766)	; &J90-2766; [07-70]
-      (=gb2312		  . #x2766)	; &I-G0-2766; [07-70]
-      (=ks-x1001	  . #x2C66)	; &I-K0-2C66; [12-70]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER EF")
       (=ucs		  . #x0424)	; Ф
@@ -1179,29 +1174,29 @@
     (=big5-eten		. #xC849)	; &B-C849;
     (=ucs@gb/fw		. #x0424)	; &J90-2736;
     (=ucs@jis/fw	. #x0424)	; &J90-2736;
+    (->lowercase
+     ((=jis-x0208	  . #x2766)	; &J90-2766; [07-70]
+      (=gb2312		  . #x2766)	; &I-G0-2766; [07-70]
+      (=ks-x1001	  . #x2C66)	; &I-K0-2C66; [12-70]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER HA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0425)	; Х
+    (cyrillic-iso8859-5 . #xC5)	; &I-CYRILLIC-45;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER HA")
       (=ucs		  . #x0445)	; х
       ))
-    (=ucs		. #x0425)	; Х
-    (cyrillic-iso8859-5 . #xC5)	; &I-CYRILLIC-45;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER HA")
       (=ucs		  . #x0425)	; Х
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2767)	; &J90-2767; [07-71]
-      (=gb2312		  . #x2767)	; &I-G0-2767; [07-71]
-      (=ks-x1001	  . #x2C67)	; &I-K0-2C67; [12-71]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER HA")
       (=ucs		  . #x0425)	; Х
@@ -1212,29 +1207,29 @@
     (=big5-eten		. #xC84A)	; &B-C84A;
     (=ucs@gb/fw		. #x0425)	; &J90-2737;
     (=ucs@jis/fw	. #x0425)	; &J90-2737;
+    (->lowercase
+     ((=jis-x0208	  . #x2767)	; &J90-2767; [07-71]
+      (=gb2312		  . #x2767)	; &I-G0-2767; [07-71]
+      (=ks-x1001	  . #x2C67)	; &I-K0-2C67; [12-71]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER TSE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0426)	; Ц
+    (cyrillic-iso8859-5 . #xC6)	; &I-CYRILLIC-46;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER TSE")
       (=ucs		  . #x0446)	; ц
       ))
-    (=ucs		. #x0426)	; Ц
-    (cyrillic-iso8859-5 . #xC6)	; &I-CYRILLIC-46;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER TSE")
       (=ucs		  . #x0426)	; Ц
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2768)	; &J90-2768; [07-72]
-      (=gb2312		  . #x2768)	; &I-G0-2768; [07-72]
-      (=ks-x1001	  . #x2C68)	; &I-K0-2C68; [12-72]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER TSE")
       (=ucs		  . #x0426)	; Ц
@@ -1245,29 +1240,29 @@
     (=big5-eten		. #xC84B)	; &B-C84B;
     (=ucs@gb/fw		. #x0426)	; &J90-2738;
     (=ucs@jis/fw	. #x0426)	; &J90-2738;
+    (->lowercase
+     ((=jis-x0208	  . #x2768)	; &J90-2768; [07-72]
+      (=gb2312		  . #x2768)	; &I-G0-2768; [07-72]
+      (=ks-x1001	  . #x2C68)	; &I-K0-2C68; [12-72]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER CHE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0427)	; Ч
+    (cyrillic-iso8859-5 . #xC7)	; &I-CYRILLIC-47;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER CHE")
       (=ucs		  . #x0447)	; ч
       ))
-    (=ucs		. #x0427)	; Ч
-    (cyrillic-iso8859-5 . #xC7)	; &I-CYRILLIC-47;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER CHE")
       (=ucs		  . #x0427)	; Ч
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2769)	; &J90-2769; [07-73]
-      (=gb2312		  . #x2769)	; &I-G0-2769; [07-73]
-      (=ks-x1001	  . #x2C69)	; &I-K0-2C69; [12-73]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER CHE")
       (=ucs		  . #x0427)	; Ч
@@ -1278,29 +1273,29 @@
     (=big5-eten		. #xC84C)	; &B-C84C;
     (=ucs@gb/fw		. #x0427)	; &J90-2739;
     (=ucs@jis/fw	. #x0427)	; &J90-2739;
+    (->lowercase
+     ((=jis-x0208	  . #x2769)	; &J90-2769; [07-73]
+      (=gb2312		  . #x2769)	; &I-G0-2769; [07-73]
+      (=ks-x1001	  . #x2C69)	; &I-K0-2C69; [12-73]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER SHA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0428)	; Ш
+    (cyrillic-iso8859-5 . #xC8)	; &I-CYRILLIC-48;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER SHA")
       (=ucs		  . #x0448)	; ш
       ))
-    (=ucs		. #x0428)	; Ш
-    (cyrillic-iso8859-5 . #xC8)	; &I-CYRILLIC-48;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER SHA")
       (=ucs		  . #x0428)	; Ш
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x276A)	; &J90-276A; [07-74]
-      (=gb2312		  . #x276A)	; &I-G0-276A; [07-74]
-      (=ks-x1001	  . #x2C6A)	; &I-K0-2C6A; [12-74]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER SHA")
       (=ucs		  . #x0428)	; Ш
@@ -1311,29 +1306,29 @@
     (=big5-eten		. #xC84D)	; &B-C84D;
     (=ucs@gb/fw		. #x0428)	; &J90-273A;
     (=ucs@jis/fw	. #x0428)	; &J90-273A;
+    (->lowercase
+     ((=jis-x0208	  . #x276A)	; &J90-276A; [07-74]
+      (=gb2312		  . #x276A)	; &I-G0-276A; [07-74]
+      (=ks-x1001	  . #x2C6A)	; &I-K0-2C6A; [12-74]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER SHCHA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0429)	; Щ
+    (cyrillic-iso8859-5 . #xC9)	; &I-CYRILLIC-49;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER SHCHA")
       (=ucs		  . #x0449)	; щ
       ))
-    (=ucs		. #x0429)	; Щ
-    (cyrillic-iso8859-5 . #xC9)	; &I-CYRILLIC-49;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER SHCHA")
       (=ucs		  . #x0429)	; Щ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x276B)	; &J90-276B; [07-75]
-      (=gb2312		  . #x276B)	; &I-G0-276B; [07-75]
-      (=ks-x1001	  . #x2C6B)	; &I-K0-2C6B; [12-75]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER SHCHA")
       (=ucs		  . #x0429)	; Щ
@@ -1344,29 +1339,29 @@
     (=big5-eten		. #xC84E)	; &B-C84E;
     (=ucs@gb/fw		. #x0429)	; &J90-273B;
     (=ucs@jis/fw	. #x0429)	; &J90-273B;
+    (->lowercase
+     ((=jis-x0208	  . #x276B)	; &J90-276B; [07-75]
+      (=gb2312		  . #x276B)	; &I-G0-276B; [07-75]
+      (=ks-x1001	  . #x2C6B)	; &I-K0-2C6B; [12-75]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER HARD SIGN")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x042A)	; Ъ
+    (cyrillic-iso8859-5 . #xCA)	; &I-CYRILLIC-4A;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER HARD SIGN")
       (=ucs		  . #x044A)	; ъ
       ))
-    (=ucs		. #x042A)	; Ъ
-    (cyrillic-iso8859-5 . #xCA)	; &I-CYRILLIC-4A;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER HARD SIGN")
       (=ucs		  . #x042A)	; Ъ
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x276C)	; &J90-276C; [07-76]
-      (=gb2312		  . #x276C)	; &I-G0-276C; [07-76]
-      (=ks-x1001	  . #x2C6C)	; &I-K0-2C6C; [12-76]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER HARD SIGN")
       (=ucs		  . #x042A)	; Ъ
@@ -1377,29 +1372,29 @@
     (=big5-eten		. #xC84F)	; &B-C84F;
     (=ucs@gb/fw		. #x042A)	; &J90-273C;
     (=ucs@jis/fw	. #x042A)	; &J90-273C;
+    (->lowercase
+     ((=jis-x0208	  . #x276C)	; &J90-276C; [07-76]
+      (=gb2312		  . #x276C)	; &I-G0-276C; [07-76]
+      (=ks-x1001	  . #x2C6C)	; &I-K0-2C6C; [12-76]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER YERU")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x042B)	; Ы
+    (cyrillic-iso8859-5 . #xCB)	; &I-CYRILLIC-4B;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER YERU")
       (=ucs		  . #x044B)	; ы
       ))
-    (=ucs		. #x042B)	; Ы
-    (cyrillic-iso8859-5 . #xCB)	; &I-CYRILLIC-4B;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER YERU")
       (=ucs		  . #x042B)	; Ы
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x276D)	; &J90-276D; [07-77]
-      (=gb2312		  . #x276D)	; &I-G0-276D; [07-77]
-      (=ks-x1001	  . #x2C6D)	; &I-K0-2C6D; [12-77]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER YERU")
       (=ucs		  . #x042B)	; Ы
@@ -1410,29 +1405,29 @@
     (=big5-eten		. #xC850)	; &B-C850;
     (=ucs@gb/fw		. #x042B)	; &J90-273D;
     (=ucs@jis/fw	. #x042B)	; &J90-273D;
+    (->lowercase
+     ((=jis-x0208	  . #x276D)	; &J90-276D; [07-77]
+      (=gb2312		  . #x276D)	; &I-G0-276D; [07-77]
+      (=ks-x1001	  . #x2C6D)	; &I-K0-2C6D; [12-77]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER SOFT SIGN")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x042C)	; Ь
+    (cyrillic-iso8859-5 . #xCC)	; &I-CYRILLIC-4C;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER SOFT SIGN")
       (=ucs		  . #x044C)	; ь
       ))
-    (=ucs		. #x042C)	; Ь
-    (cyrillic-iso8859-5 . #xCC)	; &I-CYRILLIC-4C;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER SOFT SIGN")
       (=ucs		  . #x042C)	; Ь
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x276E)	; &J90-276E; [07-78]
-      (=gb2312		  . #x276E)	; &I-G0-276E; [07-78]
-      (=ks-x1001	  . #x2C6E)	; &I-K0-2C6E; [12-78]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER SOFT SIGN")
       (=ucs		  . #x042C)	; Ь
@@ -1443,29 +1438,29 @@
     (=big5-eten		. #xC851)	; &B-C851;
     (=ucs@gb/fw		. #x042C)	; &J90-273E;
     (=ucs@jis/fw	. #x042C)	; &J90-273E;
+    (->lowercase
+     ((=jis-x0208	  . #x276E)	; &J90-276E; [07-78]
+      (=gb2312		  . #x276E)	; &I-G0-276E; [07-78]
+      (=ks-x1001	  . #x2C6E)	; &I-K0-2C6E; [12-78]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER E")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x042D)	; Э
+    (cyrillic-iso8859-5 . #xCD)	; &I-CYRILLIC-4D;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER E")
       (=ucs		  . #x044D)	; э
       ))
-    (=ucs		. #x042D)	; Э
-    (cyrillic-iso8859-5 . #xCD)	; &I-CYRILLIC-4D;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER E")
       (=ucs		  . #x042D)	; Э
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x276F)	; &J90-276F; [07-79]
-      (=gb2312		  . #x276F)	; &I-G0-276F; [07-79]
-      (=ks-x1001	  . #x2C6F)	; &I-K0-2C6F; [12-79]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER E")
       (=ucs		  . #x042D)	; Э
@@ -1476,29 +1471,29 @@
     (=big5-eten		. #xC852)	; &B-C852;
     (=ucs@gb/fw		. #x042D)	; &J90-273F;
     (=ucs@jis/fw	. #x042D)	; &J90-273F;
+    (->lowercase
+     ((=jis-x0208	  . #x276F)	; &J90-276F; [07-79]
+      (=gb2312		  . #x276F)	; &I-G0-276F; [07-79]
+      (=ks-x1001	  . #x2C6F)	; &I-K0-2C6F; [12-79]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER YU")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x042E)	; Ю
+    (cyrillic-iso8859-5 . #xCE)	; &I-CYRILLIC-4E;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER YU")
       (=ucs		  . #x044E)	; ю
       ))
-    (=ucs		. #x042E)	; Ю
-    (cyrillic-iso8859-5 . #xCE)	; &I-CYRILLIC-4E;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER YU")
       (=ucs		  . #x042E)	; Ю
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2770)	; &J90-2770; [07-80]
-      (=gb2312		  . #x2770)	; &I-G0-2770; [07-80]
-      (=ks-x1001	  . #x2C70)	; &I-K0-2C70; [12-80]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER YU")
       (=ucs		  . #x042E)	; Ю
@@ -1509,29 +1504,29 @@
     (=big5-eten		. #xC853)	; &B-C853;
     (=ucs@gb/fw		. #x042E)	; &J90-2740;
     (=ucs@jis/fw	. #x042E)	; &J90-2740;
+    (->lowercase
+     ((=jis-x0208	  . #x2770)	; &J90-2770; [07-80]
+      (=gb2312		  . #x2770)	; &I-G0-2770; [07-80]
+      (=ks-x1001	  . #x2C70)	; &I-K0-2C70; [12-80]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER YA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x042F)	; Я
+    (cyrillic-iso8859-5 . #xCF)	; &I-CYRILLIC-4F;
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER YA")
       (=ucs		  . #x044F)	; я
       ))
-    (=ucs		. #x042F)	; Я
-    (cyrillic-iso8859-5 . #xCF)	; &I-CYRILLIC-4F;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC CAPITAL LETTER YA")
       (=ucs		  . #x042F)	; Я
       ))
-    (->lowercase
-     ((=jis-x0208	  . #x2771)	; &J90-2771; [07-81]
-      (=gb2312		  . #x2771)	; &I-G0-2771; [07-81]
-      (=ks-x1001	  . #x2C71)	; &I-K0-2C71; [12-81]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC CAPITAL LETTER YA")
       (=ucs		  . #x042F)	; Я
@@ -1542,29 +1537,29 @@
     (=big5-eten		. #xC854)	; &B-C854;
     (=ucs@gb/fw		. #x042F)	; &J90-2741;
     (=ucs@jis/fw	. #x042F)	; &J90-2741;
+    (->lowercase
+     ((=jis-x0208	  . #x2771)	; &J90-2771; [07-81]
+      (=gb2312		  . #x2771)	; &I-G0-2771; [07-81]
+      (=ks-x1001	  . #x2C71)	; &I-K0-2C71; [12-81]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER A")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0430)	; а
+    (cyrillic-iso8859-5 . #xD0)	; &I-CYRILLIC-50;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER A")
       (=ucs		  . #x0410)	; А
       ))
-    (=ucs		. #x0430)	; а
-    (cyrillic-iso8859-5 . #xD0)	; &I-CYRILLIC-50;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER A")
       (=ucs		  . #x0430)	; а
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2721)	; &J90-2721; [07-01]
-      (=gb2312		  . #x2721)	; &I-G0-2721; [07-01]
-      (=ks-x1001	  . #x2C21)	; &I-K0-2C21; [12-01]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER A")
       (=ucs		  . #x0430)	; а
@@ -1575,29 +1570,29 @@
     (=big5-eten		. #xC855)	; &B-C855;
     (=ucs@gb/fw		. #x0430)	; &J90-2751;
     (=ucs@jis/fw	. #x0430)	; &J90-2751;
+    (->uppercase
+     ((=jis-x0208	  . #x2721)	; &J90-2721; [07-01]
+      (=gb2312		  . #x2721)	; &I-G0-2721; [07-01]
+      (=ks-x1001	  . #x2C21)	; &I-K0-2C21; [12-01]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER BE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0431)	; б
+    (cyrillic-iso8859-5 . #xD1)	; &I-CYRILLIC-51;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER BE")
       (=ucs		  . #x0411)	; Б
       ))
-    (=ucs		. #x0431)	; б
-    (cyrillic-iso8859-5 . #xD1)	; &I-CYRILLIC-51;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER BE")
       (=ucs		  . #x0431)	; б
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2722)	; &J90-2722; [07-02]
-      (=gb2312		  . #x2722)	; &I-G0-2722; [07-02]
-      (=ks-x1001	  . #x2C22)	; &I-K0-2C22; [12-02]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER BE")
       (=ucs		  . #x0431)	; б
@@ -1608,29 +1603,29 @@
     (=big5-eten		. #xC856)	; &B-C856;
     (=ucs@gb/fw		. #x0431)	; &J90-2752;
     (=ucs@jis/fw	. #x0431)	; &J90-2752;
+    (->uppercase
+     ((=jis-x0208	  . #x2722)	; &J90-2722; [07-02]
+      (=gb2312		  . #x2722)	; &I-G0-2722; [07-02]
+      (=ks-x1001	  . #x2C22)	; &I-K0-2C22; [12-02]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER VE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0432)	; в
+    (cyrillic-iso8859-5 . #xD2)	; &I-CYRILLIC-52;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER VE")
       (=ucs		  . #x0412)	; В
       ))
-    (=ucs		. #x0432)	; в
-    (cyrillic-iso8859-5 . #xD2)	; &I-CYRILLIC-52;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER VE")
       (=ucs		  . #x0432)	; в
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2723)	; &J90-2723; [07-03]
-      (=gb2312		  . #x2723)	; &I-G0-2723; [07-03]
-      (=ks-x1001	  . #x2C23)	; &I-K0-2C23; [12-03]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER VE")
       (=ucs		  . #x0432)	; в
@@ -1641,29 +1636,29 @@
     (=big5-eten		. #xC857)	; &B-C857;
     (=ucs@gb/fw		. #x0432)	; &J90-2753;
     (=ucs@jis/fw	. #x0432)	; &J90-2753;
+    (->uppercase
+     ((=jis-x0208	  . #x2723)	; &J90-2723; [07-03]
+      (=gb2312		  . #x2723)	; &I-G0-2723; [07-03]
+      (=ks-x1001	  . #x2C23)	; &I-K0-2C23; [12-03]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER GHE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0433)	; г
+    (cyrillic-iso8859-5 . #xD3)	; &I-CYRILLIC-53;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER GHE")
       (=ucs		  . #x0413)	; Г
       ))
-    (=ucs		. #x0433)	; г
-    (cyrillic-iso8859-5 . #xD3)	; &I-CYRILLIC-53;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER GHE")
       (=ucs		  . #x0433)	; г
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2724)	; &J90-2724; [07-04]
-      (=gb2312		  . #x2724)	; &I-G0-2724; [07-04]
-      (=ks-x1001	  . #x2C24)	; &I-K0-2C24; [12-04]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER GHE")
       (=ucs		  . #x0433)	; г
@@ -1674,29 +1669,29 @@
     (=big5-eten		. #xC858)	; &B-C858;
     (=ucs@gb/fw		. #x0433)	; &J90-2754;
     (=ucs@jis/fw	. #x0433)	; &J90-2754;
+    (->uppercase
+     ((=jis-x0208	  . #x2724)	; &J90-2724; [07-04]
+      (=gb2312		  . #x2724)	; &I-G0-2724; [07-04]
+      (=ks-x1001	  . #x2C24)	; &I-K0-2C24; [12-04]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER DE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0434)	; д
+    (cyrillic-iso8859-5 . #xD4)	; &I-CYRILLIC-54;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER DE")
       (=ucs		  . #x0414)	; Д
       ))
-    (=ucs		. #x0434)	; д
-    (cyrillic-iso8859-5 . #xD4)	; &I-CYRILLIC-54;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER DE")
       (=ucs		  . #x0434)	; д
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2725)	; &J90-2725; [07-05]
-      (=gb2312		  . #x2725)	; &I-G0-2725; [07-05]
-      (=ks-x1001	  . #x2C25)	; &I-K0-2C25; [12-05]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER DE")
       (=ucs		  . #x0434)	; д
@@ -1707,29 +1702,29 @@
     (=big5-eten		. #xC859)	; &B-C859;
     (=ucs@gb/fw		. #x0434)	; &J90-2755;
     (=ucs@jis/fw	. #x0434)	; &J90-2755;
+    (->uppercase
+     ((=jis-x0208	  . #x2725)	; &J90-2725; [07-05]
+      (=gb2312		  . #x2725)	; &I-G0-2725; [07-05]
+      (=ks-x1001	  . #x2C25)	; &I-K0-2C25; [12-05]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER IE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0435)	; е
+    (cyrillic-iso8859-5 . #xD5)	; &I-CYRILLIC-55;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER IE")
       (=ucs		  . #x0415)	; Е
       ))
-    (=ucs		. #x0435)	; е
-    (cyrillic-iso8859-5 . #xD5)	; &I-CYRILLIC-55;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER IE")
       (=ucs		  . #x0435)	; е
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2726)	; &J90-2726; [07-06]
-      (=gb2312		  . #x2726)	; &I-G0-2726; [07-06]
-      (=ks-x1001	  . #x2C26)	; &I-K0-2C26; [12-06]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER IE")
       (=ucs		  . #x0435)	; е
@@ -1740,29 +1735,29 @@
     (=big5-eten		. #xC85A)	; &B-C85A;
     (=ucs@gb/fw		. #x0435)	; &J90-2756;
     (=ucs@jis/fw	. #x0435)	; &J90-2756;
+    (->uppercase
+     ((=jis-x0208	  . #x2726)	; &J90-2726; [07-06]
+      (=gb2312		  . #x2726)	; &I-G0-2726; [07-06]
+      (=ks-x1001	  . #x2C26)	; &I-K0-2C26; [12-06]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER ZHE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0436)	; ж
+    (cyrillic-iso8859-5 . #xD6)	; &I-CYRILLIC-56;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER ZHE")
       (=ucs		  . #x0416)	; Ж
       ))
-    (=ucs		. #x0436)	; ж
-    (cyrillic-iso8859-5 . #xD6)	; &I-CYRILLIC-56;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER ZHE")
       (=ucs		  . #x0436)	; ж
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2728)	; &J90-2728; [07-08]
-      (=gb2312		  . #x2728)	; &I-G0-2728; [07-08]
-      (=ks-x1001	  . #x2C28)	; &I-K0-2C28; [12-08]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER ZHE")
       (=ucs		  . #x0436)	; ж
@@ -1773,29 +1768,29 @@
     (=big5-eten		. #xC85C)	; &B-C85C;
     (=ucs@gb/fw		. #x0436)	; &J90-2758;
     (=ucs@jis/fw	. #x0436)	; &J90-2758;
+    (->uppercase
+     ((=jis-x0208	  . #x2728)	; &J90-2728; [07-08]
+      (=gb2312		  . #x2728)	; &I-G0-2728; [07-08]
+      (=ks-x1001	  . #x2C28)	; &I-K0-2C28; [12-08]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER ZE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0437)	; з
+    (cyrillic-iso8859-5 . #xD7)	; &I-CYRILLIC-57;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER ZE")
       (=ucs		  . #x0417)	; З
       ))
-    (=ucs		. #x0437)	; з
-    (cyrillic-iso8859-5 . #xD7)	; &I-CYRILLIC-57;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER ZE")
       (=ucs		  . #x0437)	; з
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2729)	; &J90-2729; [07-09]
-      (=gb2312		  . #x2729)	; &I-G0-2729; [07-09]
-      (=ks-x1001	  . #x2C29)	; &I-K0-2C29; [12-09]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER ZE")
       (=ucs		  . #x0437)	; з
@@ -1806,29 +1801,29 @@
     (=big5-eten		. #xC85D)	; &B-C85D;
     (=ucs@gb/fw		. #x0437)	; &J90-2759;
     (=ucs@jis/fw	. #x0437)	; &J90-2759;
+    (->uppercase
+     ((=jis-x0208	  . #x2729)	; &J90-2729; [07-09]
+      (=gb2312		  . #x2729)	; &I-G0-2729; [07-09]
+      (=ks-x1001	  . #x2C29)	; &I-K0-2C29; [12-09]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER I")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0438)	; и
+    (cyrillic-iso8859-5 . #xD8)	; &I-CYRILLIC-58;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER I")
       (=ucs		  . #x0418)	; И
       ))
-    (=ucs		. #x0438)	; и
-    (cyrillic-iso8859-5 . #xD8)	; &I-CYRILLIC-58;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER I")
       (=ucs		  . #x0438)	; и
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x272A)	; &J90-272A; [07-10]
-      (=gb2312		  . #x272A)	; &I-G0-272A; [07-10]
-      (=ks-x1001	  . #x2C2A)	; &I-K0-2C2A; [12-10]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER I")
       (=ucs		  . #x0438)	; и
@@ -1839,16 +1834,17 @@
     (=big5-eten		. #xC85E)	; &B-C85E;
     (=ucs@gb/fw		. #x0438)	; &J90-275A;
     (=ucs@jis/fw	. #x0438)	; &J90-275A;
+    (->uppercase
+     ((=jis-x0208	  . #x272A)	; &J90-272A; [07-10]
+      (=gb2312		  . #x272A)	; &I-G0-272A; [07-10]
+      (=ks-x1001	  . #x2C2A)	; &I-K0-2C2A; [12-10]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER SHORT I")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER SHORT I")
-      (=ucs		  . #x0419)	; Й
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER I")
       (=ucs		  . #x0438)	; и
@@ -1858,17 +1854,16 @@
       ))
     (=ucs		. #x0439)	; й
     (cyrillic-iso8859-5 . #xD9)	; &I-CYRILLIC-59;
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER SHORT I")
+      (=ucs		  . #x0419)	; Й
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER SHORT I")
       (=ucs		  . #x0439)	; й
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x272B)	; &J90-272B; [07-11]
-      (=gb2312		  . #x272B)	; &I-G0-272B; [07-11]
-      (=ks-x1001	  . #x2C2B)	; &I-K0-2C2B; [12-11]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER SHORT I")
       (=ucs		  . #x0439)	; й
@@ -1887,29 +1882,29 @@
     (=big5-eten		. #xC85F)	; &B-C85F;
     (=ucs@gb/fw		. #x0439)	; &J90-275B;
     (=ucs@jis/fw	. #x0439)	; &J90-275B;
+    (->uppercase
+     ((=jis-x0208	  . #x272B)	; &J90-272B; [07-11]
+      (=gb2312		  . #x272B)	; &I-G0-272B; [07-11]
+      (=ks-x1001	  . #x2C2B)	; &I-K0-2C2B; [12-11]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER KA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x043A)	; к
+    (cyrillic-iso8859-5 . #xDA)	; &I-CYRILLIC-5A;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER KA")
       (=ucs		  . #x041A)	; К
       ))
-    (=ucs		. #x043A)	; к
-    (cyrillic-iso8859-5 . #xDA)	; &I-CYRILLIC-5A;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER KA")
       (=ucs		  . #x043A)	; к
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x272C)	; &J90-272C; [07-12]
-      (=gb2312		  . #x272C)	; &I-G0-272C; [07-12]
-      (=ks-x1001	  . #x2C2C)	; &I-K0-2C2C; [12-12]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER KA")
       (=ucs		  . #x043A)	; к
@@ -1920,29 +1915,29 @@
     (=big5-eten		. #xC860)	; &B-C860;
     (=ucs@gb/fw		. #x043A)	; &J90-275C;
     (=ucs@jis/fw	. #x043A)	; &J90-275C;
+    (->uppercase
+     ((=jis-x0208	  . #x272C)	; &J90-272C; [07-12]
+      (=gb2312		  . #x272C)	; &I-G0-272C; [07-12]
+      (=ks-x1001	  . #x2C2C)	; &I-K0-2C2C; [12-12]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER EL")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x043B)	; л
+    (cyrillic-iso8859-5 . #xDB)	; &I-CYRILLIC-5B;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER EL")
       (=ucs		  . #x041B)	; Л
       ))
-    (=ucs		. #x043B)	; л
-    (cyrillic-iso8859-5 . #xDB)	; &I-CYRILLIC-5B;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER EL")
       (=ucs		  . #x043B)	; л
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x272D)	; &J90-272D; [07-13]
-      (=gb2312		  . #x272D)	; &I-G0-272D; [07-13]
-      (=ks-x1001	  . #x2C2D)	; &I-K0-2C2D; [12-13]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER EL")
       (=ucs		  . #x043B)	; л
@@ -1953,29 +1948,29 @@
     (=big5-eten		. #xC861)	; &B-C861;
     (=ucs@gb/fw		. #x043B)	; &J90-275D;
     (=ucs@jis/fw	. #x043B)	; &J90-275D;
+    (->uppercase
+     ((=jis-x0208	  . #x272D)	; &J90-272D; [07-13]
+      (=gb2312		  . #x272D)	; &I-G0-272D; [07-13]
+      (=ks-x1001	  . #x2C2D)	; &I-K0-2C2D; [12-13]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER EM")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x043C)	; м
+    (cyrillic-iso8859-5 . #xDC)	; &I-CYRILLIC-5C;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER EM")
       (=ucs		  . #x041C)	; М
       ))
-    (=ucs		. #x043C)	; м
-    (cyrillic-iso8859-5 . #xDC)	; &I-CYRILLIC-5C;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER EM")
       (=ucs		  . #x043C)	; м
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x272E)	; &J90-272E; [07-14]
-      (=gb2312		  . #x272E)	; &I-G0-272E; [07-14]
-      (=ks-x1001	  . #x2C2E)	; &I-K0-2C2E; [12-14]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER EM")
       (=ucs		  . #x043C)	; м
@@ -1986,29 +1981,29 @@
     (=big5-eten		. #xC862)	; &B-C862;
     (=ucs@gb/fw		. #x043C)	; &J90-275E;
     (=ucs@jis/fw	. #x043C)	; &J90-275E;
+    (->uppercase
+     ((=jis-x0208	  . #x272E)	; &J90-272E; [07-14]
+      (=gb2312		  . #x272E)	; &I-G0-272E; [07-14]
+      (=ks-x1001	  . #x2C2E)	; &I-K0-2C2E; [12-14]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER EN")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x043D)	; н
+    (cyrillic-iso8859-5 . #xDD)	; &I-CYRILLIC-5D;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER EN")
       (=ucs		  . #x041D)	; Н
       ))
-    (=ucs		. #x043D)	; н
-    (cyrillic-iso8859-5 . #xDD)	; &I-CYRILLIC-5D;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER EN")
       (=ucs		  . #x043D)	; н
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x272F)	; &J90-272F; [07-15]
-      (=gb2312		  . #x272F)	; &I-G0-272F; [07-15]
-      (=ks-x1001	  . #x2C2F)	; &I-K0-2C2F; [12-15]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER EN")
       (=ucs		  . #x043D)	; н
@@ -2019,29 +2014,29 @@
     (=big5-eten		. #xC863)	; &B-C863;
     (=ucs@gb/fw		. #x043D)	; &J90-275F;
     (=ucs@jis/fw	. #x043D)	; &J90-275F;
+    (->uppercase
+     ((=jis-x0208	  . #x272F)	; &J90-272F; [07-15]
+      (=gb2312		  . #x272F)	; &I-G0-272F; [07-15]
+      (=ks-x1001	  . #x2C2F)	; &I-K0-2C2F; [12-15]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER O")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x043E)	; о
+    (cyrillic-iso8859-5 . #xDE)	; &I-CYRILLIC-5E;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER O")
       (=ucs		  . #x041E)	; О
       ))
-    (=ucs		. #x043E)	; о
-    (cyrillic-iso8859-5 . #xDE)	; &I-CYRILLIC-5E;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER O")
       (=ucs		  . #x043E)	; о
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2730)	; &J90-2730; [07-16]
-      (=gb2312		  . #x2730)	; &I-G0-2730; [07-16]
-      (=ks-x1001	  . #x2C30)	; &I-K0-2C30; [12-16]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER O")
       (=ucs		  . #x043E)	; о
@@ -2052,29 +2047,29 @@
     (=big5-eten		. #xC864)	; &B-C864;
     (=ucs@gb/fw		. #x043E)	; &J90-2760;
     (=ucs@jis/fw	. #x043E)	; &J90-2760;
+    (->uppercase
+     ((=jis-x0208	  . #x2730)	; &J90-2730; [07-16]
+      (=gb2312		  . #x2730)	; &I-G0-2730; [07-16]
+      (=ks-x1001	  . #x2C30)	; &I-K0-2C30; [12-16]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER PE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x043F)	; п
+    (cyrillic-iso8859-5 . #xDF)	; &I-CYRILLIC-5F;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER PE")
       (=ucs		  . #x041F)	; П
       ))
-    (=ucs		. #x043F)	; п
-    (cyrillic-iso8859-5 . #xDF)	; &I-CYRILLIC-5F;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER PE")
       (=ucs		  . #x043F)	; п
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2731)	; &J90-2731; [07-17]
-      (=gb2312		  . #x2731)	; &I-G0-2731; [07-17]
-      (=ks-x1001	  . #x2C31)	; &I-K0-2C31; [12-17]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER PE")
       (=ucs		  . #x043F)	; п
@@ -2085,29 +2080,29 @@
     (=big5-eten		. #xC865)	; &B-C865;
     (=ucs@gb/fw		. #x043F)	; &J90-2761;
     (=ucs@jis/fw	. #x043F)	; &J90-2761;
+    (->uppercase
+     ((=jis-x0208	  . #x2731)	; &J90-2731; [07-17]
+      (=gb2312		  . #x2731)	; &I-G0-2731; [07-17]
+      (=ks-x1001	  . #x2C31)	; &I-K0-2C31; [12-17]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER ER")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0440)	; р
+    (cyrillic-iso8859-5 . #xE0)	; &I-CYRILLIC-60;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER ER")
       (=ucs		  . #x0420)	; Р
       ))
-    (=ucs		. #x0440)	; р
-    (cyrillic-iso8859-5 . #xE0)	; &I-CYRILLIC-60;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER ER")
       (=ucs		  . #x0440)	; р
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2732)	; &J90-2732; [07-18]
-      (=gb2312		  . #x2732)	; &I-G0-2732; [07-18]
-      (=ks-x1001	  . #x2C32)	; &I-K0-2C32; [12-18]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER ER")
       (=ucs		  . #x0440)	; р
@@ -2118,29 +2113,29 @@
     (=big5-eten		. #xC866)	; &B-C866;
     (=ucs@gb/fw		. #x0440)	; &J90-2762;
     (=ucs@jis/fw	. #x0440)	; &J90-2762;
+    (->uppercase
+     ((=jis-x0208	  . #x2732)	; &J90-2732; [07-18]
+      (=gb2312		  . #x2732)	; &I-G0-2732; [07-18]
+      (=ks-x1001	  . #x2C32)	; &I-K0-2C32; [12-18]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER ES")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0441)	; с
+    (cyrillic-iso8859-5 . #xE1)	; &I-CYRILLIC-61;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER ES")
       (=ucs		  . #x0421)	; С
       ))
-    (=ucs		. #x0441)	; с
-    (cyrillic-iso8859-5 . #xE1)	; &I-CYRILLIC-61;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER ES")
       (=ucs		  . #x0441)	; с
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2733)	; &J90-2733; [07-19]
-      (=gb2312		  . #x2733)	; &I-G0-2733; [07-19]
-      (=ks-x1001	  . #x2C33)	; &I-K0-2C33; [12-19]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER ES")
       (=ucs		  . #x0441)	; с
@@ -2151,29 +2146,29 @@
     (=big5-eten		. #xC867)	; &B-C867;
     (=ucs@gb/fw		. #x0441)	; &J90-2763;
     (=ucs@jis/fw	. #x0441)	; &J90-2763;
+    (->uppercase
+     ((=jis-x0208	  . #x2733)	; &J90-2733; [07-19]
+      (=gb2312		  . #x2733)	; &I-G0-2733; [07-19]
+      (=ks-x1001	  . #x2C33)	; &I-K0-2C33; [12-19]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER TE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0442)	; т
+    (cyrillic-iso8859-5 . #xE2)	; &I-CYRILLIC-62;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER TE")
       (=ucs		  . #x0422)	; Т
       ))
-    (=ucs		. #x0442)	; т
-    (cyrillic-iso8859-5 . #xE2)	; &I-CYRILLIC-62;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER TE")
       (=ucs		  . #x0442)	; т
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2734)	; &J90-2734; [07-20]
-      (=gb2312		  . #x2734)	; &I-G0-2734; [07-20]
-      (=ks-x1001	  . #x2C34)	; &I-K0-2C34; [12-20]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER TE")
       (=ucs		  . #x0442)	; т
@@ -2184,29 +2179,29 @@
     (=big5-eten		. #xC868)	; &B-C868;
     (=ucs@gb/fw		. #x0442)	; &J90-2764;
     (=ucs@jis/fw	. #x0442)	; &J90-2764;
+    (->uppercase
+     ((=jis-x0208	  . #x2734)	; &J90-2734; [07-20]
+      (=gb2312		  . #x2734)	; &I-G0-2734; [07-20]
+      (=ks-x1001	  . #x2C34)	; &I-K0-2C34; [12-20]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER U")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0443)	; у
+    (cyrillic-iso8859-5 . #xE3)	; &I-CYRILLIC-63;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER U")
       (=ucs		  . #x0423)	; У
       ))
-    (=ucs		. #x0443)	; у
-    (cyrillic-iso8859-5 . #xE3)	; &I-CYRILLIC-63;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER U")
       (=ucs		  . #x0443)	; у
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2735)	; &J90-2735; [07-21]
-      (=gb2312		  . #x2735)	; &I-G0-2735; [07-21]
-      (=ks-x1001	  . #x2C35)	; &I-K0-2C35; [12-21]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER U")
       (=ucs		  . #x0443)	; у
@@ -2217,29 +2212,29 @@
     (=big5-eten		. #xC869)	; &B-C869;
     (=ucs@gb/fw		. #x0443)	; &J90-2765;
     (=ucs@jis/fw	. #x0443)	; &J90-2765;
+    (->uppercase
+     ((=jis-x0208	  . #x2735)	; &J90-2735; [07-21]
+      (=gb2312		  . #x2735)	; &I-G0-2735; [07-21]
+      (=ks-x1001	  . #x2C35)	; &I-K0-2C35; [12-21]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER EF")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0444)	; ф
+    (cyrillic-iso8859-5 . #xE4)	; &I-CYRILLIC-64;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER EF")
       (=ucs		  . #x0424)	; Ф
       ))
-    (=ucs		. #x0444)	; ф
-    (cyrillic-iso8859-5 . #xE4)	; &I-CYRILLIC-64;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER EF")
       (=ucs		  . #x0444)	; ф
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2736)	; &J90-2736; [07-22]
-      (=gb2312		  . #x2736)	; &I-G0-2736; [07-22]
-      (=ks-x1001	  . #x2C36)	; &I-K0-2C36; [12-22]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER EF")
       (=ucs		  . #x0444)	; ф
@@ -2250,29 +2245,29 @@
     (=big5-eten		. #xC86A)	; &B-C86A;
     (=ucs@gb/fw		. #x0444)	; &J90-2766;
     (=ucs@jis/fw	. #x0444)	; &J90-2766;
+    (->uppercase
+     ((=jis-x0208	  . #x2736)	; &J90-2736; [07-22]
+      (=gb2312		  . #x2736)	; &I-G0-2736; [07-22]
+      (=ks-x1001	  . #x2C36)	; &I-K0-2C36; [12-22]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER HA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0445)	; х
+    (cyrillic-iso8859-5 . #xE5)	; &I-CYRILLIC-65;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER HA")
       (=ucs		  . #x0425)	; Х
       ))
-    (=ucs		. #x0445)	; х
-    (cyrillic-iso8859-5 . #xE5)	; &I-CYRILLIC-65;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER HA")
       (=ucs		  . #x0445)	; х
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2737)	; &J90-2737; [07-23]
-      (=gb2312		  . #x2737)	; &I-G0-2737; [07-23]
-      (=ks-x1001	  . #x2C37)	; &I-K0-2C37; [12-23]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER HA")
       (=ucs		  . #x0445)	; х
@@ -2283,29 +2278,29 @@
     (=big5-eten		. #xC86B)	; &B-C86B;
     (=ucs@gb/fw		. #x0445)	; &J90-2767;
     (=ucs@jis/fw	. #x0445)	; &J90-2767;
+    (->uppercase
+     ((=jis-x0208	  . #x2737)	; &J90-2737; [07-23]
+      (=gb2312		  . #x2737)	; &I-G0-2737; [07-23]
+      (=ks-x1001	  . #x2C37)	; &I-K0-2C37; [12-23]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER TSE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0446)	; ц
+    (cyrillic-iso8859-5 . #xE6)	; &I-CYRILLIC-66;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER TSE")
       (=ucs		  . #x0426)	; Ц
       ))
-    (=ucs		. #x0446)	; ц
-    (cyrillic-iso8859-5 . #xE6)	; &I-CYRILLIC-66;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER TSE")
       (=ucs		  . #x0446)	; ц
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2738)	; &J90-2738; [07-24]
-      (=gb2312		  . #x2738)	; &I-G0-2738; [07-24]
-      (=ks-x1001	  . #x2C38)	; &I-K0-2C38; [12-24]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER TSE")
       (=ucs		  . #x0446)	; ц
@@ -2316,29 +2311,29 @@
     (=big5-eten		. #xC86C)	; &B-C86C;
     (=ucs@gb/fw		. #x0446)	; &J90-2768;
     (=ucs@jis/fw	. #x0446)	; &J90-2768;
+    (->uppercase
+     ((=jis-x0208	  . #x2738)	; &J90-2738; [07-24]
+      (=gb2312		  . #x2738)	; &I-G0-2738; [07-24]
+      (=ks-x1001	  . #x2C38)	; &I-K0-2C38; [12-24]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER CHE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0447)	; ч
+    (cyrillic-iso8859-5 . #xE7)	; &I-CYRILLIC-67;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER CHE")
       (=ucs		  . #x0427)	; Ч
       ))
-    (=ucs		. #x0447)	; ч
-    (cyrillic-iso8859-5 . #xE7)	; &I-CYRILLIC-67;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER CHE")
       (=ucs		  . #x0447)	; ч
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2739)	; &J90-2739; [07-25]
-      (=gb2312		  . #x2739)	; &I-G0-2739; [07-25]
-      (=ks-x1001	  . #x2C39)	; &I-K0-2C39; [12-25]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER CHE")
       (=ucs		  . #x0447)	; ч
@@ -2349,28 +2344,28 @@
     (=big5-eten		. #xC86D)	; &B-C86D;
     (=ucs@gb/fw		. #x0447)	; &J90-2769;
     (=ucs@jis/fw	. #x0447)	; &J90-2769;
+    (->uppercase
+     ((=jis-x0208	  . #x2739)	; &J90-2739; [07-25]
+      (=gb2312		  . #x2739)	; &I-G0-2739; [07-25]
+      (=ks-x1001	  . #x2C39)	; &I-K0-2C39; [12-25]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER SHA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0448)	; ш
+    (cyrillic-iso8859-5 . #xE8)	; &I-CYRILLIC-68;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER SHA")
       (=ucs		  . #x0428)	; Ш
       ))
-    (=ucs		. #x0448)	; ш
-    (cyrillic-iso8859-5 . #xE8)	; &I-CYRILLIC-68;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER SHA")
-      (=ucs		  . #x0448)	; ш
-      ))
-    (->uppercase
-     ((=jis-x0208	  . #x273A)	; &J90-273A; [07-26]
-      (=gb2312		  . #x273A)	; &I-G0-273A; [07-26]
-      (=ks-x1001	  . #x2C3A)	; &I-K0-2C3A; [12-26]
+      (=ucs		  . #x0448)	; ш
       ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER SHA")
@@ -2382,29 +2377,29 @@
     (=big5-eten		. #xC86E)	; &B-C86E;
     (=ucs@gb/fw		. #x0448)	; &J90-276A;
     (=ucs@jis/fw	. #x0448)	; &J90-276A;
+    (->uppercase
+     ((=jis-x0208	  . #x273A)	; &J90-273A; [07-26]
+      (=gb2312		  . #x273A)	; &I-G0-273A; [07-26]
+      (=ks-x1001	  . #x2C3A)	; &I-K0-2C3A; [12-26]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER SHCHA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0449)	; щ
+    (cyrillic-iso8859-5 . #xE9)	; &I-CYRILLIC-69;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER SHCHA")
       (=ucs		  . #x0429)	; Щ
       ))
-    (=ucs		. #x0449)	; щ
-    (cyrillic-iso8859-5 . #xE9)	; &I-CYRILLIC-69;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER SHCHA")
       (=ucs		  . #x0449)	; щ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x273B)	; &J90-273B; [07-27]
-      (=gb2312		  . #x273B)	; &I-G0-273B; [07-27]
-      (=ks-x1001	  . #x2C3B)	; &I-K0-2C3B; [12-27]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER SHCHA")
       (=ucs		  . #x0449)	; щ
@@ -2415,29 +2410,29 @@
     (=big5-eten		. #xC86F)	; &B-C86F;
     (=ucs@gb/fw		. #x0449)	; &J90-276B;
     (=ucs@jis/fw	. #x0449)	; &J90-276B;
+    (->uppercase
+     ((=jis-x0208	  . #x273B)	; &J90-273B; [07-27]
+      (=gb2312		  . #x273B)	; &I-G0-273B; [07-27]
+      (=ks-x1001	  . #x2C3B)	; &I-K0-2C3B; [12-27]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER HARD SIGN")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x044A)	; ъ
+    (cyrillic-iso8859-5 . #xEA)	; &I-CYRILLIC-6A;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER HARD SIGN")
       (=ucs		  . #x042A)	; Ъ
       ))
-    (=ucs		. #x044A)	; ъ
-    (cyrillic-iso8859-5 . #xEA)	; &I-CYRILLIC-6A;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER HARD SIGN")
       (=ucs		  . #x044A)	; ъ
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x273C)	; &J90-273C; [07-28]
-      (=gb2312		  . #x273C)	; &I-G0-273C; [07-28]
-      (=ks-x1001	  . #x2C3C)	; &I-K0-2C3C; [12-28]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER HARD SIGN")
       (=ucs		  . #x044A)	; ъ
@@ -2448,29 +2443,29 @@
     (=big5-eten		. #xC870)	; &B-C870;
     (=ucs@gb/fw		. #x044A)	; &J90-276C;
     (=ucs@jis/fw	. #x044A)	; &J90-276C;
+    (->uppercase
+     ((=jis-x0208	  . #x273C)	; &J90-273C; [07-28]
+      (=gb2312		  . #x273C)	; &I-G0-273C; [07-28]
+      (=ks-x1001	  . #x2C3C)	; &I-K0-2C3C; [12-28]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER YERU")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x044B)	; ы
+    (cyrillic-iso8859-5 . #xEB)	; &I-CYRILLIC-6B;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER YERU")
       (=ucs		  . #x042B)	; Ы
       ))
-    (=ucs		. #x044B)	; ы
-    (cyrillic-iso8859-5 . #xEB)	; &I-CYRILLIC-6B;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER YERU")
       (=ucs		  . #x044B)	; ы
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x273D)	; &J90-273D; [07-29]
-      (=gb2312		  . #x273D)	; &I-G0-273D; [07-29]
-      (=ks-x1001	  . #x2C3D)	; &I-K0-2C3D; [12-29]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER YERU")
       (=ucs		  . #x044B)	; ы
@@ -2481,29 +2476,29 @@
     (=big5-eten		. #xC871)	; &B-C871;
     (=ucs@gb/fw		. #x044B)	; &J90-276D;
     (=ucs@jis/fw	. #x044B)	; &J90-276D;
+    (->uppercase
+     ((=jis-x0208	  . #x273D)	; &J90-273D; [07-29]
+      (=gb2312		  . #x273D)	; &I-G0-273D; [07-29]
+      (=ks-x1001	  . #x2C3D)	; &I-K0-2C3D; [12-29]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER SOFT SIGN")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x044C)	; ь
+    (cyrillic-iso8859-5 . #xEC)	; &I-CYRILLIC-6C;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER SOFT SIGN")
       (=ucs		  . #x042C)	; Ь
       ))
-    (=ucs		. #x044C)	; ь
-    (cyrillic-iso8859-5 . #xEC)	; &I-CYRILLIC-6C;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER SOFT SIGN")
       (=ucs		  . #x044C)	; ь
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x273E)	; &J90-273E; [07-30]
-      (=gb2312		  . #x273E)	; &I-G0-273E; [07-30]
-      (=ks-x1001	  . #x2C3E)	; &I-K0-2C3E; [12-30]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER SOFT SIGN")
       (=ucs		  . #x044C)	; ь
@@ -2514,29 +2509,29 @@
     (=big5-eten		. #xC872)	; &B-C872;
     (=ucs@gb/fw		. #x044C)	; &J90-276E;
     (=ucs@jis/fw	. #x044C)	; &J90-276E;
+    (->uppercase
+     ((=jis-x0208	  . #x273E)	; &J90-273E; [07-30]
+      (=gb2312		  . #x273E)	; &I-G0-273E; [07-30]
+      (=ks-x1001	  . #x2C3E)	; &I-K0-2C3E; [12-30]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER E")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x044D)	; э
+    (cyrillic-iso8859-5 . #xED)	; &I-CYRILLIC-6D;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER E")
       (=ucs		  . #x042D)	; Э
       ))
-    (=ucs		. #x044D)	; э
-    (cyrillic-iso8859-5 . #xED)	; &I-CYRILLIC-6D;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER E")
       (=ucs		  . #x044D)	; э
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x273F)	; &J90-273F; [07-31]
-      (=gb2312		  . #x273F)	; &I-G0-273F; [07-31]
-      (=ks-x1001	  . #x2C3F)	; &I-K0-2C3F; [12-31]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER E")
       (=ucs		  . #x044D)	; э
@@ -2547,29 +2542,29 @@
     (=big5-eten		. #xC873)	; &B-C873;
     (=ucs@gb/fw		. #x044D)	; &J90-276F;
     (=ucs@jis/fw	. #x044D)	; &J90-276F;
+    (->uppercase
+     ((=jis-x0208	  . #x273F)	; &J90-273F; [07-31]
+      (=gb2312		  . #x273F)	; &I-G0-273F; [07-31]
+      (=ks-x1001	  . #x2C3F)	; &I-K0-2C3F; [12-31]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER YU")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x044E)	; ю
+    (cyrillic-iso8859-5 . #xEE)	; &I-CYRILLIC-6E;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER YU")
       (=ucs		  . #x042E)	; Ю
       ))
-    (=ucs		. #x044E)	; ю
-    (cyrillic-iso8859-5 . #xEE)	; &I-CYRILLIC-6E;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER YU")
       (=ucs		  . #x044E)	; ю
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2740)	; &J90-2740; [07-32]
-      (=gb2312		  . #x2740)	; &I-G0-2740; [07-32]
-      (=ks-x1001	  . #x2C40)	; &I-K0-2C40; [12-32]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER YU")
       (=ucs		  . #x044E)	; ю
@@ -2580,29 +2575,29 @@
     (=big5-eten		. #xC874)	; &B-C874;
     (=ucs@gb/fw		. #x044E)	; &J90-2770;
     (=ucs@jis/fw	. #x044E)	; &J90-2770;
+    (->uppercase
+     ((=jis-x0208	  . #x2740)	; &J90-2740; [07-32]
+      (=gb2312		  . #x2740)	; &I-G0-2740; [07-32]
+      (=ks-x1001	  . #x2C40)	; &I-K0-2C40; [12-32]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER YA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x044F)	; я
+    (cyrillic-iso8859-5 . #xEF)	; &I-CYRILLIC-6F;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER YA")
       (=ucs		  . #x042F)	; Я
       ))
-    (=ucs		. #x044F)	; я
-    (cyrillic-iso8859-5 . #xEF)	; &I-CYRILLIC-6F;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER YA")
       (=ucs		  . #x044F)	; я
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2741)	; &J90-2741; [07-33]
-      (=gb2312		  . #x2741)	; &I-G0-2741; [07-33]
-      (=ks-x1001	  . #x2C41)	; &I-K0-2C41; [12-33]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER YA")
       (=ucs		  . #x044F)	; я
@@ -2613,16 +2608,17 @@
     (=big5-eten		. #xC875)	; &B-C875;
     (=ucs@gb/fw		. #x044F)	; &J90-2771;
     (=ucs@jis/fw	. #x044F)	; &J90-2771;
+    (->uppercase
+     ((=jis-x0208	  . #x2741)	; &J90-2741; [07-33]
+      (=gb2312		  . #x2741)	; &I-G0-2741; [07-33]
+      (=ks-x1001	  . #x2C41)	; &I-K0-2C41; [12-33]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER IE WITH GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER IE WITH GRAVE")
-      (=ucs		  . #x0400)	; Ѐ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER IE")
       (=ucs		  . #x0435)	; е
@@ -2631,16 +2627,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x0450)	; ѐ
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER IE WITH GRAVE")
+      (=ucs		  . #x0400)	; Ѐ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER IO")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER IO")
-      (=ucs		  . #x0401)	; Ё
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER IE")
       (=ucs		  . #x0435)	; е
@@ -2650,17 +2646,16 @@
       ))
     (=ucs		. #x0451)	; ё
     (cyrillic-iso8859-5 . #xF1)	; &I-CYRILLIC-71;
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER IO")
+      (=ucs		  . #x0401)	; Ё
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER IO")
       (=ucs		  . #x0451)	; ё
       ))
-    (->uppercase
-     ((=jis-x0208	  . #x2727)	; &J90-2727; [07-07]
-      (=gb2312		  . #x2727)	; &I-G0-2727; [07-07]
-      (=ks-x1001	  . #x2C27)	; &I-K0-2C27; [12-07]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER IO")
       (=ucs		  . #x0451)	; ё
@@ -2679,6 +2674,11 @@
     (=big5-eten		. #xC85B)	; &B-C85B;
     (=ucs@gb/fw		. #x0451)	; &J90-2757;
     (=ucs@jis/fw	. #x0451)	; &J90-2757;
+    (->uppercase
+     ((=jis-x0208	  . #x2727)	; &J90-2727; [07-07]
+      (=gb2312		  . #x2727)	; &I-G0-2727; [07-07]
+      (=ks-x1001	  . #x2C27)	; &I-K0-2C27; [12-07]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER DJE")
@@ -2686,37 +2686,33 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Serbocroatian")
+    (=ucs		. #x0452)	; ђ
+    (cyrillic-iso8859-5 . #xF2)	; &I-CYRILLIC-72;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER DJE")
       (=ucs		  . #x0402)	; Ђ
       ))
-    (=ucs		. #x0452)	; ђ
-    (cyrillic-iso8859-5 . #xF2)	; &I-CYRILLIC-72;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER DJE")
       (=ucs		  . #x0452)	; ђ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2742)	; &JSP-2742; [07-34]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER DJE")
       (=ucs		  . #x0452)	; ђ
       ))
     (=jis-x0212		. #x2772)	; &JSP-2772; [07-82]
     (=ucs@jis/fw	. #x0452)	; &JSP-2772;
+    (->uppercase
+     ((=jis-x0212	  . #x2742)	; &JSP-2742; [07-34]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER GJE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER GJE")
-      (=ucs		  . #x0403)	; Ѓ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER GHE")
       (=ucs		  . #x0433)	; г
@@ -2726,15 +2722,16 @@
       ))
     (=ucs		. #x0453)	; ѓ
     (cyrillic-iso8859-5 . #xF3)	; &I-CYRILLIC-73;
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER GJE")
+      (=ucs		  . #x0403)	; Ѓ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER GJE")
       (=ucs		  . #x0453)	; ѓ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2743)	; &JSP-2743; [07-35]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER GJE")
       (=ucs		  . #x0453)	; ѓ
@@ -2749,87 +2746,90 @@
       ))
     (=jis-x0212		. #x2773)	; &JSP-2773; [07-83]
     (=ucs@jis/fw	. #x0453)	; &JSP-2773;
+    (->uppercase
+     ((=jis-x0212	  . #x2743)	; &JSP-2743; [07-35]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER UKRAINIAN IE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0454)	; є
+    (cyrillic-iso8859-5 . #xF4)	; &I-CYRILLIC-74;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER UKRAINIAN IE")
       (=ucs		  . #x0404)	; Є
       ))
-    (=ucs		. #x0454)	; є
-    (cyrillic-iso8859-5 . #xF4)	; &I-CYRILLIC-74;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER UKRAINIAN IE")
       (=ucs		  . #x0454)	; є
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2744)	; &JSP-2744; [07-36]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER UKRAINIAN IE")
       (=ucs		  . #x0454)	; є
       ))
     (=jis-x0212		. #x2774)	; &JSP-2774; [07-84]
     (=ucs@jis/fw	. #x0454)	; &JSP-2774;
+    (->uppercase
+     ((=jis-x0212	  . #x2744)	; &JSP-2744; [07-36]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER DZE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0455)	; ѕ
+    (cyrillic-iso8859-5 . #xF5)	; &I-CYRILLIC-75;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER DZE")
       (=ucs		  . #x0405)	; Ѕ
       ))
-    (=ucs		. #x0455)	; ѕ
-    (cyrillic-iso8859-5 . #xF5)	; &I-CYRILLIC-75;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER DZE")
       (=ucs		  . #x0455)	; ѕ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2745)	; &JSP-2745; [07-37]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER DZE")
       (=ucs		  . #x0455)	; ѕ
       ))
     (=jis-x0212		. #x2775)	; &JSP-2775; [07-85]
     (=ucs@jis/fw	. #x0455)	; &JSP-2775;
+    (->uppercase
+     ((=jis-x0212	  . #x2745)	; &JSP-2745; [07-37]
+      ))
     ))
 (define-char
   '((name . "CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0456)	; і
+    (cyrillic-iso8859-5 . #xF6)	; &I-CYRILLIC-76;
     (->uppercase
      ((name . "CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I")
       (=ucs		  . #x0406)	; І
       ))
-    (=ucs		. #x0456)	; і
-    (cyrillic-iso8859-5 . #xF6)	; &I-CYRILLIC-76;
     ))
 (define-char
   '((<-denotational
      ((name . "CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I")
       (=ucs		  . #x0456)	; і
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2746)	; &JSP-2746; [07-38]
-      ))
     (<-fullwidth
      ((name . "CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I")
       (=ucs		  . #x0456)	; і
       ))
     (=jis-x0212		. #x2776)	; &JSP-2776; [07-86]
     (=ucs@jis/fw	. #x0456)	; &JSP-2776;
+    (->uppercase
+     ((=jis-x0212	  . #x2746)	; &JSP-2746; [07-38]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER YI")
@@ -2837,10 +2837,6 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Ukrainian")
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER YI")
-      (=ucs		  . #x0407)	; Ї
-      ))
     (=decomposition
      ((name . "CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I")
       (=ucs		  . #x0456)	; і
@@ -2850,15 +2846,16 @@
       ))
     (=ucs		. #x0457)	; ї
     (cyrillic-iso8859-5 . #xF7)	; &I-CYRILLIC-77;
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER YI")
+      (=ucs		  . #x0407)	; Ї
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER YI")
       (=ucs		  . #x0457)	; ї
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2747)	; &JSP-2747; [07-39]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER YI")
       (=ucs		  . #x0457)	; ї
@@ -2871,87 +2868,90 @@
       ))
     (=jis-x0212		. #x2777)	; &JSP-2777; [07-87]
     (=ucs@jis/fw	. #x0457)	; &JSP-2777;
+    (->uppercase
+     ((=jis-x0212	  . #x2747)	; &JSP-2747; [07-39]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER JE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0458)	; ј
+    (cyrillic-iso8859-5 . #xF8)	; &I-CYRILLIC-78;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER JE")
       (=ucs		  . #x0408)	; Ј
       ))
-    (=ucs		. #x0458)	; ј
-    (cyrillic-iso8859-5 . #xF8)	; &I-CYRILLIC-78;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER JE")
       (=ucs		  . #x0458)	; ј
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2748)	; &JSP-2748; [07-40]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER JE")
       (=ucs		  . #x0458)	; ј
       ))
     (=jis-x0212		. #x2778)	; &JSP-2778; [07-88]
     (=ucs@jis/fw	. #x0458)	; &JSP-2778;
+    (->uppercase
+     ((=jis-x0212	  . #x2748)	; &JSP-2748; [07-40]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER LJE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0459)	; љ
+    (cyrillic-iso8859-5 . #xF9)	; &I-CYRILLIC-79;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER LJE")
       (=ucs		  . #x0409)	; Љ
       ))
-    (=ucs		. #x0459)	; љ
-    (cyrillic-iso8859-5 . #xF9)	; &I-CYRILLIC-79;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER LJE")
       (=ucs		  . #x0459)	; љ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x2749)	; &JSP-2749; [07-41]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER LJE")
       (=ucs		  . #x0459)	; љ
       ))
     (=jis-x0212		. #x2779)	; &JSP-2779; [07-89]
     (=ucs@jis/fw	. #x0459)	; &JSP-2779;
+    (->uppercase
+     ((=jis-x0212	  . #x2749)	; &JSP-2749; [07-41]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER NJE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x045A)	; њ
+    (cyrillic-iso8859-5 . #xFA)	; &I-CYRILLIC-7A;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER NJE")
       (=ucs		  . #x040A)	; Њ
       ))
-    (=ucs		. #x045A)	; њ
-    (cyrillic-iso8859-5 . #xFA)	; &I-CYRILLIC-7A;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER NJE")
       (=ucs		  . #x045A)	; њ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x274A)	; &JSP-274A; [07-42]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER NJE")
       (=ucs		  . #x045A)	; њ
       ))
     (=jis-x0212		. #x277A)	; &JSP-277A; [07-90]
     (=ucs@jis/fw	. #x045A)	; &JSP-277A;
+    (->uppercase
+     ((=jis-x0212	  . #x274A)	; &JSP-274A; [07-42]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER TSHE")
@@ -2959,37 +2959,33 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Serbocroatian")
+    (=ucs		. #x045B)	; ћ
+    (cyrillic-iso8859-5 . #xFB)	; &I-CYRILLIC-7B;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER TSHE")
       (=ucs		  . #x040B)	; Ћ
       ))
-    (=ucs		. #x045B)	; ћ
-    (cyrillic-iso8859-5 . #xFB)	; &I-CYRILLIC-7B;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER TSHE")
       (=ucs		  . #x045B)	; ћ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x274B)	; &JSP-274B; [07-43]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER TSHE")
       (=ucs		  . #x045B)	; ћ
       ))
     (=jis-x0212		. #x277B)	; &JSP-277B; [07-91]
     (=ucs@jis/fw	. #x045B)	; &JSP-277B;
+    (->uppercase
+     ((=jis-x0212	  . #x274B)	; &JSP-274B; [07-43]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER KJE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER KJE")
-      (=ucs		  . #x040C)	; Ќ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER KA")
       (=ucs		  . #x043A)	; к
@@ -2999,15 +2995,16 @@
       ))
     (=ucs		. #x045C)	; ќ
     (cyrillic-iso8859-5 . #xFC)	; &I-CYRILLIC-7C;
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER KJE")
+      (=ucs		  . #x040C)	; Ќ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER KJE")
       (=ucs		  . #x045C)	; ќ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x274C)	; &JSP-274C; [07-44]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER KJE")
       (=ucs		  . #x045C)	; ќ
@@ -3022,16 +3019,15 @@
       ))
     (=jis-x0212		. #x277C)	; &JSP-277C; [07-92]
     (=ucs@jis/fw	. #x045C)	; &JSP-277C;
+    (->uppercase
+     ((=jis-x0212	  . #x274C)	; &JSP-274C; [07-44]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER I WITH GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER I WITH GRAVE")
-      (=ucs		  . #x040D)	; Ѝ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER I")
       (=ucs		  . #x0438)	; и
@@ -3040,6 +3036,10 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x045D)	; ѝ
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER I WITH GRAVE")
+      (=ucs		  . #x040D)	; Ѝ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER SHORT U")
@@ -3047,10 +3047,6 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Byelorussian")
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER SHORT U")
-      (=ucs		  . #x040E)	; Ў
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER U")
       (=ucs		  . #x0443)	; у
@@ -3060,15 +3056,16 @@
       ))
     (=ucs		. #x045E)	; ў
     (cyrillic-iso8859-5 . #xFE)	; &I-CYRILLIC-7E;
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER SHORT U")
+      (=ucs		  . #x040E)	; Ў
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER SHORT U")
       (=ucs		  . #x045E)	; ў
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x274D)	; &JSP-274D; [07-45]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER SHORT U")
       (=ucs		  . #x045E)	; ў
@@ -3083,285 +3080,284 @@
       ))
     (=jis-x0212		. #x277D)	; &JSP-277D; [07-93]
     (=ucs@jis/fw	. #x045E)	; &JSP-277D;
+    (->uppercase
+     ((=jis-x0212	  . #x274D)	; &JSP-274D; [07-45]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER DZHE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x045F)	; џ
+    (cyrillic-iso8859-5 . #xFF)	; &I-CYRILLIC-7F;
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER DZHE")
       (=ucs		  . #x040F)	; Џ
       ))
-    (=ucs		. #x045F)	; џ
-    (cyrillic-iso8859-5 . #xFF)	; &I-CYRILLIC-7F;
     ))
 (define-char
   '((<-denotational
      ((name		  . "CYRILLIC SMALL LETTER DZHE")
       (=ucs		  . #x045F)	; џ
       ))
-    (->uppercase
-     ((=jis-x0212	  . #x274E)	; &JSP-274E; [07-46]
-      ))
     (<-fullwidth
      ((name		  . "CYRILLIC SMALL LETTER DZHE")
       (=ucs		  . #x045F)	; џ
       ))
     (=jis-x0212		. #x277E)	; &JSP-277E; [07-94]
     (=ucs@jis/fw	. #x045F)	; &JSP-277E;
+    (->uppercase
+     ((=jis-x0212	  . #x274E)	; &JSP-274E; [07-46]
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER OMEGA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0460)	; Ñ 
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER OMEGA")
       (=ucs		  . #x0461)	; Ñ¡
       ))
-    (=ucs		. #x0460)	; Ñ 
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER OMEGA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0461)	; Ñ¡
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER OMEGA")
       (=ucs		  . #x0460)	; Ñ 
       ))
-    (=ucs		. #x0461)	; Ñ¡
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER YAT")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0462)	; Ѣ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER YAT")
       (=ucs		  . #x0463)	; ѣ
       ))
-    (=ucs		. #x0462)	; Ѣ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER YAT")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0463)	; ѣ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER YAT")
       (=ucs		  . #x0462)	; Ѣ
       ))
-    (=ucs		. #x0463)	; ѣ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER IOTIFIED E")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0464)	; Ѥ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER IOTIFIED E")
       (=ucs		  . #x0465)	; ѥ
       ))
-    (=ucs		. #x0464)	; Ѥ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER IOTIFIED E")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0465)	; ѥ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER IOTIFIED E")
       (=ucs		  . #x0464)	; Ѥ
       ))
-    (=ucs		. #x0465)	; ѥ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER LITTLE YUS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0466)	; Ѧ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER LITTLE YUS")
       (=ucs		  . #x0467)	; ѧ
       ))
-    (=ucs		. #x0466)	; Ѧ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER LITTLE YUS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0467)	; ѧ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER LITTLE YUS")
       (=ucs		  . #x0466)	; Ѧ
       ))
-    (=ucs		. #x0467)	; ѧ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER IOTIFIED LITTLE YUS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0468)	; Ѩ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER IOTIFIED LITTLE YUS")
       (=ucs		  . #x0469)	; Ñ©
       ))
-    (=ucs		. #x0468)	; Ѩ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER IOTIFIED LITTLE YUS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0469)	; Ñ©
     (->uppercase
      ((name . "CYRILLIC CAPITAL LETTER IOTIFIED LITTLE YUS")
       (=ucs		  . #x0468)	; Ѩ
       ))
-    (=ucs		. #x0469)	; Ñ©
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER BIG YUS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x046A)	; Ѫ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER BIG YUS")
       (=ucs		  . #x046B)	; Ñ«
       ))
-    (=ucs		. #x046A)	; Ѫ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER BIG YUS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x046B)	; Ñ«
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER BIG YUS")
       (=ucs		  . #x046A)	; Ѫ
       ))
-    (=ucs		. #x046B)	; Ñ«
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER IOTIFIED BIG YUS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x046C)	; Ѭ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER IOTIFIED BIG YUS")
       (=ucs		  . #x046D)	; Ñ­
       ))
-    (=ucs		. #x046C)	; Ѭ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER IOTIFIED BIG YUS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x046D)	; Ñ­
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER IOTIFIED BIG YUS")
       (=ucs		  . #x046C)	; Ѭ
       ))
-    (=ucs		. #x046D)	; Ñ­
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER KSI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x046E)	; Ñ®
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER KSI")
       (=ucs		  . #x046F)	; ѯ
       ))
-    (=ucs		. #x046E)	; Ñ®
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER KSI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x046F)	; ѯ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER KSI")
       (=ucs		  . #x046E)	; Ñ®
       ))
-    (=ucs		. #x046F)	; ѯ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER PSI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0470)	; Ñ°
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER PSI")
       (=ucs		  . #x0471)	; ѱ
       ))
-    (=ucs		. #x0470)	; Ñ°
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER PSI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0471)	; ѱ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER PSI")
       (=ucs		  . #x0470)	; Ñ°
       ))
-    (=ucs		. #x0471)	; ѱ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER FITA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0472)	; Ѳ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER FITA")
       (=ucs		  . #x0473)	; ѳ
       ))
-    (=ucs		. #x0472)	; Ѳ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER FITA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0473)	; ѳ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER FITA")
       (=ucs		  . #x0472)	; Ѳ
       ))
-    (=ucs		. #x0473)	; ѳ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER IZHITSA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0474)	; Ñ´
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER IZHITSA")
       (=ucs		  . #x0475)	; ѵ
       ))
-    (=ucs		. #x0474)	; Ñ´
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER IZHITSA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0475)	; ѵ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER IZHITSA")
       (=ucs		  . #x0474)	; Ñ´
       ))
-    (=ucs		. #x0475)	; ѵ
     ))
 (define-char
   '((name . "CYRILLIC CAPITAL LETTER IZHITSA WITH DOUBLE GRAVE ACCENT")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "CYRILLIC SMALL LETTER IZHITSA WITH DOUBLE GRAVE ACCENT")
-      (=ucs		  . #x0477)	; Ñ·
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER IZHITSA")
       (=ucs		  . #x0474)	; Ñ´
@@ -3370,16 +3366,16 @@
       (=ucs		  . #x030F)	; ̏
       ))
     (=ucs		. #x0476)	; Ѷ
+    (->lowercase
+     ((name . "CYRILLIC SMALL LETTER IZHITSA WITH DOUBLE GRAVE ACCENT")
+      (=ucs		  . #x0477)	; Ñ·
+      ))
     ))
 (define-char
   '((name . "CYRILLIC SMALL LETTER IZHITSA WITH DOUBLE GRAVE ACCENT")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "CYRILLIC CAPITAL LETTER IZHITSA WITH DOUBLE GRAVE ACCENT")
-      (=ucs		  . #x0476)	; Ѷ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER IZHITSA")
       (=ucs		  . #x0475)	; ѵ
@@ -3388,116 +3384,120 @@
       (=ucs		  . #x030F)	; ̏
       ))
     (=ucs		. #x0477)	; Ñ·
+    (->uppercase
+     ((name . "CYRILLIC CAPITAL LETTER IZHITSA WITH DOUBLE GRAVE ACCENT")
+      (=ucs		  . #x0476)	; Ѷ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER UK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0478)	; Ѹ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER UK")
       (=ucs		  . #x0479)	; ѹ
       ))
-    (=ucs		. #x0478)	; Ѹ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER UK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0479)	; ѹ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER UK")
       (=ucs		  . #x0478)	; Ѹ
       ))
-    (=ucs		. #x0479)	; ѹ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER ROUND OMEGA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x047A)	; Ѻ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER ROUND OMEGA")
       (=ucs		  . #x047B)	; Ñ»
       ))
-    (=ucs		. #x047A)	; Ѻ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER ROUND OMEGA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x047B)	; Ñ»
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER ROUND OMEGA")
       (=ucs		  . #x047A)	; Ѻ
       ))
-    (=ucs		. #x047B)	; Ñ»
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER OMEGA WITH TITLO")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x047C)	; Ѽ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER OMEGA WITH TITLO")
       (=ucs		  . #x047D)	; ѽ
       ))
-    (=ucs		. #x047C)	; Ѽ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER OMEGA WITH TITLO")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x047D)	; ѽ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER OMEGA WITH TITLO")
       (=ucs		  . #x047C)	; Ѽ
       ))
-    (=ucs		. #x047D)	; ѽ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER OT")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x047E)	; Ѿ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER OT")
       (=ucs		  . #x047F)	; Ñ¿
       ))
-    (=ucs		. #x047E)	; Ѿ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER OT")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x047F)	; Ñ¿
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER OT")
       (=ucs		  . #x047E)	; Ѿ
       ))
-    (=ucs		. #x047F)	; Ñ¿
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER KOPPA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0480)	; Ҁ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER KOPPA")
       (=ucs		  . #x0481)	; ҁ
       ))
-    (=ucs		. #x0480)	; Ҁ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER KOPPA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0481)	; ҁ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER KOPPA")
       (=ucs		  . #x0480)	; Ҁ
       ))
-    (=ucs		. #x0481)	; ҁ
     ))
 (define-char
   '((name		. "CYRILLIC THOUSANDS SIGN")
@@ -3553,286 +3553,286 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x048C)	; Ҍ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER SEMISOFT SIGN")
       (=ucs		  . #x048D)	; ҍ
       ))
-    (=ucs		. #x048C)	; Ҍ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER SEMISOFT SIGN")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x048D)	; ҍ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER SEMISOFT SIGN")
       (=ucs		  . #x048C)	; Ҍ
       ))
-    (=ucs		. #x048D)	; ҍ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER ER WITH TICK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x048E)	; Ҏ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER ER WITH TICK")
       (=ucs		  . #x048F)	; ҏ
       ))
-    (=ucs		. #x048E)	; Ҏ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER ER WITH TICK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x048F)	; ҏ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER ER WITH TICK")
       (=ucs		  . #x048E)	; Ҏ
       ))
-    (=ucs		. #x048F)	; ҏ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER GHE WITH UPTURN")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0490)	; Ґ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER GHE WITH UPTURN")
       (=ucs		  . #x0491)	; ґ
       ))
-    (=ucs		. #x0490)	; Ґ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER GHE WITH UPTURN")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0491)	; ґ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER GHE WITH UPTURN")
       (=ucs		  . #x0490)	; Ґ
       ))
-    (=ucs		. #x0491)	; ґ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER GHE WITH STROKE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0492)	; Ғ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER GHE WITH STROKE")
       (=ucs		  . #x0493)	; ғ
       ))
-    (=ucs		. #x0492)	; Ғ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER GHE WITH STROKE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0493)	; ғ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER GHE WITH STROKE")
       (=ucs		  . #x0492)	; Ғ
       ))
-    (=ucs		. #x0493)	; ғ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER GHE WITH MIDDLE HOOK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0494)	; Ҕ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER GHE WITH MIDDLE HOOK")
       (=ucs		  . #x0495)	; ҕ
       ))
-    (=ucs		. #x0494)	; Ҕ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER GHE WITH MIDDLE HOOK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0495)	; ҕ
     (->uppercase
      ((name . "CYRILLIC CAPITAL LETTER GHE WITH MIDDLE HOOK")
       (=ucs		  . #x0494)	; Ҕ
       ))
-    (=ucs		. #x0495)	; ҕ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER ZHE WITH DESCENDER")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0496)	; Җ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER ZHE WITH DESCENDER")
       (=ucs		  . #x0497)	; җ
       ))
-    (=ucs		. #x0496)	; Җ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER ZHE WITH DESCENDER")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0497)	; җ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER ZHE WITH DESCENDER")
       (=ucs		  . #x0496)	; Җ
       ))
-    (=ucs		. #x0497)	; җ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER ZE WITH DESCENDER")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0498)	; Ҙ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER ZE WITH DESCENDER")
       (=ucs		  . #x0499)	; ҙ
       ))
-    (=ucs		. #x0498)	; Ҙ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER ZE WITH DESCENDER")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0499)	; ҙ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER ZE WITH DESCENDER")
       (=ucs		  . #x0498)	; Ҙ
       ))
-    (=ucs		. #x0499)	; ҙ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER KA WITH DESCENDER")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x049A)	; Қ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER KA WITH DESCENDER")
       (=ucs		  . #x049B)	; қ
       ))
-    (=ucs		. #x049A)	; Қ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER KA WITH DESCENDER")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x049B)	; қ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER KA WITH DESCENDER")
       (=ucs		  . #x049A)	; Қ
       ))
-    (=ucs		. #x049B)	; қ
     ))
 (define-char
   '((name . "CYRILLIC CAPITAL LETTER KA WITH VERTICAL STROKE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x049C)	; Ҝ
     (->lowercase
      ((name . "CYRILLIC SMALL LETTER KA WITH VERTICAL STROKE")
       (=ucs		  . #x049D)	; ҝ
       ))
-    (=ucs		. #x049C)	; Ҝ
     ))
 (define-char
   '((name . "CYRILLIC SMALL LETTER KA WITH VERTICAL STROKE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x049D)	; ҝ
     (->uppercase
      ((name . "CYRILLIC CAPITAL LETTER KA WITH VERTICAL STROKE")
       (=ucs		  . #x049C)	; Ҝ
       ))
-    (=ucs		. #x049D)	; ҝ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER KA WITH STROKE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x049E)	; Ҟ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER KA WITH STROKE")
       (=ucs		  . #x049F)	; ҟ
       ))
-    (=ucs		. #x049E)	; Ҟ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER KA WITH STROKE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x049F)	; ҟ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER KA WITH STROKE")
       (=ucs		  . #x049E)	; Ҟ
       ))
-    (=ucs		. #x049F)	; ҟ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER BASHKIR KA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04A0)	; Ò 
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER BASHKIR KA")
       (=ucs		  . #x04A1)	; Ò¡
       ))
-    (=ucs		. #x04A0)	; Ò 
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER BASHKIR KA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04A1)	; Ò¡
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER BASHKIR KA")
       (=ucs		  . #x04A0)	; Ò 
       ))
-    (=ucs		. #x04A1)	; Ò¡
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER EN WITH DESCENDER")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04A2)	; Ò¢
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER EN WITH DESCENDER")
       (=ucs		  . #x04A3)	; Ò£
       ))
-    (=ucs		. #x04A2)	; Ò¢
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER EN WITH DESCENDER")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04A3)	; Ò£
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER EN WITH DESCENDER")
       (=ucs		  . #x04A2)	; Ò¢
       ))
-    (=ucs		. #x04A3)	; Ò£
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LIGATURE EN GHE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04A4)	; Ò¤
     (->lowercase
      ((name		  . "CYRILLIC SMALL LIGATURE EN GHE")
       (=ucs		  . #x04A5)	; Ò¥
       ))
-    (=ucs		. #x04A4)	; Ò¤
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LIGATURE EN GHE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04A5)	; Ò¥
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LIGATURE EN GHE")
       (=ucs		  . #x04A4)	; Ò¤
       ))
-    (=ucs		. #x04A5)	; Ò¥
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER PE WITH MIDDLE HOOK")
@@ -3840,11 +3840,11 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Abkhasian")
+    (=ucs		. #x04A6)	; Ò¦
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER PE WITH MIDDLE HOOK")
       (=ucs		  . #x04A7)	; Ò§
       ))
-    (=ucs		. #x04A6)	; Ò¦
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER PE WITH MIDDLE HOOK")
@@ -3852,143 +3852,143 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Abkhasian")
+    (=ucs		. #x04A7)	; Ò§
     (->uppercase
      ((name . "CYRILLIC CAPITAL LETTER PE WITH MIDDLE HOOK")
       (=ucs		  . #x04A6)	; Ò¦
       ))
-    (=ucs		. #x04A7)	; Ò§
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER ABKHASIAN HA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04A8)	; Ò¨
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER ABKHASIAN HA")
       (=ucs		  . #x04A9)	; Ò©
       ))
-    (=ucs		. #x04A8)	; Ò¨
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER ABKHASIAN HA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04A9)	; Ò©
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER ABKHASIAN HA")
       (=ucs		  . #x04A8)	; Ò¨
       ))
-    (=ucs		. #x04A9)	; Ò©
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER ES WITH DESCENDER")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04AA)	; Òª
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER ES WITH DESCENDER")
       (=ucs		  . #x04AB)	; Ò«
       ))
-    (=ucs		. #x04AA)	; Òª
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER ES WITH DESCENDER")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04AB)	; Ò«
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER ES WITH DESCENDER")
       (=ucs		  . #x04AA)	; Òª
       ))
-    (=ucs		. #x04AB)	; Ò«
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER TE WITH DESCENDER")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04AC)	; Ò¬
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER TE WITH DESCENDER")
       (=ucs		  . #x04AD)	; Ò­
       ))
-    (=ucs		. #x04AC)	; Ò¬
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER TE WITH DESCENDER")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04AD)	; Ò­
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER TE WITH DESCENDER")
       (=ucs		  . #x04AC)	; Ò¬
       ))
-    (=ucs		. #x04AD)	; Ò­
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER STRAIGHT U")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04AE)	; Ò®
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER STRAIGHT U")
       (=ucs		  . #x04AF)	; Ò¯
       ))
-    (=ucs		. #x04AE)	; Ò®
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER STRAIGHT U")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04AF)	; Ò¯
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER STRAIGHT U")
       (=ucs		  . #x04AE)	; Ò®
       ))
-    (=ucs		. #x04AF)	; Ò¯
     ))
 (define-char
   '((name . "CYRILLIC CAPITAL LETTER STRAIGHT U WITH STROKE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04B0)	; Ò°
     (->lowercase
      ((name . "CYRILLIC SMALL LETTER STRAIGHT U WITH STROKE")
       (=ucs		  . #x04B1)	; Ò±
       ))
-    (=ucs		. #x04B0)	; Ò°
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER STRAIGHT U WITH STROKE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04B1)	; Ò±
     (->uppercase
      ((name . "CYRILLIC CAPITAL LETTER STRAIGHT U WITH STROKE")
       (=ucs		  . #x04B0)	; Ò°
       ))
-    (=ucs		. #x04B1)	; Ò±
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER HA WITH DESCENDER")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04B2)	; Ò²
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER HA WITH DESCENDER")
       (=ucs		  . #x04B3)	; Ò³
       ))
-    (=ucs		. #x04B2)	; Ò²
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER HA WITH DESCENDER")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04B3)	; Ò³
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER HA WITH DESCENDER")
       (=ucs		  . #x04B2)	; Ò²
       ))
-    (=ucs		. #x04B3)	; Ò³
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LIGATURE TE TSE")
@@ -3996,11 +3996,11 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Abkhasian")
+    (=ucs		. #x04B4)	; Ò´
     (->lowercase
      ((name		  . "CYRILLIC SMALL LIGATURE TE TSE")
       (=ucs		  . #x04B5)	; Òµ
       ))
-    (=ucs		. #x04B4)	; Ò´
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LIGATURE TE TSE")
@@ -4008,121 +4008,121 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Abkhasian")
+    (=ucs		. #x04B5)	; Òµ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LIGATURE TE TSE")
       (=ucs		  . #x04B4)	; Ò´
       ))
-    (=ucs		. #x04B5)	; Òµ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER CHE WITH DESCENDER")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04B6)	; Ò¶
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER CHE WITH DESCENDER")
       (=ucs		  . #x04B7)	; Ò·
       ))
-    (=ucs		. #x04B6)	; Ò¶
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER CHE WITH DESCENDER")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04B7)	; Ò·
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER CHE WITH DESCENDER")
       (=ucs		  . #x04B6)	; Ò¶
       ))
-    (=ucs		. #x04B7)	; Ò·
     ))
 (define-char
   '((name . "CYRILLIC CAPITAL LETTER CHE WITH VERTICAL STROKE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04B8)	; Ò¸
     (->lowercase
      ((name . "CYRILLIC SMALL LETTER CHE WITH VERTICAL STROKE")
       (=ucs		  . #x04B9)	; Ò¹
       ))
-    (=ucs		. #x04B8)	; Ò¸
     ))
 (define-char
   '((name . "CYRILLIC SMALL LETTER CHE WITH VERTICAL STROKE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04B9)	; Ò¹
     (->uppercase
      ((name . "CYRILLIC CAPITAL LETTER CHE WITH VERTICAL STROKE")
       (=ucs		  . #x04B8)	; Ò¸
       ))
-    (=ucs		. #x04B9)	; Ò¹
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER SHHA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04BA)	; Òº
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER SHHA")
       (=ucs		  . #x04BB)	; Ò»
       ))
-    (=ucs		. #x04BA)	; Òº
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER SHHA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04BB)	; Ò»
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER SHHA")
       (=ucs		  . #x04BA)	; Òº
       ))
-    (=ucs		. #x04BB)	; Ò»
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER ABKHASIAN CHE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04BC)	; Ò¼
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER ABKHASIAN CHE")
       (=ucs		  . #x04BD)	; Ò½
       ))
-    (=ucs		. #x04BC)	; Ò¼
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER ABKHASIAN CHE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04BD)	; Ò½
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER ABKHASIAN CHE")
       (=ucs		  . #x04BC)	; Ò¼
       ))
-    (=ucs		. #x04BD)	; Ò½
     ))
 (define-char
   '((name . "CYRILLIC CAPITAL LETTER ABKHASIAN CHE WITH DESCENDER")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04BE)	; Ò¾
     (->lowercase
      ((name . "CYRILLIC SMALL LETTER ABKHASIAN CHE WITH DESCENDER")
       (=ucs		  . #x04BF)	; Ò¿
       ))
-    (=ucs		. #x04BE)	; Ò¾
     ))
 (define-char
   '((name . "CYRILLIC SMALL LETTER ABKHASIAN CHE WITH DESCENDER")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04BF)	; Ò¿
     (->uppercase
      ((name . "CYRILLIC CAPITAL LETTER ABKHASIAN CHE WITH DESCENDER")
       (=ucs		  . #x04BE)	; Ò¾
       ))
-    (=ucs		. #x04BF)	; Ò¿
     ))
 (define-char
   '((name		. "CYRILLIC LETTER PALOCHKA")
@@ -4136,10 +4136,6 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER ZHE WITH BREVE")
-      (=ucs		  . #x04C2)	; ӂ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER ZHE")
       (=ucs		  . #x0416)	; Ж
@@ -4148,16 +4144,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x04C1)	; Ӂ
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER ZHE WITH BREVE")
+      (=ucs		  . #x04C2)	; ӂ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER ZHE WITH BREVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER ZHE WITH BREVE")
-      (=ucs		  . #x04C1)	; Ӂ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER ZHE")
       (=ucs		  . #x0436)	; ж
@@ -4166,82 +4162,82 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x04C2)	; ӂ
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER ZHE WITH BREVE")
+      (=ucs		  . #x04C1)	; Ӂ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER KA WITH HOOK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04C3)	; Ӄ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER KA WITH HOOK")
       (=ucs		  . #x04C4)	; ӄ
       ))
-    (=ucs		. #x04C3)	; Ӄ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER KA WITH HOOK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04C4)	; ӄ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER KA WITH HOOK")
       (=ucs		  . #x04C3)	; Ӄ
       ))
-    (=ucs		. #x04C4)	; ӄ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER EN WITH HOOK")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04C7)	; Ӈ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER EN WITH HOOK")
       (=ucs		  . #x04C8)	; ӈ
       ))
-    (=ucs		. #x04C7)	; Ӈ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER EN WITH HOOK")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04C8)	; ӈ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER EN WITH HOOK")
       (=ucs		  . #x04C7)	; Ӈ
       ))
-    (=ucs		. #x04C8)	; ӈ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER KHAKASSIAN CHE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04CB)	; Ӌ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER KHAKASSIAN CHE")
       (=ucs		  . #x04CC)	; ӌ
       ))
-    (=ucs		. #x04CB)	; Ӌ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER KHAKASSIAN CHE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04CC)	; ӌ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER KHAKASSIAN CHE")
       (=ucs		  . #x04CB)	; Ӌ
       ))
-    (=ucs		. #x04CC)	; ӌ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER A WITH BREVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER A WITH BREVE")
-      (=ucs		  . #x04D1)	; ӑ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER A")
       (=ucs		  . #x0410)	; А
@@ -4250,16 +4246,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x04D0)	; Ӑ
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER A WITH BREVE")
+      (=ucs		  . #x04D1)	; ӑ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER A WITH BREVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER A WITH BREVE")
-      (=ucs		  . #x04D0)	; Ӑ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER A")
       (=ucs		  . #x0430)	; а
@@ -4268,16 +4264,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x04D1)	; ӑ
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER A WITH BREVE")
+      (=ucs		  . #x04D0)	; Ӑ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER A WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER A WITH DIAERESIS")
-      (=ucs		  . #x04D3)	; ӓ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER A")
       (=ucs		  . #x0410)	; А
@@ -4286,16 +4282,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04D2)	; Ӓ
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER A WITH DIAERESIS")
+      (=ucs		  . #x04D3)	; ӓ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER A WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER A WITH DIAERESIS")
-      (=ucs		  . #x04D2)	; Ӓ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER A")
       (=ucs		  . #x0430)	; а
@@ -4304,38 +4300,38 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04D3)	; ӓ
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER A WITH DIAERESIS")
+      (=ucs		  . #x04D2)	; Ӓ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LIGATURE A IE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04D4)	; Ӕ
     (->lowercase
      ((name		  . "CYRILLIC SMALL LIGATURE A IE")
       (=ucs		  . #x04D5)	; ӕ
       ))
-    (=ucs		. #x04D4)	; Ӕ
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LIGATURE A IE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04D5)	; ӕ
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LIGATURE A IE")
       (=ucs		  . #x04D4)	; Ӕ
       ))
-    (=ucs		. #x04D5)	; ӕ
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER IE WITH BREVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER IE WITH BREVE")
-      (=ucs		  . #x04D7)	; ӗ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER IE")
       (=ucs		  . #x0415)	; Е
@@ -4344,16 +4340,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x04D6)	; Ӗ
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER IE WITH BREVE")
+      (=ucs		  . #x04D7)	; ӗ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER IE WITH BREVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER IE WITH BREVE")
-      (=ucs		  . #x04D6)	; Ӗ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER IE")
       (=ucs		  . #x0435)	; е
@@ -4362,38 +4358,38 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x04D7)	; ӗ
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER IE WITH BREVE")
+      (=ucs		  . #x04D6)	; Ӗ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER SCHWA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04D8)	; Ә
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER SCHWA")
       (=ucs		  . #x04D9)	; ә
       ))
-    (=ucs		. #x04D8)	; Ә
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER SCHWA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04D9)	; ә
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER SCHWA")
       (=ucs		  . #x04D8)	; Ә
       ))
-    (=ucs		. #x04D9)	; ә
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER SCHWA WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER SCHWA WITH DIAERESIS")
-      (=ucs		  . #x04DB)	; ӛ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER SCHWA")
       (=ucs		  . #x04D8)	; Ә
@@ -4402,16 +4398,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04DA)	; Ӛ
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER SCHWA WITH DIAERESIS")
+      (=ucs		  . #x04DB)	; ӛ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER SCHWA WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "CYRILLIC CAPITAL LETTER SCHWA WITH DIAERESIS")
-      (=ucs		  . #x04DA)	; Ӛ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER SCHWA")
       (=ucs		  . #x04D9)	; ә
@@ -4420,16 +4416,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04DB)	; ӛ
+    (->uppercase
+     ((name . "CYRILLIC CAPITAL LETTER SCHWA WITH DIAERESIS")
+      (=ucs		  . #x04DA)	; Ӛ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER ZHE WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER ZHE WITH DIAERESIS")
-      (=ucs		  . #x04DD)	; ӝ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER ZHE")
       (=ucs		  . #x0416)	; Ж
@@ -4438,16 +4434,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04DC)	; Ӝ
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER ZHE WITH DIAERESIS")
+      (=ucs		  . #x04DD)	; ӝ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER ZHE WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER ZHE WITH DIAERESIS")
-      (=ucs		  . #x04DC)	; Ӝ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER ZHE")
       (=ucs		  . #x0436)	; ж
@@ -4456,16 +4452,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04DD)	; ӝ
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER ZHE WITH DIAERESIS")
+      (=ucs		  . #x04DC)	; Ӝ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER ZE WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER ZE WITH DIAERESIS")
-      (=ucs		  . #x04DF)	; ӟ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER ZE")
       (=ucs		  . #x0417)	; З
@@ -4474,16 +4470,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04DE)	; Ӟ
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER ZE WITH DIAERESIS")
+      (=ucs		  . #x04DF)	; ӟ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER ZE WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER ZE WITH DIAERESIS")
-      (=ucs		  . #x04DE)	; Ӟ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER ZE")
       (=ucs		  . #x0437)	; з
@@ -4492,38 +4488,38 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04DF)	; ӟ
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER ZE WITH DIAERESIS")
+      (=ucs		  . #x04DE)	; Ӟ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER ABKHASIAN DZE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04E0)	; Ó 
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER ABKHASIAN DZE")
       (=ucs		  . #x04E1)	; Ó¡
       ))
-    (=ucs		. #x04E0)	; Ó 
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER ABKHASIAN DZE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04E1)	; Ó¡
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER ABKHASIAN DZE")
       (=ucs		  . #x04E0)	; Ó 
       ))
-    (=ucs		. #x04E1)	; Ó¡
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER I WITH MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER I WITH MACRON")
-      (=ucs		  . #x04E3)	; Ó£
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER I")
       (=ucs		  . #x0418)	; И
@@ -4532,16 +4528,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x04E2)	; Ó¢
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER I WITH MACRON")
+      (=ucs		  . #x04E3)	; Ó£
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER I WITH MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER I WITH MACRON")
-      (=ucs		  . #x04E2)	; Ó¢
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER I")
       (=ucs		  . #x0438)	; и
@@ -4550,16 +4546,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x04E3)	; Ó£
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER I WITH MACRON")
+      (=ucs		  . #x04E2)	; Ó¢
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER I WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER I WITH DIAERESIS")
-      (=ucs		  . #x04E5)	; Ó¥
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER I")
       (=ucs		  . #x0418)	; И
@@ -4568,16 +4564,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04E4)	; Ó¤
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER I WITH DIAERESIS")
+      (=ucs		  . #x04E5)	; Ó¥
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER I WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER I WITH DIAERESIS")
-      (=ucs		  . #x04E4)	; Ó¤
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER I")
       (=ucs		  . #x0438)	; и
@@ -4586,16 +4582,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04E5)	; Ó¥
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER I WITH DIAERESIS")
+      (=ucs		  . #x04E4)	; Ó¤
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER O WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER O WITH DIAERESIS")
-      (=ucs		  . #x04E7)	; Ó§
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER O")
       (=ucs		  . #x041E)	; О
@@ -4604,16 +4600,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04E6)	; Ó¦
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER O WITH DIAERESIS")
+      (=ucs		  . #x04E7)	; Ó§
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER O WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER O WITH DIAERESIS")
-      (=ucs		  . #x04E6)	; Ó¦
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER O")
       (=ucs		  . #x043E)	; о
@@ -4622,38 +4618,38 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04E7)	; Ó§
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER O WITH DIAERESIS")
+      (=ucs		  . #x04E6)	; Ó¦
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER BARRED O")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04E8)	; Ó¨
     (->lowercase
      ((name		  . "CYRILLIC SMALL LETTER BARRED O")
       (=ucs		  . #x04E9)	; Ó©
       ))
-    (=ucs		. #x04E8)	; Ó¨
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER BARRED O")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x04E9)	; Ó©
     (->uppercase
      ((name		  . "CYRILLIC CAPITAL LETTER BARRED O")
       (=ucs		  . #x04E8)	; Ó¨
       ))
-    (=ucs		. #x04E9)	; Ó©
     ))
 (define-char
   '((name . "CYRILLIC CAPITAL LETTER BARRED O WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "CYRILLIC SMALL LETTER BARRED O WITH DIAERESIS")
-      (=ucs		  . #x04EB)	; Ó«
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER BARRED O")
       (=ucs		  . #x04E8)	; Ó¨
@@ -4662,16 +4658,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04EA)	; Óª
+    (->lowercase
+     ((name . "CYRILLIC SMALL LETTER BARRED O WITH DIAERESIS")
+      (=ucs		  . #x04EB)	; Ó«
+      ))
     ))
 (define-char
   '((name . "CYRILLIC SMALL LETTER BARRED O WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "CYRILLIC CAPITAL LETTER BARRED O WITH DIAERESIS")
-      (=ucs		  . #x04EA)	; Óª
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER BARRED O")
       (=ucs		  . #x04E9)	; Ó©
@@ -4680,16 +4676,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04EB)	; Ó«
+    (->uppercase
+     ((name . "CYRILLIC CAPITAL LETTER BARRED O WITH DIAERESIS")
+      (=ucs		  . #x04EA)	; Óª
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER E WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER E WITH DIAERESIS")
-      (=ucs		  . #x04ED)	; Ó­
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER E")
       (=ucs		  . #x042D)	; Э
@@ -4698,16 +4694,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04EC)	; Ó¬
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER E WITH DIAERESIS")
+      (=ucs		  . #x04ED)	; Ó­
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER E WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER E WITH DIAERESIS")
-      (=ucs		  . #x04EC)	; Ó¬
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER E")
       (=ucs		  . #x044D)	; э
@@ -4716,16 +4712,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04ED)	; Ó­
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER E WITH DIAERESIS")
+      (=ucs		  . #x04EC)	; Ó¬
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER U WITH MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER U WITH MACRON")
-      (=ucs		  . #x04EF)	; Ó¯
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER U")
       (=ucs		  . #x0423)	; У
@@ -4734,16 +4730,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x04EE)	; Ó®
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER U WITH MACRON")
+      (=ucs		  . #x04EF)	; Ó¯
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER U WITH MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER U WITH MACRON")
-      (=ucs		  . #x04EE)	; Ó®
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER U")
       (=ucs		  . #x0443)	; у
@@ -4752,16 +4748,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x04EF)	; Ó¯
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER U WITH MACRON")
+      (=ucs		  . #x04EE)	; Ó®
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER U WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER U WITH DIAERESIS")
-      (=ucs		  . #x04F1)	; Ó±
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER U")
       (=ucs		  . #x0423)	; У
@@ -4770,16 +4766,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04F0)	; Ó°
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER U WITH DIAERESIS")
+      (=ucs		  . #x04F1)	; Ó±
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER U WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER U WITH DIAERESIS")
-      (=ucs		  . #x04F0)	; Ó°
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER U")
       (=ucs		  . #x0443)	; у
@@ -4788,16 +4784,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04F1)	; Ó±
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER U WITH DIAERESIS")
+      (=ucs		  . #x04F0)	; Ó°
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER U WITH DOUBLE ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER U WITH DOUBLE ACUTE")
-      (=ucs		  . #x04F3)	; Ó³
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER U")
       (=ucs		  . #x0423)	; У
@@ -4806,16 +4802,16 @@
       (=ucs		  . #x030B)	; ̋
       ))
     (=ucs		. #x04F2)	; Ó²
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER U WITH DOUBLE ACUTE")
+      (=ucs		  . #x04F3)	; Ó³
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER U WITH DOUBLE ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "CYRILLIC CAPITAL LETTER U WITH DOUBLE ACUTE")
-      (=ucs		  . #x04F2)	; Ó²
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER U")
       (=ucs		  . #x0443)	; у
@@ -4824,16 +4820,16 @@
       (=ucs		  . #x030B)	; ̋
       ))
     (=ucs		. #x04F3)	; Ó³
+    (->uppercase
+     ((name . "CYRILLIC CAPITAL LETTER U WITH DOUBLE ACUTE")
+      (=ucs		  . #x04F2)	; Ó²
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER CHE WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER CHE WITH DIAERESIS")
-      (=ucs		  . #x04F5)	; Óµ
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER CHE")
       (=ucs		  . #x0427)	; Ч
@@ -4842,16 +4838,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04F4)	; Ó´
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER CHE WITH DIAERESIS")
+      (=ucs		  . #x04F5)	; Óµ
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER CHE WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "CYRILLIC CAPITAL LETTER CHE WITH DIAERESIS")
-      (=ucs		  . #x04F4)	; Ó´
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER CHE")
       (=ucs		  . #x0447)	; ч
@@ -4860,16 +4856,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04F5)	; Óµ
+    (->uppercase
+     ((name		  . "CYRILLIC CAPITAL LETTER CHE WITH DIAERESIS")
+      (=ucs		  . #x04F4)	; Ó´
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC CAPITAL LETTER YERU WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "CYRILLIC SMALL LETTER YERU WITH DIAERESIS")
-      (=ucs		  . #x04F9)	; Ó¹
-      ))
     (=decomposition
      ((name		  . "CYRILLIC CAPITAL LETTER YERU")
       (=ucs		  . #x042B)	; Ы
@@ -4878,16 +4874,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04F8)	; Ó¸
+    (->lowercase
+     ((name		  . "CYRILLIC SMALL LETTER YERU WITH DIAERESIS")
+      (=ucs		  . #x04F9)	; Ó¹
+      ))
     ))
 (define-char
   '((name		. "CYRILLIC SMALL LETTER YERU WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "CYRILLIC CAPITAL LETTER YERU WITH DIAERESIS")
-      (=ucs		  . #x04F8)	; Ó¸
-      ))
     (=decomposition
      ((name		  . "CYRILLIC SMALL LETTER YERU")
       (=ucs		  . #x044B)	; ы
@@ -4896,4 +4892,8 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x04F9)	; Ó¹
+    (->uppercase
+     ((name . "CYRILLIC CAPITAL LETTER YERU WITH DIAERESIS")
+      (=ucs		  . #x04F8)	; Ó¸
+      ))
     ))
diff --git a/lisp/utf-2000/u00530-Armenian.el b/lisp/utf-2000/u00530-Armenian.el
index 4c4141c..529d7f8 100644
--- a/lisp/utf-2000/u00530-Armenian.el
+++ b/lisp/utf-2000/u00530-Armenian.el
@@ -4,418 +4,418 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0531)	; Ô±
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER AYB")
       (=ucs		  . #x0561)	; Õ¡
       ))
-    (=ucs		. #x0531)	; Ô±
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER BEN")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0532)	; Ô²
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER BEN")
       (=ucs		  . #x0562)	; Õ¢
       ))
-    (=ucs		. #x0532)	; Ô²
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER GIM")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0533)	; Ô³
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER GIM")
       (=ucs		  . #x0563)	; Õ£
       ))
-    (=ucs		. #x0533)	; Ô³
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER DA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0534)	; Ô´
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER DA")
       (=ucs		  . #x0564)	; Õ¤
       ))
-    (=ucs		. #x0534)	; Ô´
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER ECH")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0535)	; Ôµ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER ECH")
       (=ucs		  . #x0565)	; Õ¥
       ))
-    (=ucs		. #x0535)	; Ôµ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER ZA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0536)	; Ô¶
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER ZA")
       (=ucs		  . #x0566)	; Õ¦
       ))
-    (=ucs		. #x0536)	; Ô¶
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER EH")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0537)	; Ô·
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER EH")
       (=ucs		  . #x0567)	; Õ§
       ))
-    (=ucs		. #x0537)	; Ô·
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER ET")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0538)	; Ô¸
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER ET")
       (=ucs		  . #x0568)	; Õ¨
       ))
-    (=ucs		. #x0538)	; Ô¸
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER TO")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0539)	; Ô¹
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER TO")
       (=ucs		  . #x0569)	; Õ©
       ))
-    (=ucs		. #x0539)	; Ô¹
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER ZHE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x053A)	; Ôº
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER ZHE")
       (=ucs		  . #x056A)	; Õª
       ))
-    (=ucs		. #x053A)	; Ôº
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER INI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x053B)	; Ô»
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER INI")
       (=ucs		  . #x056B)	; Õ«
       ))
-    (=ucs		. #x053B)	; Ô»
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER LIWN")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x053C)	; Ô¼
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER LIWN")
       (=ucs		  . #x056C)	; Õ¬
       ))
-    (=ucs		. #x053C)	; Ô¼
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER XEH")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x053D)	; Ô½
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER XEH")
       (=ucs		  . #x056D)	; Õ­
       ))
-    (=ucs		. #x053D)	; Ô½
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER CA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x053E)	; Ô¾
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER CA")
       (=ucs		  . #x056E)	; Õ®
       ))
-    (=ucs		. #x053E)	; Ô¾
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER KEN")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x053F)	; Ô¿
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER KEN")
       (=ucs		  . #x056F)	; Õ¯
       ))
-    (=ucs		. #x053F)	; Ô¿
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER HO")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0540)	; Հ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER HO")
       (=ucs		  . #x0570)	; Õ°
       ))
-    (=ucs		. #x0540)	; Հ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER JA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0541)	; Ձ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER JA")
       (=ucs		  . #x0571)	; Õ±
       ))
-    (=ucs		. #x0541)	; Ձ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER GHAD")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0542)	; Ղ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER GHAD")
       (=ucs		  . #x0572)	; Õ²
       ))
-    (=ucs		. #x0542)	; Ղ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER CHEH")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0543)	; Ճ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER CHEH")
       (=ucs		  . #x0573)	; Õ³
       ))
-    (=ucs		. #x0543)	; Ճ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER MEN")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0544)	; Մ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER MEN")
       (=ucs		  . #x0574)	; Õ´
       ))
-    (=ucs		. #x0544)	; Մ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER YI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0545)	; Յ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER YI")
       (=ucs		  . #x0575)	; Õµ
       ))
-    (=ucs		. #x0545)	; Յ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER NOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0546)	; Ն
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER NOW")
       (=ucs		  . #x0576)	; Õ¶
       ))
-    (=ucs		. #x0546)	; Ն
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER SHA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0547)	; Շ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER SHA")
       (=ucs		  . #x0577)	; Õ·
       ))
-    (=ucs		. #x0547)	; Շ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER VO")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0548)	; Ո
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER VO")
       (=ucs		  . #x0578)	; Õ¸
       ))
-    (=ucs		. #x0548)	; Ո
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER CHA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0549)	; Չ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER CHA")
       (=ucs		  . #x0579)	; Õ¹
       ))
-    (=ucs		. #x0549)	; Չ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER PEH")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x054A)	; Պ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER PEH")
       (=ucs		  . #x057A)	; Õº
       ))
-    (=ucs		. #x054A)	; Պ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER JHEH")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x054B)	; Ջ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER JHEH")
       (=ucs		  . #x057B)	; Õ»
       ))
-    (=ucs		. #x054B)	; Ջ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER RA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x054C)	; Ռ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER RA")
       (=ucs		  . #x057C)	; Õ¼
       ))
-    (=ucs		. #x054C)	; Ռ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER SEH")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x054D)	; Ս
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER SEH")
       (=ucs		  . #x057D)	; Õ½
       ))
-    (=ucs		. #x054D)	; Ս
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER VEW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x054E)	; Վ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER VEW")
       (=ucs		  . #x057E)	; Õ¾
       ))
-    (=ucs		. #x054E)	; Վ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER TIWN")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x054F)	; Տ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER TIWN")
       (=ucs		  . #x057F)	; Õ¿
       ))
-    (=ucs		. #x054F)	; Տ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER REH")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0550)	; Ր
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER REH")
       (=ucs		  . #x0580)	; ր
       ))
-    (=ucs		. #x0550)	; Ր
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER CO")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0551)	; Ց
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER CO")
       (=ucs		  . #x0581)	; ց
       ))
-    (=ucs		. #x0551)	; Ց
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER YIWN")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0552)	; Ւ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER YIWN")
       (=ucs		  . #x0582)	; ւ
       ))
-    (=ucs		. #x0552)	; Ւ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER PIWR")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0553)	; Փ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER PIWR")
       (=ucs		  . #x0583)	; փ
       ))
-    (=ucs		. #x0553)	; Փ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER KEH")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0554)	; Ք
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER KEH")
       (=ucs		  . #x0584)	; ք
       ))
-    (=ucs		. #x0554)	; Ք
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER OH")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0555)	; Օ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER OH")
       (=ucs		  . #x0585)	; օ
       ))
-    (=ucs		. #x0555)	; Օ
     ))
 (define-char
   '((name		. "ARMENIAN CAPITAL LETTER FEH")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0556)	; Ֆ
     (->lowercase
      ((name		  . "ARMENIAN SMALL LETTER FEH")
       (=ucs		  . #x0586)	; ֆ
       ))
-    (=ucs		. #x0556)	; Ֆ
     ))
 (define-char
   '((name		. "ARMENIAN MODIFIER LETTER LEFT HALF RING")
@@ -471,418 +471,418 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0561)	; Õ¡
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER AYB")
       (=ucs		  . #x0531)	; Ô±
       ))
-    (=ucs		. #x0561)	; Õ¡
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER BEN")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0562)	; Õ¢
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER BEN")
       (=ucs		  . #x0532)	; Ô²
       ))
-    (=ucs		. #x0562)	; Õ¢
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER GIM")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0563)	; Õ£
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER GIM")
       (=ucs		  . #x0533)	; Ô³
       ))
-    (=ucs		. #x0563)	; Õ£
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER DA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0564)	; Õ¤
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER DA")
       (=ucs		  . #x0534)	; Ô´
       ))
-    (=ucs		. #x0564)	; Õ¤
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER ECH")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0565)	; Õ¥
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER ECH")
       (=ucs		  . #x0535)	; Ôµ
       ))
-    (=ucs		. #x0565)	; Õ¥
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER ZA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0566)	; Õ¦
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER ZA")
       (=ucs		  . #x0536)	; Ô¶
       ))
-    (=ucs		. #x0566)	; Õ¦
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER EH")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0567)	; Õ§
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER EH")
       (=ucs		  . #x0537)	; Ô·
       ))
-    (=ucs		. #x0567)	; Õ§
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER ET")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0568)	; Õ¨
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER ET")
       (=ucs		  . #x0538)	; Ô¸
       ))
-    (=ucs		. #x0568)	; Õ¨
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER TO")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0569)	; Õ©
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER TO")
       (=ucs		  . #x0539)	; Ô¹
       ))
-    (=ucs		. #x0569)	; Õ©
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER ZHE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x056A)	; Õª
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER ZHE")
       (=ucs		  . #x053A)	; Ôº
       ))
-    (=ucs		. #x056A)	; Õª
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER INI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x056B)	; Õ«
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER INI")
       (=ucs		  . #x053B)	; Ô»
       ))
-    (=ucs		. #x056B)	; Õ«
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER LIWN")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x056C)	; Õ¬
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER LIWN")
       (=ucs		  . #x053C)	; Ô¼
       ))
-    (=ucs		. #x056C)	; Õ¬
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER XEH")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x056D)	; Õ­
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER XEH")
       (=ucs		  . #x053D)	; Ô½
       ))
-    (=ucs		. #x056D)	; Õ­
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER CA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x056E)	; Õ®
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER CA")
       (=ucs		  . #x053E)	; Ô¾
       ))
-    (=ucs		. #x056E)	; Õ®
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER KEN")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x056F)	; Õ¯
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER KEN")
       (=ucs		  . #x053F)	; Ô¿
       ))
-    (=ucs		. #x056F)	; Õ¯
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER HO")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0570)	; Õ°
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER HO")
       (=ucs		  . #x0540)	; Հ
       ))
-    (=ucs		. #x0570)	; Õ°
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER JA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0571)	; Õ±
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER JA")
       (=ucs		  . #x0541)	; Ձ
       ))
-    (=ucs		. #x0571)	; Õ±
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER GHAD")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0572)	; Õ²
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER GHAD")
       (=ucs		  . #x0542)	; Ղ
       ))
-    (=ucs		. #x0572)	; Õ²
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER CHEH")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0573)	; Õ³
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER CHEH")
       (=ucs		  . #x0543)	; Ճ
       ))
-    (=ucs		. #x0573)	; Õ³
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER MEN")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0574)	; Õ´
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER MEN")
       (=ucs		  . #x0544)	; Մ
       ))
-    (=ucs		. #x0574)	; Õ´
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER YI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0575)	; Õµ
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER YI")
       (=ucs		  . #x0545)	; Յ
       ))
-    (=ucs		. #x0575)	; Õµ
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER NOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0576)	; Õ¶
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER NOW")
       (=ucs		  . #x0546)	; Ն
       ))
-    (=ucs		. #x0576)	; Õ¶
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER SHA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0577)	; Õ·
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER SHA")
       (=ucs		  . #x0547)	; Շ
       ))
-    (=ucs		. #x0577)	; Õ·
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER VO")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0578)	; Õ¸
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER VO")
       (=ucs		  . #x0548)	; Ո
       ))
-    (=ucs		. #x0578)	; Õ¸
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER CHA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0579)	; Õ¹
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER CHA")
       (=ucs		  . #x0549)	; Չ
       ))
-    (=ucs		. #x0579)	; Õ¹
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER PEH")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x057A)	; Õº
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER PEH")
       (=ucs		  . #x054A)	; Պ
       ))
-    (=ucs		. #x057A)	; Õº
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER JHEH")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x057B)	; Õ»
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER JHEH")
       (=ucs		  . #x054B)	; Ջ
       ))
-    (=ucs		. #x057B)	; Õ»
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER RA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x057C)	; Õ¼
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER RA")
       (=ucs		  . #x054C)	; Ռ
       ))
-    (=ucs		. #x057C)	; Õ¼
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER SEH")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x057D)	; Õ½
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER SEH")
       (=ucs		  . #x054D)	; Ս
       ))
-    (=ucs		. #x057D)	; Õ½
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER VEW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x057E)	; Õ¾
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER VEW")
       (=ucs		  . #x054E)	; Վ
       ))
-    (=ucs		. #x057E)	; Õ¾
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER TIWN")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x057F)	; Õ¿
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER TIWN")
       (=ucs		  . #x054F)	; Տ
       ))
-    (=ucs		. #x057F)	; Õ¿
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER REH")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0580)	; ր
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER REH")
       (=ucs		  . #x0550)	; Ր
       ))
-    (=ucs		. #x0580)	; ր
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER CO")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0581)	; ց
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER CO")
       (=ucs		  . #x0551)	; Ց
       ))
-    (=ucs		. #x0581)	; ց
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER YIWN")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0582)	; ւ
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER YIWN")
       (=ucs		  . #x0552)	; Ւ
       ))
-    (=ucs		. #x0582)	; ւ
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER PIWR")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0583)	; փ
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER PIWR")
       (=ucs		  . #x0553)	; Փ
       ))
-    (=ucs		. #x0583)	; փ
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER KEH")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0584)	; ք
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER KEH")
       (=ucs		  . #x0554)	; Ք
       ))
-    (=ucs		. #x0584)	; ք
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER OH")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0585)	; օ
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER OH")
       (=ucs		  . #x0555)	; Օ
       ))
-    (=ucs		. #x0585)	; օ
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LETTER FEH")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x0586)	; ֆ
     (->uppercase
      ((name		  . "ARMENIAN CAPITAL LETTER FEH")
       (=ucs		  . #x0556)	; Ֆ
       ))
-    (=ucs		. #x0586)	; ֆ
     ))
 (define-char
   '((name		. "ARMENIAN SMALL LIGATURE ECH YIWN")
diff --git a/lisp/utf-2000/u01E00-Latin-Extended-Additional.el b/lisp/utf-2000/u01E00-Latin-Extended-Additional.el
index f5ce5de..54ea42c 100644
--- a/lisp/utf-2000/u01E00-Latin-Extended-Additional.el
+++ b/lisp/utf-2000/u01E00-Latin-Extended-Additional.el
@@ -4,10 +4,6 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH RING BELOW")
-      (=ucs		  . #x1E01)	; ḁ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
@@ -16,16 +12,16 @@
       (=ucs		  . #x0325)	; ̥
       ))
     (=ucs		. #x1E00)	; Ḁ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH RING BELOW")
+      (=ucs		  . #x1E01)	; ḁ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH RING BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER A WITH RING BELOW")
-      (=ucs		  . #x1E00)	; Ḁ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
@@ -34,16 +30,16 @@
       (=ucs		  . #x0325)	; ̥
       ))
     (=ucs		. #x1E01)	; ḁ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER A WITH RING BELOW")
+      (=ucs		  . #x1E00)	; Ḁ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER B WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER B WITH DOT ABOVE")
-      (=ucs		  . #x1E03)	; ḃ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER B")
       (=ucs		  . #x0042)	; B
@@ -52,16 +48,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E02)	; Ḃ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER B WITH DOT ABOVE")
+      (=ucs		  . #x1E03)	; ḃ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER B WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER B WITH DOT ABOVE")
-      (=ucs		  . #x1E02)	; Ḃ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER B")
       (=ucs		  . #x0062)	; b
@@ -70,16 +66,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E03)	; ḃ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER B WITH DOT ABOVE")
+      (=ucs		  . #x1E02)	; Ḃ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER B WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER B WITH DOT BELOW")
-      (=ucs		  . #x1E05)	; ḅ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER B")
       (=ucs		  . #x0042)	; B
@@ -88,16 +84,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E04)	; Ḅ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER B WITH DOT BELOW")
+      (=ucs		  . #x1E05)	; ḅ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER B WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER B WITH DOT BELOW")
-      (=ucs		  . #x1E04)	; Ḅ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER B")
       (=ucs		  . #x0062)	; b
@@ -106,16 +102,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E05)	; ḅ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER B WITH DOT BELOW")
+      (=ucs		  . #x1E04)	; Ḅ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER B WITH LINE BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER B WITH LINE BELOW")
-      (=ucs		  . #x1E07)	; ḇ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER B")
       (=ucs		  . #x0042)	; B
@@ -124,16 +120,16 @@
       (=ucs		  . #x0331)	; ̱
       ))
     (=ucs		. #x1E06)	; Ḇ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER B WITH LINE BELOW")
+      (=ucs		  . #x1E07)	; ḇ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER B WITH LINE BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER B WITH LINE BELOW")
-      (=ucs		  . #x1E06)	; Ḇ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER B")
       (=ucs		  . #x0062)	; b
@@ -142,16 +138,16 @@
       (=ucs		  . #x0331)	; ̱
       ))
     (=ucs		. #x1E07)	; ḇ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER B WITH LINE BELOW")
+      (=ucs		  . #x1E06)	; Ḇ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER C WITH CEDILLA AND ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER C WITH CEDILLA AND ACUTE")
-      (=ucs		  . #x1E09)	; ḉ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER C WITH CEDILLA")
       (=ucs		  . #x00C7)	; Ç
@@ -160,16 +156,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E08)	; Ḉ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER C WITH CEDILLA AND ACUTE")
+      (=ucs		  . #x1E09)	; ḉ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER C WITH CEDILLA AND ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER C WITH CEDILLA AND ACUTE")
-      (=ucs		  . #x1E08)	; Ḉ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER C WITH CEDILLA")
       (=ucs		  . #x00E7)	; ç
@@ -178,16 +174,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E09)	; ḉ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER C WITH CEDILLA AND ACUTE")
+      (=ucs		  . #x1E08)	; Ḉ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER D WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER D WITH DOT ABOVE")
-      (=ucs		  . #x1E0B)	; ḋ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER D")
       (=ucs		  . #x0044)	; D
@@ -196,16 +192,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E0A)	; Ḋ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER D WITH DOT ABOVE")
+      (=ucs		  . #x1E0B)	; ḋ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER D WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER D WITH DOT ABOVE")
-      (=ucs		  . #x1E0A)	; Ḋ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER D")
       (=ucs		  . #x0064)	; d
@@ -214,16 +210,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E0B)	; ḋ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER D WITH DOT ABOVE")
+      (=ucs		  . #x1E0A)	; Ḋ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER D WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER D WITH DOT BELOW")
-      (=ucs		  . #x1E0D)	; ḍ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER D")
       (=ucs		  . #x0044)	; D
@@ -232,16 +228,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E0C)	; Ḍ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER D WITH DOT BELOW")
+      (=ucs		  . #x1E0D)	; ḍ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER D WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER D WITH DOT BELOW")
-      (=ucs		  . #x1E0C)	; Ḍ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER D")
       (=ucs		  . #x0064)	; d
@@ -250,16 +246,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E0D)	; ḍ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER D WITH DOT BELOW")
+      (=ucs		  . #x1E0C)	; Ḍ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER D WITH LINE BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER D WITH LINE BELOW")
-      (=ucs		  . #x1E0F)	; ḏ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER D")
       (=ucs		  . #x0044)	; D
@@ -268,16 +264,16 @@
       (=ucs		  . #x0331)	; ̱
       ))
     (=ucs		. #x1E0E)	; Ḏ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER D WITH LINE BELOW")
+      (=ucs		  . #x1E0F)	; ḏ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER D WITH LINE BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER D WITH LINE BELOW")
-      (=ucs		  . #x1E0E)	; Ḏ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER D")
       (=ucs		  . #x0064)	; d
@@ -286,16 +282,16 @@
       (=ucs		  . #x0331)	; ̱
       ))
     (=ucs		. #x1E0F)	; ḏ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER D WITH LINE BELOW")
+      (=ucs		  . #x1E0E)	; Ḏ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER D WITH CEDILLA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER D WITH CEDILLA")
-      (=ucs		  . #x1E11)	; ḑ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER D")
       (=ucs		  . #x0044)	; D
@@ -304,16 +300,16 @@
       (=ucs		  . #x0327)	; ̧
       ))
     (=ucs		. #x1E10)	; Ḑ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER D WITH CEDILLA")
+      (=ucs		  . #x1E11)	; ḑ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER D WITH CEDILLA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER D WITH CEDILLA")
-      (=ucs		  . #x1E10)	; Ḑ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER D")
       (=ucs		  . #x0064)	; d
@@ -322,16 +318,16 @@
       (=ucs		  . #x0327)	; ̧
       ))
     (=ucs		. #x1E11)	; ḑ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER D WITH CEDILLA")
+      (=ucs		  . #x1E10)	; Ḑ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER D WITH CIRCUMFLEX BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER D WITH CIRCUMFLEX BELOW")
-      (=ucs		  . #x1E13)	; ḓ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER D")
       (=ucs		  . #x0044)	; D
@@ -340,16 +336,16 @@
       (=ucs		  . #x032D)	; Ì­
       ))
     (=ucs		. #x1E12)	; Ḓ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER D WITH CIRCUMFLEX BELOW")
+      (=ucs		  . #x1E13)	; ḓ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER D WITH CIRCUMFLEX BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER D WITH CIRCUMFLEX BELOW")
-      (=ucs		  . #x1E12)	; Ḓ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER D")
       (=ucs		  . #x0064)	; d
@@ -358,16 +354,16 @@
       (=ucs		  . #x032D)	; Ì­
       ))
     (=ucs		. #x1E13)	; ḓ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER D WITH CIRCUMFLEX BELOW")
+      (=ucs		  . #x1E12)	; Ḓ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH MACRON AND GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH MACRON AND GRAVE")
-      (=ucs		  . #x1E15)	; ḕ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E WITH MACRON")
       (=ucs		  . #x0112)	; Ē
@@ -376,16 +372,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1E14)	; Ḕ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH MACRON AND GRAVE")
+      (=ucs		  . #x1E15)	; ḕ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH MACRON AND GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER E WITH MACRON AND GRAVE")
-      (=ucs		  . #x1E14)	; Ḕ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E WITH MACRON")
       (=ucs		  . #x0113)	; ē
@@ -394,16 +390,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1E15)	; ḕ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER E WITH MACRON AND GRAVE")
+      (=ucs		  . #x1E14)	; Ḕ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH MACRON AND ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH MACRON AND ACUTE")
-      (=ucs		  . #x1E17)	; ḗ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E WITH MACRON")
       (=ucs		  . #x0112)	; Ē
@@ -412,16 +408,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E16)	; Ḗ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH MACRON AND ACUTE")
+      (=ucs		  . #x1E17)	; ḗ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH MACRON AND ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER E WITH MACRON AND ACUTE")
-      (=ucs		  . #x1E16)	; Ḗ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E WITH MACRON")
       (=ucs		  . #x0113)	; ē
@@ -430,16 +426,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E17)	; ḗ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER E WITH MACRON AND ACUTE")
+      (=ucs		  . #x1E16)	; Ḗ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH CIRCUMFLEX BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH CIRCUMFLEX BELOW")
-      (=ucs		  . #x1E19)	; ḙ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -448,16 +444,16 @@
       (=ucs		  . #x032D)	; Ì­
       ))
     (=ucs		. #x1E18)	; Ḙ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH CIRCUMFLEX BELOW")
+      (=ucs		  . #x1E19)	; ḙ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH CIRCUMFLEX BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX BELOW")
-      (=ucs		  . #x1E18)	; Ḙ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -466,16 +462,16 @@
       (=ucs		  . #x032D)	; Ì­
       ))
     (=ucs		. #x1E19)	; ḙ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX BELOW")
+      (=ucs		  . #x1E18)	; Ḙ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH TILDE BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH TILDE BELOW")
-      (=ucs		  . #x1E1B)	; ḛ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -484,16 +480,16 @@
       (=ucs		  . #x0330)	; Ì°
       ))
     (=ucs		. #x1E1A)	; Ḛ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH TILDE BELOW")
+      (=ucs		  . #x1E1B)	; ḛ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH TILDE BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER E WITH TILDE BELOW")
-      (=ucs		  . #x1E1A)	; Ḛ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -502,16 +498,16 @@
       (=ucs		  . #x0330)	; Ì°
       ))
     (=ucs		. #x1E1B)	; ḛ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER E WITH TILDE BELOW")
+      (=ucs		  . #x1E1A)	; Ḛ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER E WITH CEDILLA AND BREVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER E WITH CEDILLA AND BREVE")
-      (=ucs		  . #x1E1D)	; ḝ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E WITH CEDILLA")
       (=ucs		  . #x0228)	; Ȩ
@@ -520,16 +516,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x1E1C)	; Ḝ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER E WITH CEDILLA AND BREVE")
+      (=ucs		  . #x1E1D)	; ḝ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH CEDILLA AND BREVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER E WITH CEDILLA AND BREVE")
-      (=ucs		  . #x1E1C)	; Ḝ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E WITH CEDILLA")
       (=ucs		  . #x0229)	; È©
@@ -538,16 +534,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x1E1D)	; ḝ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER E WITH CEDILLA AND BREVE")
+      (=ucs		  . #x1E1C)	; Ḝ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER F WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER F WITH DOT ABOVE")
-      (=ucs		  . #x1E1F)	; ḟ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER F")
       (=ucs		  . #x0046)	; F
@@ -556,16 +552,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E1E)	; Ḟ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER F WITH DOT ABOVE")
+      (=ucs		  . #x1E1F)	; ḟ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER F WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER F WITH DOT ABOVE")
-      (=ucs		  . #x1E1E)	; Ḟ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER F")
       (=ucs		  . #x0066)	; f
@@ -574,16 +570,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E1F)	; ḟ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER F WITH DOT ABOVE")
+      (=ucs		  . #x1E1E)	; Ḟ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER G WITH MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER G WITH MACRON")
-      (=ucs		  . #x1E21)	; ḡ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER G")
       (=ucs		  . #x0047)	; G
@@ -592,16 +588,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x1E20)	; Ḡ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER G WITH MACRON")
+      (=ucs		  . #x1E21)	; ḡ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER G WITH MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER G WITH MACRON")
-      (=ucs		  . #x1E20)	; Ḡ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER G")
       (=ucs		  . #x0067)	; g
@@ -610,16 +606,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x1E21)	; ḡ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER G WITH MACRON")
+      (=ucs		  . #x1E20)	; Ḡ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER H WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER H WITH DOT ABOVE")
-      (=ucs		  . #x1E23)	; ḣ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER H")
       (=ucs		  . #x0048)	; H
@@ -628,16 +624,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E22)	; Ḣ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER H WITH DOT ABOVE")
+      (=ucs		  . #x1E23)	; ḣ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER H WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER H WITH DOT ABOVE")
-      (=ucs		  . #x1E22)	; Ḣ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER H")
       (=ucs		  . #x0068)	; h
@@ -646,16 +642,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E23)	; ḣ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER H WITH DOT ABOVE")
+      (=ucs		  . #x1E22)	; Ḣ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER H WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER H WITH DOT BELOW")
-      (=ucs		  . #x1E25)	; ḥ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER H")
       (=ucs		  . #x0048)	; H
@@ -664,16 +660,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E24)	; Ḥ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER H WITH DOT BELOW")
+      (=ucs		  . #x1E25)	; ḥ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER H WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER H WITH DOT BELOW")
-      (=ucs		  . #x1E24)	; Ḥ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER H")
       (=ucs		  . #x0068)	; h
@@ -682,16 +678,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E25)	; ḥ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER H WITH DOT BELOW")
+      (=ucs		  . #x1E24)	; Ḥ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER H WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER H WITH DIAERESIS")
-      (=ucs		  . #x1E27)	; ḧ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER H")
       (=ucs		  . #x0048)	; H
@@ -700,16 +696,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x1E26)	; Ḧ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER H WITH DIAERESIS")
+      (=ucs		  . #x1E27)	; ḧ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER H WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER H WITH DIAERESIS")
-      (=ucs		  . #x1E26)	; Ḧ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER H")
       (=ucs		  . #x0068)	; h
@@ -718,16 +714,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x1E27)	; ḧ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER H WITH DIAERESIS")
+      (=ucs		  . #x1E26)	; Ḧ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER H WITH CEDILLA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER H WITH CEDILLA")
-      (=ucs		  . #x1E29)	; ḩ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER H")
       (=ucs		  . #x0048)	; H
@@ -736,16 +732,16 @@
       (=ucs		  . #x0327)	; ̧
       ))
     (=ucs		. #x1E28)	; Ḩ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER H WITH CEDILLA")
+      (=ucs		  . #x1E29)	; ḩ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER H WITH CEDILLA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER H WITH CEDILLA")
-      (=ucs		  . #x1E28)	; Ḩ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER H")
       (=ucs		  . #x0068)	; h
@@ -754,16 +750,16 @@
       (=ucs		  . #x0327)	; ̧
       ))
     (=ucs		. #x1E29)	; ḩ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER H WITH CEDILLA")
+      (=ucs		  . #x1E28)	; Ḩ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER H WITH BREVE BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER H WITH BREVE BELOW")
-      (=ucs		  . #x1E2B)	; ḫ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER H")
       (=ucs		  . #x0048)	; H
@@ -772,16 +768,16 @@
       (=ucs		  . #x032E)	; Ì®
       ))
     (=ucs		. #x1E2A)	; Ḫ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER H WITH BREVE BELOW")
+      (=ucs		  . #x1E2B)	; ḫ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER H WITH BREVE BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER H WITH BREVE BELOW")
-      (=ucs		  . #x1E2A)	; Ḫ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER H")
       (=ucs		  . #x0068)	; h
@@ -790,16 +786,16 @@
       (=ucs		  . #x032E)	; Ì®
       ))
     (=ucs		. #x1E2B)	; ḫ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER H WITH BREVE BELOW")
+      (=ucs		  . #x1E2A)	; Ḫ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I WITH TILDE BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER I WITH TILDE BELOW")
-      (=ucs		  . #x1E2D)	; ḭ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
@@ -808,16 +804,16 @@
       (=ucs		  . #x0330)	; Ì°
       ))
     (=ucs		. #x1E2C)	; Ḭ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER I WITH TILDE BELOW")
+      (=ucs		  . #x1E2D)	; ḭ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER I WITH TILDE BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER I WITH TILDE BELOW")
-      (=ucs		  . #x1E2C)	; Ḭ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER I")
       (=ucs		  . #x0069)	; i
@@ -826,16 +822,16 @@
       (=ucs		  . #x0330)	; Ì°
       ))
     (=ucs		. #x1E2D)	; ḭ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER I WITH TILDE BELOW")
+      (=ucs		  . #x1E2C)	; Ḭ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER I WITH DIAERESIS AND ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER I WITH DIAERESIS AND ACUTE")
-      (=ucs		  . #x1E2F)	; ḯ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER I WITH DIAERESIS")
       (=ucs		  . #x00CF)	; Ï
@@ -844,16 +840,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E2E)	; Ḯ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER I WITH DIAERESIS AND ACUTE")
+      (=ucs		  . #x1E2F)	; ḯ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER I WITH DIAERESIS AND ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER I WITH DIAERESIS AND ACUTE")
-      (=ucs		  . #x1E2E)	; Ḯ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER I WITH DIAERESIS")
       (=ucs		  . #x00EF)	; ï
@@ -862,16 +858,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E2F)	; ḯ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER I WITH DIAERESIS AND ACUTE")
+      (=ucs		  . #x1E2E)	; Ḯ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER K WITH ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER K WITH ACUTE")
-      (=ucs		  . #x1E31)	; ḱ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER K")
       (=ucs		  . #x004B)	; K
@@ -880,15 +876,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E30)	; Ḱ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER K WITH ACUTE")
+      (=ucs		  . #x1E31)	; ḱ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER K WITH ACUTE")
       (=ucs		  . #x1E30)	; Ḱ
       ))
-    (->lowercase
-     ((=jef-china3	  . #x85F2)	; &JC3-85F2;
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER K WITH ACUTE")
       (=ucs		  . #x1E30)	; Ḱ
@@ -901,16 +898,15 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=jef-china3	. #x85DC)	; &JC3-85DC;
+    (->lowercase
+     ((=jef-china3	  . #x85F2)	; &JC3-85F2;
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER K WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER K WITH ACUTE")
-      (=ucs		  . #x1E30)	; Ḱ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER K")
       (=ucs		  . #x006B)	; k
@@ -919,15 +915,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E31)	; ḱ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER K WITH ACUTE")
+      (=ucs		  . #x1E30)	; Ḱ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER K WITH ACUTE")
       (=ucs		  . #x1E31)	; ḱ
       ))
-    (->uppercase
-     ((=jef-china3	  . #x85DC)	; &JC3-85DC;
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER K WITH ACUTE")
       (=ucs		  . #x1E31)	; ḱ
@@ -940,16 +937,15 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=jef-china3	. #x85F2)	; &JC3-85F2;
+    (->uppercase
+     ((=jef-china3	  . #x85DC)	; &JC3-85DC;
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER K WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER K WITH DOT BELOW")
-      (=ucs		  . #x1E33)	; ḳ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER K")
       (=ucs		  . #x004B)	; K
@@ -958,16 +954,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E32)	; Ḳ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER K WITH DOT BELOW")
+      (=ucs		  . #x1E33)	; ḳ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER K WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER K WITH DOT BELOW")
-      (=ucs		  . #x1E32)	; Ḳ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER K")
       (=ucs		  . #x006B)	; k
@@ -976,16 +972,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E33)	; ḳ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER K WITH DOT BELOW")
+      (=ucs		  . #x1E32)	; Ḳ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER K WITH LINE BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER K WITH LINE BELOW")
-      (=ucs		  . #x1E35)	; ḵ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER K")
       (=ucs		  . #x004B)	; K
@@ -994,16 +990,16 @@
       (=ucs		  . #x0331)	; ̱
       ))
     (=ucs		. #x1E34)	; Ḵ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER K WITH LINE BELOW")
+      (=ucs		  . #x1E35)	; ḵ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER K WITH LINE BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER K WITH LINE BELOW")
-      (=ucs		  . #x1E34)	; Ḵ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER K")
       (=ucs		  . #x006B)	; k
@@ -1012,16 +1008,16 @@
       (=ucs		  . #x0331)	; ̱
       ))
     (=ucs		. #x1E35)	; ḵ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER K WITH LINE BELOW")
+      (=ucs		  . #x1E34)	; Ḵ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER L WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER L WITH DOT BELOW")
-      (=ucs		  . #x1E37)	; ḷ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER L")
       (=ucs		  . #x004C)	; L
@@ -1030,16 +1026,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E36)	; Ḷ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER L WITH DOT BELOW")
+      (=ucs		  . #x1E37)	; ḷ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER L WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER L WITH DOT BELOW")
-      (=ucs		  . #x1E36)	; Ḷ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER L")
       (=ucs		  . #x006C)	; l
@@ -1048,16 +1044,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E37)	; ḷ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER L WITH DOT BELOW")
+      (=ucs		  . #x1E36)	; Ḷ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER L WITH DOT BELOW AND MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER L WITH DOT BELOW AND MACRON")
-      (=ucs		  . #x1E39)	; ḹ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER L WITH DOT BELOW")
       (=ucs		  . #x1E36)	; Ḷ
@@ -1066,16 +1062,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x1E38)	; Ḹ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER L WITH DOT BELOW AND MACRON")
+      (=ucs		  . #x1E39)	; ḹ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER L WITH DOT BELOW AND MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER L WITH DOT BELOW AND MACRON")
-      (=ucs		  . #x1E38)	; Ḹ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER L WITH DOT BELOW")
       (=ucs		  . #x1E37)	; ḷ
@@ -1084,16 +1080,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x1E39)	; ḹ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER L WITH DOT BELOW AND MACRON")
+      (=ucs		  . #x1E38)	; Ḹ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER L WITH LINE BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER L WITH LINE BELOW")
-      (=ucs		  . #x1E3B)	; ḻ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER L")
       (=ucs		  . #x004C)	; L
@@ -1102,16 +1098,16 @@
       (=ucs		  . #x0331)	; ̱
       ))
     (=ucs		. #x1E3A)	; Ḻ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER L WITH LINE BELOW")
+      (=ucs		  . #x1E3B)	; ḻ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER L WITH LINE BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER L WITH LINE BELOW")
-      (=ucs		  . #x1E3A)	; Ḻ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER L")
       (=ucs		  . #x006C)	; l
@@ -1120,16 +1116,16 @@
       (=ucs		  . #x0331)	; ̱
       ))
     (=ucs		. #x1E3B)	; ḻ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER L WITH LINE BELOW")
+      (=ucs		  . #x1E3A)	; Ḻ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER L WITH CIRCUMFLEX BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER L WITH CIRCUMFLEX BELOW")
-      (=ucs		  . #x1E3D)	; ḽ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER L")
       (=ucs		  . #x004C)	; L
@@ -1138,16 +1134,16 @@
       (=ucs		  . #x032D)	; Ì­
       ))
     (=ucs		. #x1E3C)	; Ḽ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER L WITH CIRCUMFLEX BELOW")
+      (=ucs		  . #x1E3D)	; ḽ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER L WITH CIRCUMFLEX BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER L WITH CIRCUMFLEX BELOW")
-      (=ucs		  . #x1E3C)	; Ḽ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER L")
       (=ucs		  . #x006C)	; l
@@ -1156,16 +1152,16 @@
       (=ucs		  . #x032D)	; Ì­
       ))
     (=ucs		. #x1E3D)	; ḽ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER L WITH CIRCUMFLEX BELOW")
+      (=ucs		  . #x1E3C)	; Ḽ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER M WITH ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER M WITH ACUTE")
-      (=ucs		  . #x1E3F)	; ḿ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER M")
       (=ucs		  . #x004D)	; M
@@ -1174,15 +1170,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E3E)	; Ḿ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER M WITH ACUTE")
+      (=ucs		  . #x1E3F)	; ḿ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER M WITH ACUTE")
       (=ucs		  . #x1E3E)	; Ḿ
       ))
-    (->lowercase
-     ((=jis-x0213-1-2000  . #x2873)	; &JX1-2873; [08-83]
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER M WITH ACUTE")
       (=ucs		  . #x1E3E)	; Ḿ
@@ -1197,16 +1194,15 @@
     (=jis-x0213-1-2000	. #x2872)	; &JX1-2872; [08-82]
     (=jef-china3	. #x85DE)	; &I-JC3-85DE;
     (=ucs@jis/fw	. #x1E3E)	; &JX1-2872;
+    (->lowercase
+     ((=jis-x0213-1-2000  . #x2873)	; &JX1-2873; [08-83]
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER M WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER M WITH ACUTE")
-      (=ucs		  . #x1E3E)	; Ḿ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER M")
       (=ucs		  . #x006D)	; m
@@ -1215,15 +1211,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E3F)	; ḿ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER M WITH ACUTE")
+      (=ucs		  . #x1E3E)	; Ḿ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER M WITH ACUTE")
       (=ucs		  . #x1E3F)	; ḿ
       ))
-    (->uppercase
-     ((=jis-x0213-1-2000  . #x2872)	; &JX1-2872; [08-82]
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER M WITH ACUTE")
       (=ucs		  . #x1E3F)	; ḿ
@@ -1238,16 +1235,15 @@
     (=jis-x0213-1-2000	. #x2873)	; &JX1-2873; [08-83]
     (=jef-china3	. #x85F4)	; &I-JC3-85F4;
     (=ucs@jis/fw	. #x1E3F)	; &JX1-2873;
+    (->uppercase
+     ((=jis-x0213-1-2000  . #x2872)	; &JX1-2872; [08-82]
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER M WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER M WITH DOT ABOVE")
-      (=ucs		  . #x1E41)	; ṁ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER M")
       (=ucs		  . #x004D)	; M
@@ -1256,16 +1252,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E40)	; Ṁ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER M WITH DOT ABOVE")
+      (=ucs		  . #x1E41)	; ṁ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER M WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER M WITH DOT ABOVE")
-      (=ucs		  . #x1E40)	; Ṁ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER M")
       (=ucs		  . #x006D)	; m
@@ -1274,16 +1270,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E41)	; ṁ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER M WITH DOT ABOVE")
+      (=ucs		  . #x1E40)	; Ṁ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER M WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER M WITH DOT BELOW")
-      (=ucs		  . #x1E43)	; ṃ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER M")
       (=ucs		  . #x004D)	; M
@@ -1292,16 +1288,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E42)	; Ṃ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER M WITH DOT BELOW")
+      (=ucs		  . #x1E43)	; ṃ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER M WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER M WITH DOT BELOW")
-      (=ucs		  . #x1E42)	; Ṃ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER M")
       (=ucs		  . #x006D)	; m
@@ -1310,16 +1306,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E43)	; ṃ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER M WITH DOT BELOW")
+      (=ucs		  . #x1E42)	; Ṃ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER N WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER N WITH DOT ABOVE")
-      (=ucs		  . #x1E45)	; ṅ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER N")
       (=ucs		  . #x004E)	; N
@@ -1328,16 +1324,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E44)	; Ṅ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER N WITH DOT ABOVE")
+      (=ucs		  . #x1E45)	; ṅ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER N WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER N WITH DOT ABOVE")
-      (=ucs		  . #x1E44)	; Ṅ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER N")
       (=ucs		  . #x006E)	; n
@@ -1346,16 +1342,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E45)	; ṅ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER N WITH DOT ABOVE")
+      (=ucs		  . #x1E44)	; Ṅ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER N WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER N WITH DOT BELOW")
-      (=ucs		  . #x1E47)	; ṇ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER N")
       (=ucs		  . #x004E)	; N
@@ -1364,16 +1360,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E46)	; Ṇ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER N WITH DOT BELOW")
+      (=ucs		  . #x1E47)	; ṇ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER N WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER N WITH DOT BELOW")
-      (=ucs		  . #x1E46)	; Ṇ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER N")
       (=ucs		  . #x006E)	; n
@@ -1382,16 +1378,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E47)	; ṇ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER N WITH DOT BELOW")
+      (=ucs		  . #x1E46)	; Ṇ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER N WITH LINE BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER N WITH LINE BELOW")
-      (=ucs		  . #x1E49)	; ṉ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER N")
       (=ucs		  . #x004E)	; N
@@ -1400,16 +1396,16 @@
       (=ucs		  . #x0331)	; ̱
       ))
     (=ucs		. #x1E48)	; Ṉ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER N WITH LINE BELOW")
+      (=ucs		  . #x1E49)	; ṉ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER N WITH LINE BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER N WITH LINE BELOW")
-      (=ucs		  . #x1E48)	; Ṉ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER N")
       (=ucs		  . #x006E)	; n
@@ -1418,16 +1414,16 @@
       (=ucs		  . #x0331)	; ̱
       ))
     (=ucs		. #x1E49)	; ṉ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER N WITH LINE BELOW")
+      (=ucs		  . #x1E48)	; Ṉ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER N WITH CIRCUMFLEX BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER N WITH CIRCUMFLEX BELOW")
-      (=ucs		  . #x1E4B)	; ṋ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER N")
       (=ucs		  . #x004E)	; N
@@ -1436,16 +1432,16 @@
       (=ucs		  . #x032D)	; Ì­
       ))
     (=ucs		. #x1E4A)	; Ṋ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER N WITH CIRCUMFLEX BELOW")
+      (=ucs		  . #x1E4B)	; ṋ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER N WITH CIRCUMFLEX BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER N WITH CIRCUMFLEX BELOW")
-      (=ucs		  . #x1E4A)	; Ṋ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER N")
       (=ucs		  . #x006E)	; n
@@ -1454,16 +1450,16 @@
       (=ucs		  . #x032D)	; Ì­
       ))
     (=ucs		. #x1E4B)	; ṋ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER N WITH CIRCUMFLEX BELOW")
+      (=ucs		  . #x1E4A)	; Ṋ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH TILDE AND ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH TILDE AND ACUTE")
-      (=ucs		  . #x1E4D)	; ṍ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH TILDE")
       (=ucs		  . #x00D5)	; Õ
@@ -1472,16 +1468,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E4C)	; Ṍ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH TILDE AND ACUTE")
+      (=ucs		  . #x1E4D)	; ṍ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH TILDE AND ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER O WITH TILDE AND ACUTE")
-      (=ucs		  . #x1E4C)	; Ṍ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH TILDE")
       (=ucs		  . #x00F5)	; õ
@@ -1490,16 +1486,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E4D)	; ṍ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER O WITH TILDE AND ACUTE")
+      (=ucs		  . #x1E4C)	; Ṍ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER O WITH TILDE AND DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER O WITH TILDE AND DIAERESIS")
-      (=ucs		  . #x1E4F)	; ṏ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH TILDE")
       (=ucs		  . #x00D5)	; Õ
@@ -1508,16 +1504,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x1E4E)	; Ṏ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER O WITH TILDE AND DIAERESIS")
+      (=ucs		  . #x1E4F)	; ṏ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER O WITH TILDE AND DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER O WITH TILDE AND DIAERESIS")
-      (=ucs		  . #x1E4E)	; Ṏ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH TILDE")
       (=ucs		  . #x00F5)	; õ
@@ -1526,16 +1522,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x1E4F)	; ṏ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER O WITH TILDE AND DIAERESIS")
+      (=ucs		  . #x1E4E)	; Ṏ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH MACRON AND GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH MACRON AND GRAVE")
-      (=ucs		  . #x1E51)	; ṑ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH MACRON")
       (=ucs		  . #x014C)	; Ō
@@ -1544,16 +1540,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1E50)	; Ṑ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH MACRON AND GRAVE")
+      (=ucs		  . #x1E51)	; ṑ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH MACRON AND GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER O WITH MACRON AND GRAVE")
-      (=ucs		  . #x1E50)	; Ṑ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH MACRON")
       (=ucs		  . #x014D)	; ō
@@ -1562,16 +1558,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1E51)	; ṑ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER O WITH MACRON AND GRAVE")
+      (=ucs		  . #x1E50)	; Ṑ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH MACRON AND ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH MACRON AND ACUTE")
-      (=ucs		  . #x1E53)	; ṓ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH MACRON")
       (=ucs		  . #x014C)	; Ō
@@ -1580,16 +1576,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E52)	; Ṓ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH MACRON AND ACUTE")
+      (=ucs		  . #x1E53)	; ṓ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH MACRON AND ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER O WITH MACRON AND ACUTE")
-      (=ucs		  . #x1E52)	; Ṓ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH MACRON")
       (=ucs		  . #x014D)	; ō
@@ -1598,16 +1594,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E53)	; ṓ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER O WITH MACRON AND ACUTE")
+      (=ucs		  . #x1E52)	; Ṓ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER P WITH ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER P WITH ACUTE")
-      (=ucs		  . #x1E55)	; ṕ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER P")
       (=ucs		  . #x0050)	; P
@@ -1616,15 +1612,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E54)	; Ṕ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER P WITH ACUTE")
+      (=ucs		  . #x1E55)	; ṕ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER P WITH ACUTE")
       (=ucs		  . #x1E54)	; Ṕ
       ))
-    (->lowercase
-     ((=jef-china3	  . #x85F7)	; &JC3-85F7;
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER P WITH ACUTE")
       (=ucs		  . #x1E54)	; Ṕ
@@ -1637,16 +1634,15 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=jef-china3	. #x85E1)	; &JC3-85E1;
+    (->lowercase
+     ((=jef-china3	  . #x85F7)	; &JC3-85F7;
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER P WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER P WITH ACUTE")
-      (=ucs		  . #x1E54)	; Ṕ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER P")
       (=ucs		  . #x0070)	; p
@@ -1655,15 +1651,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E55)	; ṕ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER P WITH ACUTE")
+      (=ucs		  . #x1E54)	; Ṕ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER P WITH ACUTE")
       (=ucs		  . #x1E55)	; ṕ
       ))
-    (->uppercase
-     ((=jef-china3	  . #x85E1)	; &JC3-85E1;
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER P WITH ACUTE")
       (=ucs		  . #x1E55)	; ṕ
@@ -1676,16 +1673,15 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=jef-china3	. #x85F7)	; &JC3-85F7;
+    (->uppercase
+     ((=jef-china3	  . #x85E1)	; &JC3-85E1;
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER P WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER P WITH DOT ABOVE")
-      (=ucs		  . #x1E57)	; ṗ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER P")
       (=ucs		  . #x0050)	; P
@@ -1694,16 +1690,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E56)	; Ṗ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER P WITH DOT ABOVE")
+      (=ucs		  . #x1E57)	; ṗ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER P WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER P WITH DOT ABOVE")
-      (=ucs		  . #x1E56)	; Ṗ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER P")
       (=ucs		  . #x0070)	; p
@@ -1712,16 +1708,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E57)	; ṗ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER P WITH DOT ABOVE")
+      (=ucs		  . #x1E56)	; Ṗ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER R WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER R WITH DOT ABOVE")
-      (=ucs		  . #x1E59)	; ṙ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER R")
       (=ucs		  . #x0052)	; R
@@ -1730,16 +1726,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E58)	; Ṙ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER R WITH DOT ABOVE")
+      (=ucs		  . #x1E59)	; ṙ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER R WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER R WITH DOT ABOVE")
-      (=ucs		  . #x1E58)	; Ṙ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER R")
       (=ucs		  . #x0072)	; r
@@ -1748,16 +1744,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E59)	; ṙ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER R WITH DOT ABOVE")
+      (=ucs		  . #x1E58)	; Ṙ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER R WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER R WITH DOT BELOW")
-      (=ucs		  . #x1E5B)	; ṛ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER R")
       (=ucs		  . #x0052)	; R
@@ -1766,16 +1762,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E5A)	; Ṛ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER R WITH DOT BELOW")
+      (=ucs		  . #x1E5B)	; ṛ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER R WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER R WITH DOT BELOW")
-      (=ucs		  . #x1E5A)	; Ṛ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER R")
       (=ucs		  . #x0072)	; r
@@ -1784,16 +1780,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E5B)	; ṛ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER R WITH DOT BELOW")
+      (=ucs		  . #x1E5A)	; Ṛ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER R WITH DOT BELOW AND MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER R WITH DOT BELOW AND MACRON")
-      (=ucs		  . #x1E5D)	; ṝ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER R WITH DOT BELOW")
       (=ucs		  . #x1E5A)	; Ṛ
@@ -1802,16 +1798,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x1E5C)	; Ṝ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER R WITH DOT BELOW AND MACRON")
+      (=ucs		  . #x1E5D)	; ṝ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER R WITH DOT BELOW AND MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER R WITH DOT BELOW AND MACRON")
-      (=ucs		  . #x1E5C)	; Ṝ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER R WITH DOT BELOW")
       (=ucs		  . #x1E5B)	; ṛ
@@ -1820,16 +1816,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x1E5D)	; ṝ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER R WITH DOT BELOW AND MACRON")
+      (=ucs		  . #x1E5C)	; Ṝ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER R WITH LINE BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER R WITH LINE BELOW")
-      (=ucs		  . #x1E5F)	; ṟ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER R")
       (=ucs		  . #x0052)	; R
@@ -1838,16 +1834,16 @@
       (=ucs		  . #x0331)	; ̱
       ))
     (=ucs		. #x1E5E)	; Ṟ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER R WITH LINE BELOW")
+      (=ucs		  . #x1E5F)	; ṟ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER R WITH LINE BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER R WITH LINE BELOW")
-      (=ucs		  . #x1E5E)	; Ṟ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER R")
       (=ucs		  . #x0072)	; r
@@ -1856,16 +1852,16 @@
       (=ucs		  . #x0331)	; ̱
       ))
     (=ucs		. #x1E5F)	; ṟ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER R WITH LINE BELOW")
+      (=ucs		  . #x1E5E)	; Ṟ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER S WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER S WITH DOT ABOVE")
-      (=ucs		  . #x1E61)	; ṡ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER S")
       (=ucs		  . #x0053)	; S
@@ -1874,16 +1870,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E60)	; á¹ 
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER S WITH DOT ABOVE")
+      (=ucs		  . #x1E61)	; ṡ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER S WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER S WITH DOT ABOVE")
-      (=ucs		  . #x1E60)	; á¹ 
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER S")
       (=ucs		  . #x0073)	; s
@@ -1892,16 +1888,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E61)	; ṡ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER S WITH DOT ABOVE")
+      (=ucs		  . #x1E60)	; á¹ 
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER S WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER S WITH DOT BELOW")
-      (=ucs		  . #x1E63)	; á¹£
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER S")
       (=ucs		  . #x0053)	; S
@@ -1910,6 +1906,10 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E62)	; á¹¢
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER S WITH DOT BELOW")
+      (=ucs		  . #x1E63)	; á¹£
+      ))
     ))
 (define-char
   '((<-denotational
@@ -1934,10 +1934,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER S WITH DOT BELOW")
-      (=ucs		  . #x1E62)	; á¹¢
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER S")
       (=ucs		  . #x0073)	; s
@@ -1946,16 +1942,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E63)	; á¹£
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER S WITH DOT BELOW")
+      (=ucs		  . #x1E62)	; á¹¢
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER S WITH ACUTE AND DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER S WITH ACUTE AND DOT ABOVE")
-      (=ucs		  . #x1E65)	; á¹¥
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER S WITH ACUTE")
       (=ucs		  . #x015A)	; Ś
@@ -1964,16 +1960,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E64)	; Ṥ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER S WITH ACUTE AND DOT ABOVE")
+      (=ucs		  . #x1E65)	; á¹¥
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER S WITH ACUTE AND DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER S WITH ACUTE AND DOT ABOVE")
-      (=ucs		  . #x1E64)	; Ṥ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER S WITH ACUTE")
       (=ucs		  . #x015B)	; ś
@@ -1982,16 +1978,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E65)	; á¹¥
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER S WITH ACUTE AND DOT ABOVE")
+      (=ucs		  . #x1E64)	; Ṥ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER S WITH CARON AND DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER S WITH CARON AND DOT ABOVE")
-      (=ucs		  . #x1E67)	; ṧ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER S WITH CARON")
       (=ucs		  . #x0160)	; Å 
@@ -2000,16 +1996,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E66)	; Ṧ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER S WITH CARON AND DOT ABOVE")
+      (=ucs		  . #x1E67)	; ṧ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER S WITH CARON AND DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER S WITH CARON AND DOT ABOVE")
-      (=ucs		  . #x1E66)	; Ṧ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER S WITH CARON")
       (=ucs		  . #x0161)	; Å¡
@@ -2018,16 +2014,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E67)	; ṧ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER S WITH CARON AND DOT ABOVE")
+      (=ucs		  . #x1E66)	; Ṧ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER S WITH DOT BELOW AND DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER S WITH DOT BELOW AND DOT ABOVE")
-      (=ucs		  . #x1E69)	; ṩ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER S WITH DOT BELOW")
       (=ucs		  . #x1E62)	; á¹¢
@@ -2036,16 +2032,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E68)	; Ṩ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER S WITH DOT BELOW AND DOT ABOVE")
+      (=ucs		  . #x1E69)	; ṩ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER S WITH DOT BELOW AND DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER S WITH DOT BELOW AND DOT ABOVE")
-      (=ucs		  . #x1E68)	; Ṩ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER S WITH DOT BELOW")
       (=ucs		  . #x1E63)	; á¹£
@@ -2054,16 +2050,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E69)	; ṩ
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER S WITH DOT BELOW AND DOT ABOVE")
+      (=ucs		  . #x1E68)	; Ṩ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER T WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER T WITH DOT ABOVE")
-      (=ucs		  . #x1E6B)	; ṫ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER T")
       (=ucs		  . #x0054)	; T
@@ -2072,16 +2068,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E6A)	; Ṫ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER T WITH DOT ABOVE")
+      (=ucs		  . #x1E6B)	; ṫ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER T WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER T WITH DOT ABOVE")
-      (=ucs		  . #x1E6A)	; Ṫ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER T")
       (=ucs		  . #x0074)	; t
@@ -2090,16 +2086,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E6B)	; ṫ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER T WITH DOT ABOVE")
+      (=ucs		  . #x1E6A)	; Ṫ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER T WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER T WITH DOT BELOW")
-      (=ucs		  . #x1E6D)	; á¹­
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER T")
       (=ucs		  . #x0054)	; T
@@ -2108,16 +2104,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E6C)	; Ṭ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER T WITH DOT BELOW")
+      (=ucs		  . #x1E6D)	; á¹­
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER T WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER T WITH DOT BELOW")
-      (=ucs		  . #x1E6C)	; Ṭ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER T")
       (=ucs		  . #x0074)	; t
@@ -2126,16 +2122,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E6D)	; á¹­
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER T WITH DOT BELOW")
+      (=ucs		  . #x1E6C)	; Ṭ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER T WITH LINE BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER T WITH LINE BELOW")
-      (=ucs		  . #x1E6F)	; ṯ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER T")
       (=ucs		  . #x0054)	; T
@@ -2144,16 +2140,16 @@
       (=ucs		  . #x0331)	; ̱
       ))
     (=ucs		. #x1E6E)	; á¹®
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER T WITH LINE BELOW")
+      (=ucs		  . #x1E6F)	; ṯ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER T WITH LINE BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER T WITH LINE BELOW")
-      (=ucs		  . #x1E6E)	; á¹®
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER T")
       (=ucs		  . #x0074)	; t
@@ -2162,16 +2158,16 @@
       (=ucs		  . #x0331)	; ̱
       ))
     (=ucs		. #x1E6F)	; ṯ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER T WITH LINE BELOW")
+      (=ucs		  . #x1E6E)	; á¹®
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER T WITH CIRCUMFLEX BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER T WITH CIRCUMFLEX BELOW")
-      (=ucs		  . #x1E71)	; á¹±
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER T")
       (=ucs		  . #x0054)	; T
@@ -2180,16 +2176,16 @@
       (=ucs		  . #x032D)	; Ì­
       ))
     (=ucs		. #x1E70)	; á¹°
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER T WITH CIRCUMFLEX BELOW")
+      (=ucs		  . #x1E71)	; á¹±
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER T WITH CIRCUMFLEX BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER T WITH CIRCUMFLEX BELOW")
-      (=ucs		  . #x1E70)	; á¹°
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER T")
       (=ucs		  . #x0074)	; t
@@ -2198,16 +2194,16 @@
       (=ucs		  . #x032D)	; Ì­
       ))
     (=ucs		. #x1E71)	; á¹±
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER T WITH CIRCUMFLEX BELOW")
+      (=ucs		  . #x1E70)	; á¹°
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH DIAERESIS BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH DIAERESIS BELOW")
-      (=ucs		  . #x1E73)	; á¹³
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -2216,16 +2212,16 @@
       (=ucs		  . #x0324)	; ̤
       ))
     (=ucs		. #x1E72)	; á¹²
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH DIAERESIS BELOW")
+      (=ucs		  . #x1E73)	; á¹³
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH DIAERESIS BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS BELOW")
-      (=ucs		  . #x1E72)	; á¹²
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -2234,16 +2230,16 @@
       (=ucs		  . #x0324)	; ̤
       ))
     (=ucs		. #x1E73)	; á¹³
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER U WITH DIAERESIS BELOW")
+      (=ucs		  . #x1E72)	; á¹²
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH TILDE BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH TILDE BELOW")
-      (=ucs		  . #x1E75)	; á¹µ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -2252,16 +2248,16 @@
       (=ucs		  . #x0330)	; Ì°
       ))
     (=ucs		. #x1E74)	; á¹´
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH TILDE BELOW")
+      (=ucs		  . #x1E75)	; á¹µ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH TILDE BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH TILDE BELOW")
-      (=ucs		  . #x1E74)	; á¹´
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -2270,16 +2266,16 @@
       (=ucs		  . #x0330)	; Ì°
       ))
     (=ucs		. #x1E75)	; á¹µ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH TILDE BELOW")
+      (=ucs		  . #x1E74)	; á¹´
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH CIRCUMFLEX BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH CIRCUMFLEX BELOW")
-      (=ucs		  . #x1E77)	; á¹·
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -2288,16 +2284,16 @@
       (=ucs		  . #x032D)	; Ì­
       ))
     (=ucs		. #x1E76)	; Ṷ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH CIRCUMFLEX BELOW")
+      (=ucs		  . #x1E77)	; á¹·
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH CIRCUMFLEX BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER U WITH CIRCUMFLEX BELOW")
-      (=ucs		  . #x1E76)	; Ṷ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -2306,16 +2302,16 @@
       (=ucs		  . #x032D)	; Ì­
       ))
     (=ucs		. #x1E77)	; á¹·
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER U WITH CIRCUMFLEX BELOW")
+      (=ucs		  . #x1E76)	; Ṷ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH TILDE AND ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH TILDE AND ACUTE")
-      (=ucs		  . #x1E79)	; á¹¹
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U WITH TILDE")
       (=ucs		  . #x0168)	; Ũ
@@ -2324,16 +2320,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E78)	; Ṹ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH TILDE AND ACUTE")
+      (=ucs		  . #x1E79)	; á¹¹
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH TILDE AND ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER U WITH TILDE AND ACUTE")
-      (=ucs		  . #x1E78)	; Ṹ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U WITH TILDE")
       (=ucs		  . #x0169)	; Å©
@@ -2342,16 +2338,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E79)	; á¹¹
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER U WITH TILDE AND ACUTE")
+      (=ucs		  . #x1E78)	; Ṹ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER U WITH MACRON AND DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER U WITH MACRON AND DIAERESIS")
-      (=ucs		  . #x1E7B)	; á¹»
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U WITH MACRON")
       (=ucs		  . #x016A)	; Ū
@@ -2360,16 +2356,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x1E7A)	; Ṻ
+    (->lowercase
+     ((name . "LATIN SMALL LETTER U WITH MACRON AND DIAERESIS")
+      (=ucs		  . #x1E7B)	; á¹»
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER U WITH MACRON AND DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER U WITH MACRON AND DIAERESIS")
-      (=ucs		  . #x1E7A)	; Ṻ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U WITH MACRON")
       (=ucs		  . #x016B)	; Å«
@@ -2378,16 +2374,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x1E7B)	; á¹»
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER U WITH MACRON AND DIAERESIS")
+      (=ucs		  . #x1E7A)	; Ṻ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER V WITH TILDE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER V WITH TILDE")
-      (=ucs		  . #x1E7D)	; á¹½
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER V")
       (=ucs		  . #x0056)	; V
@@ -2396,16 +2392,16 @@
       (=ucs		  . #x0303)	; ̃
       ))
     (=ucs		. #x1E7C)	; á¹¼
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER V WITH TILDE")
+      (=ucs		  . #x1E7D)	; á¹½
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER V WITH TILDE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER V WITH TILDE")
-      (=ucs		  . #x1E7C)	; á¹¼
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER V")
       (=ucs		  . #x0076)	; v
@@ -2414,16 +2410,16 @@
       (=ucs		  . #x0303)	; ̃
       ))
     (=ucs		. #x1E7D)	; á¹½
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER V WITH TILDE")
+      (=ucs		  . #x1E7C)	; á¹¼
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER V WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER V WITH DOT BELOW")
-      (=ucs		  . #x1E7F)	; ṿ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER V")
       (=ucs		  . #x0056)	; V
@@ -2432,16 +2428,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E7E)	; á¹¾
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER V WITH DOT BELOW")
+      (=ucs		  . #x1E7F)	; ṿ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER V WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER V WITH DOT BELOW")
-      (=ucs		  . #x1E7E)	; á¹¾
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER V")
       (=ucs		  . #x0076)	; v
@@ -2450,16 +2446,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E7F)	; ṿ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER V WITH DOT BELOW")
+      (=ucs		  . #x1E7E)	; á¹¾
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER W WITH GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER W WITH GRAVE")
-      (=ucs		  . #x1E81)	; ẁ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER W")
       (=ucs		  . #x0057)	; W
@@ -2468,16 +2464,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1E80)	; Ẁ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER W WITH GRAVE")
+      (=ucs		  . #x1E81)	; ẁ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER W WITH GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER W WITH GRAVE")
-      (=ucs		  . #x1E80)	; Ẁ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER W")
       (=ucs		  . #x0077)	; w
@@ -2486,16 +2482,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1E81)	; ẁ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER W WITH GRAVE")
+      (=ucs		  . #x1E80)	; Ẁ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER W WITH ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER W WITH ACUTE")
-      (=ucs		  . #x1E83)	; ẃ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER W")
       (=ucs		  . #x0057)	; W
@@ -2504,15 +2500,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E82)	; Ẃ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER W WITH ACUTE")
+      (=ucs		  . #x1E83)	; ẃ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN CAPITAL LETTER W WITH ACUTE")
       (=ucs		  . #x1E82)	; Ẃ
       ))
-    (->lowercase
-     ((=jef-china3	  . #x85FE)	; &JC3-85FE;
-      ))
     (<-fullwidth
      ((name		  . "LATIN CAPITAL LETTER W WITH ACUTE")
       (=ucs		  . #x1E82)	; Ẃ
@@ -2525,16 +2522,15 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=jef-china3	. #x85E8)	; &JC3-85E8;
+    (->lowercase
+     ((=jef-china3	  . #x85FE)	; &JC3-85FE;
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER W WITH ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER W WITH ACUTE")
-      (=ucs		  . #x1E82)	; Ẃ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER W")
       (=ucs		  . #x0077)	; w
@@ -2543,15 +2539,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1E83)	; ẃ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER W WITH ACUTE")
+      (=ucs		  . #x1E82)	; Ẃ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name		  . "LATIN SMALL LETTER W WITH ACUTE")
       (=ucs		  . #x1E83)	; ẃ
       ))
-    (->uppercase
-     ((=jef-china3	  . #x85E8)	; &JC3-85E8;
-      ))
     (<-fullwidth
      ((name		  . "LATIN SMALL LETTER W WITH ACUTE")
       (=ucs		  . #x1E83)	; ẃ
@@ -2564,16 +2561,15 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=jef-china3	. #x85FE)	; &JC3-85FE;
+    (->uppercase
+     ((=jef-china3	  . #x85E8)	; &JC3-85E8;
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER W WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER W WITH DIAERESIS")
-      (=ucs		  . #x1E85)	; ẅ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER W")
       (=ucs		  . #x0057)	; W
@@ -2582,16 +2578,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x1E84)	; Ẅ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER W WITH DIAERESIS")
+      (=ucs		  . #x1E85)	; ẅ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER W WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER W WITH DIAERESIS")
-      (=ucs		  . #x1E84)	; Ẅ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER W")
       (=ucs		  . #x0077)	; w
@@ -2600,16 +2596,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x1E85)	; ẅ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER W WITH DIAERESIS")
+      (=ucs		  . #x1E84)	; Ẅ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER W WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER W WITH DOT ABOVE")
-      (=ucs		  . #x1E87)	; ẇ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER W")
       (=ucs		  . #x0057)	; W
@@ -2618,16 +2614,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E86)	; Ẇ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER W WITH DOT ABOVE")
+      (=ucs		  . #x1E87)	; ẇ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER W WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER W WITH DOT ABOVE")
-      (=ucs		  . #x1E86)	; Ẇ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER W")
       (=ucs		  . #x0077)	; w
@@ -2636,16 +2632,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E87)	; ẇ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER W WITH DOT ABOVE")
+      (=ucs		  . #x1E86)	; Ẇ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER W WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER W WITH DOT BELOW")
-      (=ucs		  . #x1E89)	; ẉ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER W")
       (=ucs		  . #x0057)	; W
@@ -2654,16 +2650,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E88)	; Ẉ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER W WITH DOT BELOW")
+      (=ucs		  . #x1E89)	; ẉ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER W WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER W WITH DOT BELOW")
-      (=ucs		  . #x1E88)	; Ẉ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER W")
       (=ucs		  . #x0077)	; w
@@ -2672,16 +2668,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E89)	; ẉ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER W WITH DOT BELOW")
+      (=ucs		  . #x1E88)	; Ẉ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER X WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER X WITH DOT ABOVE")
-      (=ucs		  . #x1E8B)	; ẋ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER X")
       (=ucs		  . #x0058)	; X
@@ -2690,16 +2686,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E8A)	; Ẋ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER X WITH DOT ABOVE")
+      (=ucs		  . #x1E8B)	; ẋ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER X WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER X WITH DOT ABOVE")
-      (=ucs		  . #x1E8A)	; Ẋ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER X")
       (=ucs		  . #x0078)	; x
@@ -2708,16 +2704,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E8B)	; ẋ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER X WITH DOT ABOVE")
+      (=ucs		  . #x1E8A)	; Ẋ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER X WITH DIAERESIS")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER X WITH DIAERESIS")
-      (=ucs		  . #x1E8D)	; ẍ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER X")
       (=ucs		  . #x0058)	; X
@@ -2726,16 +2722,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x1E8C)	; Ẍ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER X WITH DIAERESIS")
+      (=ucs		  . #x1E8D)	; ẍ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER X WITH DIAERESIS")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER X WITH DIAERESIS")
-      (=ucs		  . #x1E8C)	; Ẍ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER X")
       (=ucs		  . #x0078)	; x
@@ -2744,16 +2740,16 @@
       (=ucs		  . #x0308)	; ̈
       ))
     (=ucs		. #x1E8D)	; ẍ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER X WITH DIAERESIS")
+      (=ucs		  . #x1E8C)	; Ẍ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Y WITH DOT ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER Y WITH DOT ABOVE")
-      (=ucs		  . #x1E8F)	; ẏ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER Y")
       (=ucs		  . #x0059)	; Y
@@ -2762,16 +2758,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E8E)	; Ẏ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER Y WITH DOT ABOVE")
+      (=ucs		  . #x1E8F)	; ẏ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Y WITH DOT ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER Y WITH DOT ABOVE")
-      (=ucs		  . #x1E8E)	; Ẏ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER Y")
       (=ucs		  . #x0079)	; y
@@ -2780,16 +2776,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E8F)	; ẏ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER Y WITH DOT ABOVE")
+      (=ucs		  . #x1E8E)	; Ẏ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Z WITH CIRCUMFLEX")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER Z WITH CIRCUMFLEX")
-      (=ucs		  . #x1E91)	; ẑ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER Z")
       (=ucs		  . #x005A)	; Z
@@ -2798,16 +2794,16 @@
       (=ucs		  . #x0302)	; ̂
       ))
     (=ucs		. #x1E90)	; Ẑ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER Z WITH CIRCUMFLEX")
+      (=ucs		  . #x1E91)	; ẑ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Z WITH CIRCUMFLEX")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER Z WITH CIRCUMFLEX")
-      (=ucs		  . #x1E90)	; Ẑ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER Z")
       (=ucs		  . #x007A)	; z
@@ -2816,16 +2812,16 @@
       (=ucs		  . #x0302)	; ̂
       ))
     (=ucs		. #x1E91)	; ẑ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER Z WITH CIRCUMFLEX")
+      (=ucs		  . #x1E90)	; Ẑ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Z WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER Z WITH DOT BELOW")
-      (=ucs		  . #x1E93)	; ẓ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER Z")
       (=ucs		  . #x005A)	; Z
@@ -2834,16 +2830,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E92)	; Ẓ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER Z WITH DOT BELOW")
+      (=ucs		  . #x1E93)	; ẓ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Z WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER Z WITH DOT BELOW")
-      (=ucs		  . #x1E92)	; Ẓ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER Z")
       (=ucs		  . #x007A)	; z
@@ -2852,16 +2848,16 @@
       (=ucs		  . #x0323)	; ̣
       ))
     (=ucs		. #x1E93)	; ẓ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER Z WITH DOT BELOW")
+      (=ucs		  . #x1E92)	; Ẓ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Z WITH LINE BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER Z WITH LINE BELOW")
-      (=ucs		  . #x1E95)	; ẕ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER Z")
       (=ucs		  . #x005A)	; Z
@@ -2870,16 +2866,16 @@
       (=ucs		  . #x0331)	; ̱
       ))
     (=ucs		. #x1E94)	; Ẕ
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER Z WITH LINE BELOW")
+      (=ucs		  . #x1E95)	; ẕ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Z WITH LINE BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER Z WITH LINE BELOW")
-      (=ucs		  . #x1E94)	; Ẕ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER Z")
       (=ucs		  . #x007A)	; z
@@ -2888,6 +2884,10 @@
       (=ucs		  . #x0331)	; ̱
       ))
     (=ucs		. #x1E95)	; ẕ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER Z WITH LINE BELOW")
+      (=ucs		  . #x1E94)	; Ẕ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER H WITH LINE BELOW")
@@ -2964,10 +2964,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER S WITH DOT ABOVE")
-      (=ucs		  . #x1E60)	; á¹ 
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER LONG S")
       (=ucs		  . #x017F)	; Å¿
@@ -2976,16 +2972,16 @@
       (=ucs		  . #x0307)	; ̇
       ))
     (=ucs		. #x1E9B)	; ẛ
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER S WITH DOT ABOVE")
+      (=ucs		  . #x1E60)	; á¹ 
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH DOT BELOW")
-      (=ucs		  . #x1EA1)	; ạ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
@@ -2996,16 +2992,16 @@
     (=ucs		. #x1EA0)	; Ạ
     (latin-viscii	. #x80)	; &I-MULE-VIET-U-55;
     (latin-viscii-upper . #xD5)	; &I-MULE-VIET-U-55;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH DOT BELOW")
+      (=ucs		  . #x1EA1)	; ạ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER A WITH DOT BELOW")
-      (=ucs		  . #x1EA0)	; Ạ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
@@ -3017,16 +3013,16 @@
     (latin-tcvn5712	. #xB9)	; &I-VSCII2-39;
     (latin-viscii	. #xD5)	; &I-MULE-VIET-L-55;
     (latin-viscii-lower . #xD5)	; &I-MULE-VIET-L-55;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER A WITH DOT BELOW")
+      (=ucs		  . #x1EA0)	; Ạ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A WITH HOOK ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH HOOK ABOVE")
-      (=ucs		  . #x1EA3)	; ả
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A")
       (=ucs		  . #x0041)	; A
@@ -3037,16 +3033,16 @@
     (=ucs		. #x1EA2)	; Ả
     (latin-viscii	. #xC4)	; &I-MULE-VIET-U-64;
     (latin-viscii-upper . #xE4)	; &I-MULE-VIET-U-64;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH HOOK ABOVE")
+      (=ucs		  . #x1EA3)	; ả
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH HOOK ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER A WITH HOOK ABOVE")
-      (=ucs		  . #x1EA2)	; Ả
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A")
       (=ucs		  . #x0061)	; a
@@ -3058,16 +3054,16 @@
     (latin-tcvn5712	. #xB6)	; &I-VSCII2-36;
     (latin-viscii	. #xE4)	; &I-MULE-VIET-L-64;
     (latin-viscii-lower . #xE4)	; &I-MULE-VIET-L-64;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER A WITH HOOK ABOVE")
+      (=ucs		  . #x1EA2)	; Ả
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND ACUTE")
-      (=ucs		  . #x1EA5)	; ấ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX")
       (=ucs		  . #x00C2)	; Â
@@ -3079,15 +3075,16 @@
     (latin-tcvn5712	. #xC4)	; &I-VSCII2-44;
     (latin-viscii	. #x84)	; &I-MULE-VIET-U-24;
     (latin-viscii-upper . #xA4)	; &I-MULE-VIET-U-24;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND ACUTE")
+      (=ucs		  . #x1EA5)	; ấ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND ACUTE")
       (=ucs		  . #x1EA4)	; Ấ
       ))
-    (->lowercase
-     ((=jef-china3	  . #x86AA)	; &JC3-86AA;
-      ))
     (<-fullwidth
      ((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND ACUTE")
       (=ucs		  . #x1EA4)	; Ấ
@@ -3100,16 +3097,15 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=jef-china3	. #x86A7)	; &JC3-86A7;
+    (->lowercase
+     ((=jef-china3	  . #x86AA)	; &JC3-86AA;
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND ACUTE")
-      (=ucs		  . #x1EA4)	; Ấ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A WITH CIRCUMFLEX")
       (=ucs		  . #x00E2)	; â
@@ -3121,15 +3117,16 @@
     (latin-tcvn5712	. #xCA)	; &I-VSCII2-4A;
     (latin-viscii	. #xA4)	; &I-MULE-VIET-L-24;
     (latin-viscii-lower . #xA4)	; &I-MULE-VIET-L-24;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND ACUTE")
+      (=ucs		  . #x1EA4)	; Ấ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND ACUTE")
       (=ucs		  . #x1EA5)	; ấ
       ))
-    (->uppercase
-     ((=jef-china3	  . #x86A7)	; &JC3-86A7;
-      ))
     (<-fullwidth
      ((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND ACUTE")
       (=ucs		  . #x1EA5)	; ấ
@@ -3142,16 +3139,15 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=jef-china3	. #x86AA)	; &JC3-86AA;
+    (->uppercase
+     ((=jef-china3	  . #x86A7)	; &JC3-86A7;
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND GRAVE")
-      (=ucs		  . #x1EA7)	; ầ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX")
       (=ucs		  . #x00C2)	; Â
@@ -3163,15 +3159,16 @@
     (latin-tcvn5712	. #xC1)	; &I-VSCII2-41;
     (latin-viscii	. #x85)	; &I-MULE-VIET-U-25;
     (latin-viscii-upper . #xA5)	; &I-MULE-VIET-U-25;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND GRAVE")
+      (=ucs		  . #x1EA7)	; ầ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND GRAVE")
       (=ucs		  . #x1EA6)	; Ầ
       ))
-    (->lowercase
-     ((=jef-china3	  . #x85B4)	; &JC3-85B4;
-      ))
     (<-fullwidth
      ((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND GRAVE")
       (=ucs		  . #x1EA6)	; Ầ
@@ -3184,16 +3181,15 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=jef-china3	. #x85B1)	; &JC3-85B1;
+    (->lowercase
+     ((=jef-china3	  . #x85B4)	; &JC3-85B4;
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND GRAVE")
-      (=ucs		  . #x1EA6)	; Ầ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A WITH CIRCUMFLEX")
       (=ucs		  . #x00E2)	; â
@@ -3205,15 +3201,16 @@
     (latin-tcvn5712	. #xC7)	; &I-VSCII2-47;
     (latin-viscii	. #xA5)	; &I-MULE-VIET-L-25;
     (latin-viscii-lower . #xA5)	; &I-MULE-VIET-L-25;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND GRAVE")
+      (=ucs		  . #x1EA6)	; Ầ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND GRAVE")
       (=ucs		  . #x1EA7)	; ầ
       ))
-    (->uppercase
-     ((=jef-china3	  . #x85B1)	; &JC3-85B1;
-      ))
     (<-fullwidth
      ((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND GRAVE")
       (=ucs		  . #x1EA7)	; ầ
@@ -3226,16 +3223,15 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=jef-china3	. #x85B4)	; &JC3-85B4;
+    (->uppercase
+     ((=jef-china3	  . #x85B1)	; &JC3-85B1;
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND HOOK ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND HOOK ABOVE")
-      (=ucs		  . #x1EA9)	; ẩ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX")
       (=ucs		  . #x00C2)	; Â
@@ -3247,16 +3243,16 @@
     (latin-tcvn5712	. #xC2)	; &I-VSCII2-42;
     (latin-viscii	. #x86)	; &I-MULE-VIET-U-26;
     (latin-viscii-upper . #xA6)	; &I-MULE-VIET-U-26;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND HOOK ABOVE")
+      (=ucs		  . #x1EA9)	; ẩ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND HOOK ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND HOOK ABOVE")
-      (=ucs		  . #x1EA8)	; Ẩ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A WITH CIRCUMFLEX")
       (=ucs		  . #x00E2)	; â
@@ -3268,16 +3264,16 @@
     (latin-tcvn5712	. #xC8)	; &I-VSCII2-48;
     (latin-viscii	. #xA6)	; &I-MULE-VIET-L-26;
     (latin-viscii-lower . #xA6)	; &I-MULE-VIET-L-26;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND HOOK ABOVE")
+      (=ucs		  . #x1EA8)	; Ẩ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND TILDE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND TILDE")
-      (=ucs		  . #x1EAB)	; ẫ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX")
       (=ucs		  . #x00C2)	; Â
@@ -3289,16 +3285,16 @@
     (latin-tcvn5712	. #xC3)	; &I-VSCII2-43;
     (latin-viscii	. #x06)	; &I-MULE-VIET-U-67;
     (latin-viscii-upper . #xE7)	; &I-MULE-VIET-U-67;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND TILDE")
+      (=ucs		  . #x1EAB)	; ẫ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND TILDE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND TILDE")
-      (=ucs		  . #x1EAA)	; Ẫ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A WITH CIRCUMFLEX")
       (=ucs		  . #x00E2)	; â
@@ -3310,16 +3306,16 @@
     (latin-tcvn5712	. #xC9)	; &I-VSCII2-49;
     (latin-viscii	. #xE7)	; &I-MULE-VIET-L-67;
     (latin-viscii-lower . #xE7)	; &I-MULE-VIET-L-67;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND TILDE")
+      (=ucs		  . #x1EAA)	; Ẫ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND DOT BELOW")
-      (=ucs		  . #x1EAD)	; ậ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A WITH DOT BELOW")
       (=ucs		  . #x1EA0)	; Ạ
@@ -3330,16 +3326,16 @@
     (=ucs		. #x1EAC)	; Ậ
     (latin-viscii	. #x87)	; &I-MULE-VIET-U-27;
     (latin-viscii-upper . #xA7)	; &I-MULE-VIET-U-27;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND DOT BELOW")
+      (=ucs		  . #x1EAD)	; ậ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER A WITH CIRCUMFLEX AND DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND DOT BELOW")
-      (=ucs		  . #x1EAC)	; Ậ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A WITH DOT BELOW")
       (=ucs		  . #x1EA1)	; ạ
@@ -3351,16 +3347,16 @@
     (latin-tcvn5712	. #xCB)	; &I-VSCII2-4B;
     (latin-viscii	. #xA7)	; &I-MULE-VIET-L-27;
     (latin-viscii-lower . #xA7)	; &I-MULE-VIET-L-27;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND DOT BELOW")
+      (=ucs		  . #x1EAC)	; Ậ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A WITH BREVE AND ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH BREVE AND ACUTE")
-      (=ucs		  . #x1EAF)	; ắ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A WITH BREVE")
       (=ucs		  . #x0102)	; Ă
@@ -3372,16 +3368,16 @@
     (latin-tcvn5712	. #xC0)	; &I-VSCII2-40;
     (latin-viscii	. #x81)	; &I-MULE-VIET-U-21;
     (latin-viscii-upper . #xA1)	; &I-MULE-VIET-U-21;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH BREVE AND ACUTE")
+      (=ucs		  . #x1EAF)	; ắ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH BREVE AND ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER A WITH BREVE AND ACUTE")
-      (=ucs		  . #x1EAE)	; Ắ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A WITH BREVE")
       (=ucs		  . #x0103)	; ă
@@ -3393,16 +3389,16 @@
     (latin-tcvn5712	. #xBE)	; &I-VSCII2-3E;
     (latin-viscii	. #xA1)	; &I-MULE-VIET-L-21;
     (latin-viscii-lower . #xA1)	; &I-MULE-VIET-L-21;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER A WITH BREVE AND ACUTE")
+      (=ucs		  . #x1EAE)	; Ắ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A WITH BREVE AND GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH BREVE AND GRAVE")
-      (=ucs		  . #x1EB1)	; ằ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A WITH BREVE")
       (=ucs		  . #x0102)	; Ă
@@ -3414,16 +3410,16 @@
     (latin-tcvn5712	. #xAF)	; &I-VSCII2-2F;
     (latin-viscii	. #x82)	; &I-MULE-VIET-U-22;
     (latin-viscii-upper . #xA2)	; &I-MULE-VIET-U-22;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH BREVE AND GRAVE")
+      (=ucs		  . #x1EB1)	; ằ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH BREVE AND GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER A WITH BREVE AND GRAVE")
-      (=ucs		  . #x1EB0)	; Ằ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A WITH BREVE")
       (=ucs		  . #x0103)	; ă
@@ -3435,16 +3431,16 @@
     (latin-tcvn5712	. #xBB)	; &I-VSCII2-3B;
     (latin-viscii	. #xA2)	; &I-MULE-VIET-L-22;
     (latin-viscii-lower . #xA2)	; &I-MULE-VIET-L-22;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER A WITH BREVE AND GRAVE")
+      (=ucs		  . #x1EB0)	; Ằ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER A WITH BREVE AND HOOK ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER A WITH BREVE AND HOOK ABOVE")
-      (=ucs		  . #x1EB3)	; ẳ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A WITH BREVE")
       (=ucs		  . #x0102)	; Ă
@@ -3456,16 +3452,16 @@
     (latin-tcvn5712	. #xBA)	; &I-VSCII2-3A;
     (latin-viscii	. #x02)	; &I-MULE-VIET-U-46;
     (latin-viscii-upper . #xC6)	; &I-MULE-VIET-U-46;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER A WITH BREVE AND HOOK ABOVE")
+      (=ucs		  . #x1EB3)	; ẳ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER A WITH BREVE AND HOOK ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER A WITH BREVE AND HOOK ABOVE")
-      (=ucs		  . #x1EB2)	; Ẳ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A WITH BREVE")
       (=ucs		  . #x0103)	; ă
@@ -3477,16 +3473,16 @@
     (latin-tcvn5712	. #xBC)	; &I-VSCII2-3C;
     (latin-viscii	. #xC6)	; &I-MULE-VIET-L-46;
     (latin-viscii-lower . #xC6)	; &I-MULE-VIET-L-46;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER A WITH BREVE AND HOOK ABOVE")
+      (=ucs		  . #x1EB2)	; Ẳ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A WITH BREVE AND TILDE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER A WITH BREVE AND TILDE")
-      (=ucs		  . #x1EB5)	; ẵ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A WITH BREVE")
       (=ucs		  . #x0102)	; Ă
@@ -3498,16 +3494,16 @@
     (latin-tcvn5712	. #xBF)	; &I-VSCII2-3F;
     (latin-viscii	. #x05)	; &I-MULE-VIET-U-47;
     (latin-viscii-upper . #xC7)	; &I-MULE-VIET-U-47;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER A WITH BREVE AND TILDE")
+      (=ucs		  . #x1EB5)	; ẵ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A WITH BREVE AND TILDE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER A WITH BREVE AND TILDE")
-      (=ucs		  . #x1EB4)	; Ẵ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A WITH BREVE")
       (=ucs		  . #x0103)	; ă
@@ -3519,16 +3515,16 @@
     (latin-tcvn5712	. #xBD)	; &I-VSCII2-3D;
     (latin-viscii	. #xC7)	; &I-MULE-VIET-L-47;
     (latin-viscii-lower . #xC7)	; &I-MULE-VIET-L-47;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER A WITH BREVE AND TILDE")
+      (=ucs		  . #x1EB4)	; Ẵ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER A WITH BREVE AND DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER A WITH BREVE AND DOT BELOW")
-      (=ucs		  . #x1EB7)	; ặ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER A WITH DOT BELOW")
       (=ucs		  . #x1EA0)	; Ạ
@@ -3539,16 +3535,16 @@
     (=ucs		. #x1EB6)	; Ặ
     (latin-viscii	. #x83)	; &I-MULE-VIET-U-23;
     (latin-viscii-upper . #xA3)	; &I-MULE-VIET-U-23;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER A WITH BREVE AND DOT BELOW")
+      (=ucs		  . #x1EB7)	; ặ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER A WITH BREVE AND DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER A WITH BREVE AND DOT BELOW")
-      (=ucs		  . #x1EB6)	; Ặ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER A WITH DOT BELOW")
       (=ucs		  . #x1EA1)	; ạ
@@ -3560,16 +3556,16 @@
     (latin-tcvn5712	. #xC6)	; &I-VSCII2-46;
     (latin-viscii	. #xA3)	; &I-MULE-VIET-L-23;
     (latin-viscii-lower . #xA3)	; &I-MULE-VIET-L-23;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER A WITH BREVE AND DOT BELOW")
+      (=ucs		  . #x1EB6)	; Ặ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH DOT BELOW")
-      (=ucs		  . #x1EB9)	; ẹ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -3580,16 +3576,16 @@
     (=ucs		. #x1EB8)	; Ẹ
     (latin-viscii	. #x89)	; &I-MULE-VIET-U-29;
     (latin-viscii-upper . #xA9)	; &I-MULE-VIET-U-29;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH DOT BELOW")
+      (=ucs		  . #x1EB9)	; ẹ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER E WITH DOT BELOW")
-      (=ucs		  . #x1EB8)	; Ẹ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -3601,16 +3597,16 @@
     (latin-tcvn5712	. #xD1)	; &I-VSCII2-51;
     (latin-viscii	. #xA9)	; &I-MULE-VIET-L-29;
     (latin-viscii-lower . #xA9)	; &I-MULE-VIET-L-29;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER E WITH DOT BELOW")
+      (=ucs		  . #x1EB8)	; Ẹ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH HOOK ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH HOOK ABOVE")
-      (=ucs		  . #x1EBB)	; ẻ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -3621,16 +3617,16 @@
     (=ucs		. #x1EBA)	; Ẻ
     (latin-viscii	. #xCB)	; &I-MULE-VIET-U-6B;
     (latin-viscii-upper . #xEB)	; &I-MULE-VIET-U-6B;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH HOOK ABOVE")
+      (=ucs		  . #x1EBB)	; ẻ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH HOOK ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER E WITH HOOK ABOVE")
-      (=ucs		  . #x1EBA)	; Ẻ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -3642,16 +3638,16 @@
     (latin-tcvn5712	. #xCE)	; &I-VSCII2-4E;
     (latin-viscii	. #xEB)	; &I-MULE-VIET-L-6B;
     (latin-viscii-lower . #xEB)	; &I-MULE-VIET-L-6B;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER E WITH HOOK ABOVE")
+      (=ucs		  . #x1EBA)	; Ẻ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E WITH TILDE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER E WITH TILDE")
-      (=ucs		  . #x1EBD)	; ẽ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E")
       (=ucs		  . #x0045)	; E
@@ -3662,16 +3658,16 @@
     (=ucs		. #x1EBC)	; Ẽ
     (latin-viscii	. #x88)	; &I-MULE-VIET-U-28;
     (latin-viscii-upper . #xA8)	; &I-MULE-VIET-U-28;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER E WITH TILDE")
+      (=ucs		  . #x1EBD)	; ẽ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E WITH TILDE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER E WITH TILDE")
-      (=ucs		  . #x1EBC)	; Ẽ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E")
       (=ucs		  . #x0065)	; e
@@ -3683,16 +3679,16 @@
     (latin-tcvn5712	. #xCF)	; &I-VSCII2-4F;
     (latin-viscii	. #xA8)	; &I-MULE-VIET-L-28;
     (latin-viscii-lower . #xA8)	; &I-MULE-VIET-L-28;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER E WITH TILDE")
+      (=ucs		  . #x1EBC)	; Ẽ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND ACUTE")
-      (=ucs		  . #x1EBF)	; ế
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX")
       (=ucs		  . #x00CA)	; Ê
@@ -3704,15 +3700,16 @@
     (latin-tcvn5712	. #xDA)	; &I-VSCII2-5A;
     (latin-viscii	. #x8A)	; &I-MULE-VIET-U-2A;
     (latin-viscii-upper . #xAA)	; &I-MULE-VIET-U-2A;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND ACUTE")
+      (=ucs		  . #x1EBF)	; ế
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND ACUTE")
       (=ucs		  . #x1EBE)	; Ế
       ))
-    (->lowercase
-     ((=jef-china3	  . #x86AB)	; &JC3-86AB;
-      ))
     (<-fullwidth
      ((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND ACUTE")
       (=ucs		  . #x1EBE)	; Ế
@@ -3725,16 +3722,15 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=jef-china3	. #x86A8)	; &JC3-86A8;
+    (->lowercase
+     ((=jef-china3	  . #x86AB)	; &JC3-86AB;
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND ACUTE")
     (general-category	letter lowercase) ; Normative Category
-    (bidi-category	. "L")
-    (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND ACUTE")
-      (=ucs		  . #x1EBE)	; Ế
-      ))
+    (bidi-category	. "L")
+    (mirrored		. nil)
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E WITH CIRCUMFLEX")
       (=ucs		  . #x00EA)	; ê
@@ -3746,15 +3742,16 @@
     (latin-tcvn5712	. #xD5)	; &I-VSCII2-55;
     (latin-viscii	. #xAA)	; &I-MULE-VIET-L-2A;
     (latin-viscii-lower . #xAA)	; &I-MULE-VIET-L-2A;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND ACUTE")
+      (=ucs		  . #x1EBE)	; Ế
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND ACUTE")
       (=ucs		  . #x1EBF)	; ế
       ))
-    (->uppercase
-     ((=jef-china3	  . #x86A8)	; &JC3-86A8;
-      ))
     (<-fullwidth
      ((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND ACUTE")
       (=ucs		  . #x1EBF)	; ế
@@ -3768,16 +3765,15 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=jef-china3	. #x86AB)	; &JC3-86AB;
+    (->uppercase
+     ((=jef-china3	  . #x86A8)	; &JC3-86A8;
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND GRAVE")
-      (=ucs		  . #x1EC1)	; ề
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX")
       (=ucs		  . #x00CA)	; Ê
@@ -3789,15 +3785,16 @@
     (latin-tcvn5712	. #xC5)	; &I-VSCII2-45;
     (latin-viscii	. #x8B)	; &I-MULE-VIET-U-2B;
     (latin-viscii-upper . #xAB)	; &I-MULE-VIET-U-2B;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND GRAVE")
+      (=ucs		  . #x1EC1)	; ề
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND GRAVE")
       (=ucs		  . #x1EC0)	; Ề
       ))
-    (->lowercase
-     ((=jef-china3	  . #x85B5)	; &JC3-85B5;
-      ))
     (<-fullwidth
      ((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND GRAVE")
       (=ucs		  . #x1EC0)	; Ề
@@ -3810,16 +3807,15 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=jef-china3	. #x85B2)	; &JC3-85B2;
+    (->lowercase
+     ((=jef-china3	  . #x85B5)	; &JC3-85B5;
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND GRAVE")
-      (=ucs		  . #x1EC0)	; Ề
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E WITH CIRCUMFLEX")
       (=ucs		  . #x00EA)	; ê
@@ -3831,15 +3827,16 @@
     (latin-tcvn5712	. #xD2)	; &I-VSCII2-52;
     (latin-viscii	. #xAB)	; &I-MULE-VIET-L-2B;
     (latin-viscii-lower . #xAB)	; &I-MULE-VIET-L-2B;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND GRAVE")
+      (=ucs		  . #x1EC0)	; Ề
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND GRAVE")
       (=ucs		  . #x1EC1)	; ề
       ))
-    (->uppercase
-     ((=jef-china3	  . #x85B2)	; &JC3-85B2;
-      ))
     (<-fullwidth
      ((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND GRAVE")
       (=ucs		  . #x1EC1)	; ề
@@ -3853,16 +3850,15 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=jef-china3	. #x85B5)	; &JC3-85B5;
+    (->uppercase
+     ((=jef-china3	  . #x85B2)	; &JC3-85B2;
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND HOOK ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND HOOK ABOVE")
-      (=ucs		  . #x1EC3)	; ể
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX")
       (=ucs		  . #x00CA)	; Ê
@@ -3874,16 +3870,16 @@
     (latin-tcvn5712	. #xCD)	; &I-VSCII2-4D;
     (latin-viscii	. #x8C)	; &I-MULE-VIET-U-2C;
     (latin-viscii-upper . #xAC)	; &I-MULE-VIET-U-2C;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND HOOK ABOVE")
+      (=ucs		  . #x1EC3)	; ể
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND HOOK ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND HOOK ABOVE")
-      (=ucs		  . #x1EC2)	; Ể
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E WITH CIRCUMFLEX")
       (=ucs		  . #x00EA)	; ê
@@ -3895,16 +3891,16 @@
     (latin-tcvn5712	. #xD3)	; &I-VSCII2-53;
     (latin-viscii	. #xAC)	; &I-MULE-VIET-L-2C;
     (latin-viscii-lower . #xAC)	; &I-MULE-VIET-L-2C;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND HOOK ABOVE")
+      (=ucs		  . #x1EC2)	; Ể
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND TILDE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND TILDE")
-      (=ucs		  . #x1EC5)	; ễ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX")
       (=ucs		  . #x00CA)	; Ê
@@ -3916,16 +3912,16 @@
     (latin-tcvn5712	. #xD9)	; &I-VSCII2-59;
     (latin-viscii	. #x8D)	; &I-MULE-VIET-U-2D;
     (latin-viscii-upper . #xAD)	; &I-MULE-VIET-U-2D;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND TILDE")
+      (=ucs		  . #x1EC5)	; ễ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND TILDE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND TILDE")
-      (=ucs		  . #x1EC4)	; Ễ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E WITH CIRCUMFLEX")
       (=ucs		  . #x00EA)	; ê
@@ -3937,16 +3933,16 @@
     (latin-tcvn5712	. #xD4)	; &I-VSCII2-54;
     (latin-viscii	. #xAD)	; &I-MULE-VIET-L-2D;
     (latin-viscii-lower . #xAD)	; &I-MULE-VIET-L-2D;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND TILDE")
+      (=ucs		  . #x1EC4)	; Ễ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND DOT BELOW")
-      (=ucs		  . #x1EC7)	; ệ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER E WITH DOT BELOW")
       (=ucs		  . #x1EB8)	; Ẹ
@@ -3957,16 +3953,16 @@
     (=ucs		. #x1EC6)	; Ệ
     (latin-viscii	. #x8E)	; &I-MULE-VIET-U-2E;
     (latin-viscii-upper . #xAE)	; &I-MULE-VIET-U-2E;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND DOT BELOW")
+      (=ucs		  . #x1EC7)	; ệ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER E WITH CIRCUMFLEX AND DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND DOT BELOW")
-      (=ucs		  . #x1EC6)	; Ệ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER E WITH DOT BELOW")
       (=ucs		  . #x1EB9)	; ẹ
@@ -3978,16 +3974,16 @@
     (latin-tcvn5712	. #xD6)	; &I-VSCII2-56;
     (latin-viscii	. #xAE)	; &I-MULE-VIET-L-2E;
     (latin-viscii-lower . #xAE)	; &I-MULE-VIET-L-2E;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND DOT BELOW")
+      (=ucs		  . #x1EC6)	; Ệ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I WITH HOOK ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER I WITH HOOK ABOVE")
-      (=ucs		  . #x1EC9)	; ỉ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
@@ -3998,16 +3994,16 @@
     (=ucs		. #x1EC8)	; Ỉ
     (latin-viscii	. #x9B)	; &I-MULE-VIET-U-6F;
     (latin-viscii-upper . #xEF)	; &I-MULE-VIET-U-6F;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER I WITH HOOK ABOVE")
+      (=ucs		  . #x1EC9)	; ỉ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER I WITH HOOK ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER I WITH HOOK ABOVE")
-      (=ucs		  . #x1EC8)	; Ỉ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER I")
       (=ucs		  . #x0069)	; i
@@ -4019,16 +4015,16 @@
     (latin-tcvn5712	. #xD8)	; &I-VSCII2-58;
     (latin-viscii	. #xEF)	; &I-MULE-VIET-L-6F;
     (latin-viscii-lower . #xEF)	; &I-MULE-VIET-L-6F;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER I WITH HOOK ABOVE")
+      (=ucs		  . #x1EC8)	; Ỉ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER I WITH DOT BELOW")
-      (=ucs		  . #x1ECB)	; ị
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER I")
       (=ucs		  . #x0049)	; I
@@ -4039,16 +4035,16 @@
     (=ucs		. #x1ECA)	; Ị
     (latin-viscii	. #x98)	; &I-MULE-VIET-U-38;
     (latin-viscii-upper . #xB8)	; &I-MULE-VIET-U-38;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER I WITH DOT BELOW")
+      (=ucs		  . #x1ECB)	; ị
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER I WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER I WITH DOT BELOW")
-      (=ucs		  . #x1ECA)	; Ị
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER I")
       (=ucs		  . #x0069)	; i
@@ -4060,16 +4056,16 @@
     (latin-tcvn5712	. #xDE)	; &I-VSCII2-5E;
     (latin-viscii	. #xB8)	; &I-MULE-VIET-L-38;
     (latin-viscii-lower . #xB8)	; &I-MULE-VIET-L-38;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER I WITH DOT BELOW")
+      (=ucs		  . #x1ECA)	; Ị
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH DOT BELOW")
-      (=ucs		  . #x1ECD)	; ọ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
@@ -4080,16 +4076,16 @@
     (=ucs		. #x1ECC)	; Ọ
     (latin-viscii	. #x9A)	; &I-MULE-VIET-U-77;
     (latin-viscii-upper . #xF7)	; &I-MULE-VIET-U-77;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH DOT BELOW")
+      (=ucs		  . #x1ECD)	; ọ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH DOT BELOW")
-      (=ucs		  . #x1ECC)	; Ọ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
@@ -4101,16 +4097,16 @@
     (latin-tcvn5712	. #xE4)	; &I-VSCII2-64;
     (latin-viscii	. #xF7)	; &I-MULE-VIET-L-77;
     (latin-viscii-lower . #xF7)	; &I-MULE-VIET-L-77;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH DOT BELOW")
+      (=ucs		  . #x1ECC)	; Ọ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH HOOK ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH HOOK ABOVE")
-      (=ucs		  . #x1ECF)	; ỏ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O")
       (=ucs		  . #x004F)	; O
@@ -4121,16 +4117,16 @@
     (=ucs		. #x1ECE)	; Ỏ
     (latin-viscii	. #x99)	; &I-MULE-VIET-U-76;
     (latin-viscii-upper . #xF6)	; &I-MULE-VIET-U-76;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH HOOK ABOVE")
+      (=ucs		  . #x1ECF)	; ỏ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH HOOK ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH HOOK ABOVE")
-      (=ucs		  . #x1ECE)	; Ỏ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O")
       (=ucs		  . #x006F)	; o
@@ -4142,16 +4138,16 @@
     (latin-tcvn5712	. #xE1)	; &I-VSCII2-61;
     (latin-viscii	. #xF6)	; &I-MULE-VIET-L-76;
     (latin-viscii-lower . #xF6)	; &I-MULE-VIET-L-76;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH HOOK ABOVE")
+      (=ucs		  . #x1ECE)	; Ỏ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND ACUTE")
-      (=ucs		  . #x1ED1)	; ố
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX")
       (=ucs		  . #x00D4)	; Ô
@@ -4163,15 +4159,16 @@
     (latin-tcvn5712	. #xFF)	; &I-VSCII2-7F;
     (latin-viscii	. #x8F)	; &I-MULE-VIET-U-2F;
     (latin-viscii-upper . #xAF)	; &I-MULE-VIET-U-2F;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND ACUTE")
+      (=ucs		  . #x1ED1)	; ố
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND ACUTE")
       (=ucs		  . #x1ED0)	; Ố
       ))
-    (->lowercase
-     ((=jef-china3	  . #x86AC)	; &JC3-86AC;
-      ))
     (<-fullwidth
      ((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND ACUTE")
       (=ucs		  . #x1ED0)	; Ố
@@ -4184,16 +4181,15 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=jef-china3	. #x86A9)	; &JC3-86A9;
+    (->lowercase
+     ((=jef-china3	  . #x86AC)	; &JC3-86AC;
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND ACUTE")
-      (=ucs		  . #x1ED0)	; Ố
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH CIRCUMFLEX")
       (=ucs		  . #x00F4)	; ô
@@ -4205,15 +4201,16 @@
     (latin-tcvn5712	. #xE8)	; &I-VSCII2-68;
     (latin-viscii	. #xAF)	; &I-MULE-VIET-L-2F;
     (latin-viscii-lower . #xAF)	; &I-MULE-VIET-L-2F;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND ACUTE")
+      (=ucs		  . #x1ED0)	; Ố
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND ACUTE")
       (=ucs		  . #x1ED1)	; ố
       ))
-    (->uppercase
-     ((=jef-china3	  . #x86A9)	; &JC3-86A9;
-      ))
     (<-fullwidth
      ((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND ACUTE")
       (=ucs		  . #x1ED1)	; ố
@@ -4226,16 +4223,15 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=jef-china3	. #x86AC)	; &JC3-86AC;
+    (->uppercase
+     ((=jef-china3	  . #x86A9)	; &JC3-86A9;
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND GRAVE")
-      (=ucs		  . #x1ED3)	; ồ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX")
       (=ucs		  . #x00D4)	; Ô
@@ -4247,15 +4243,16 @@
     (latin-tcvn5712	. #xDB)	; &I-VSCII2-5B;
     (latin-viscii	. #x90)	; &I-MULE-VIET-U-30;
     (latin-viscii-upper . #xB0)	; &I-MULE-VIET-U-30;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND GRAVE")
+      (=ucs		  . #x1ED3)	; ồ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND GRAVE")
       (=ucs		  . #x1ED2)	; Ồ
       ))
-    (->lowercase
-     ((=jef-china3	  . #x85B6)	; &JC3-85B6;
-      ))
     (<-fullwidth
      ((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND GRAVE")
       (=ucs		  . #x1ED2)	; Ồ
@@ -4268,16 +4265,15 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=jef-china3	. #x85B3)	; &JC3-85B3;
+    (->lowercase
+     ((=jef-china3	  . #x85B6)	; &JC3-85B6;
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND GRAVE")
-      (=ucs		  . #x1ED2)	; Ồ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH CIRCUMFLEX")
       (=ucs		  . #x00F4)	; ô
@@ -4289,15 +4285,16 @@
     (latin-tcvn5712	. #xE5)	; &I-VSCII2-65;
     (latin-viscii	. #xB0)	; &I-MULE-VIET-L-30;
     (latin-viscii-lower . #xB0)	; &I-MULE-VIET-L-30;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND GRAVE")
+      (=ucs		  . #x1ED2)	; Ồ
+      ))
     ))
 (define-char
   '((<-denotational
      ((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND GRAVE")
       (=ucs		  . #x1ED3)	; ồ
       ))
-    (->uppercase
-     ((=jef-china3	  . #x85B3)	; &JC3-85B3;
-      ))
     (<-fullwidth
      ((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND GRAVE")
       (=ucs		  . #x1ED3)	; ồ
@@ -4310,16 +4307,15 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=jef-china3	. #x85B6)	; &JC3-85B6;
+    (->uppercase
+     ((=jef-china3	  . #x85B3)	; &JC3-85B3;
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND HOOK ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND HOOK ABOVE")
-      (=ucs		  . #x1ED5)	; ổ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX")
       (=ucs		  . #x00D4)	; Ô
@@ -4331,16 +4327,16 @@
     (latin-tcvn5712	. #xE0)	; &I-VSCII2-60;
     (latin-viscii	. #x91)	; &I-MULE-VIET-U-31;
     (latin-viscii-upper . #xB1)	; &I-MULE-VIET-U-31;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND HOOK ABOVE")
+      (=ucs		  . #x1ED5)	; ổ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND HOOK ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND HOOK ABOVE")
-      (=ucs		  . #x1ED4)	; Ổ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH CIRCUMFLEX")
       (=ucs		  . #x00F4)	; ô
@@ -4352,16 +4348,16 @@
     (latin-tcvn5712	. #xE6)	; &I-VSCII2-66;
     (latin-viscii	. #xB1)	; &I-MULE-VIET-L-31;
     (latin-viscii-lower . #xB1)	; &I-MULE-VIET-L-31;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND HOOK ABOVE")
+      (=ucs		  . #x1ED4)	; Ổ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND TILDE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND TILDE")
-      (=ucs		  . #x1ED7)	; ỗ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX")
       (=ucs		  . #x00D4)	; Ô
@@ -4373,16 +4369,16 @@
     (latin-tcvn5712	. #xF0)	; &I-VSCII2-70;
     (latin-viscii	. #x92)	; &I-MULE-VIET-U-32;
     (latin-viscii-upper . #xB2)	; &I-MULE-VIET-U-32;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND TILDE")
+      (=ucs		  . #x1ED7)	; ỗ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND TILDE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND TILDE")
-      (=ucs		  . #x1ED6)	; Ỗ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH CIRCUMFLEX")
       (=ucs		  . #x00F4)	; ô
@@ -4394,16 +4390,16 @@
     (latin-tcvn5712	. #xE7)	; &I-VSCII2-67;
     (latin-viscii	. #xB2)	; &I-MULE-VIET-L-32;
     (latin-viscii-lower . #xB2)	; &I-MULE-VIET-L-32;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND TILDE")
+      (=ucs		  . #x1ED6)	; Ỗ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND DOT BELOW")
-      (=ucs		  . #x1ED9)	; ộ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH DOT BELOW")
       (=ucs		  . #x1ECC)	; Ọ
@@ -4414,16 +4410,16 @@
     (=ucs		. #x1ED8)	; Ộ
     (latin-viscii	. #x93)	; &I-MULE-VIET-U-35;
     (latin-viscii-upper . #xB5)	; &I-MULE-VIET-U-35;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND DOT BELOW")
+      (=ucs		  . #x1ED9)	; ộ
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER O WITH CIRCUMFLEX AND DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND DOT BELOW")
-      (=ucs		  . #x1ED8)	; Ộ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH DOT BELOW")
       (=ucs		  . #x1ECD)	; ọ
@@ -4435,16 +4431,16 @@
     (latin-tcvn5712	. #xE9)	; &I-VSCII2-69;
     (latin-viscii	. #xB5)	; &I-MULE-VIET-L-35;
     (latin-viscii-lower . #xB5)	; &I-MULE-VIET-L-35;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND DOT BELOW")
+      (=ucs		  . #x1ED8)	; Ộ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH HORN AND ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH HORN AND ACUTE")
-      (=ucs		  . #x1EDB)	; ớ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH HORN")
       (=ucs		  . #x01A0)	; Æ 
@@ -4455,16 +4451,16 @@
     (=ucs		. #x1EDA)	; Ớ
     (latin-viscii	. #x95)	; &I-MULE-VIET-U-3E;
     (latin-viscii-upper . #xBE)	; &I-MULE-VIET-U-3E;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH HORN AND ACUTE")
+      (=ucs		  . #x1EDB)	; ớ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH HORN AND ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH HORN AND ACUTE")
-      (=ucs		  . #x1EDA)	; Ớ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH HORN")
       (=ucs		  . #x01A1)	; Æ¡
@@ -4476,16 +4472,16 @@
     (latin-tcvn5712	. #xED)	; &I-VSCII2-6D;
     (latin-viscii	. #xBE)	; &I-MULE-VIET-L-3E;
     (latin-viscii-lower . #xBE)	; &I-MULE-VIET-L-3E;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH HORN AND ACUTE")
+      (=ucs		  . #x1EDA)	; Ớ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH HORN AND GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH HORN AND GRAVE")
-      (=ucs		  . #x1EDD)	; ờ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH HORN")
       (=ucs		  . #x01A0)	; Æ 
@@ -4496,16 +4492,16 @@
     (=ucs		. #x1EDC)	; Ờ
     (latin-viscii	. #x96)	; &I-MULE-VIET-U-36;
     (latin-viscii-upper . #xB6)	; &I-MULE-VIET-U-36;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH HORN AND GRAVE")
+      (=ucs		  . #x1EDD)	; ờ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH HORN AND GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH HORN AND GRAVE")
-      (=ucs		  . #x1EDC)	; Ờ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH HORN")
       (=ucs		  . #x01A1)	; Æ¡
@@ -4517,16 +4513,16 @@
     (latin-tcvn5712	. #xEA)	; &I-VSCII2-6A;
     (latin-viscii	. #xB6)	; &I-MULE-VIET-L-36;
     (latin-viscii-lower . #xB6)	; &I-MULE-VIET-L-36;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH HORN AND GRAVE")
+      (=ucs		  . #x1EDC)	; Ờ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER O WITH HORN AND HOOK ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER O WITH HORN AND HOOK ABOVE")
-      (=ucs		  . #x1EDF)	; ở
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH HORN")
       (=ucs		  . #x01A0)	; Æ 
@@ -4537,16 +4533,16 @@
     (=ucs		. #x1EDE)	; Ở
     (latin-viscii	. #x97)	; &I-MULE-VIET-U-37;
     (latin-viscii-upper . #xB7)	; &I-MULE-VIET-U-37;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER O WITH HORN AND HOOK ABOVE")
+      (=ucs		  . #x1EDF)	; ở
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER O WITH HORN AND HOOK ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER O WITH HORN AND HOOK ABOVE")
-      (=ucs		  . #x1EDE)	; Ở
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH HORN")
       (=ucs		  . #x01A1)	; Æ¡
@@ -4558,16 +4554,16 @@
     (latin-tcvn5712	. #xEB)	; &I-VSCII2-6B;
     (latin-viscii	. #xB7)	; &I-MULE-VIET-L-37;
     (latin-viscii-lower . #xB7)	; &I-MULE-VIET-L-37;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER O WITH HORN AND HOOK ABOVE")
+      (=ucs		  . #x1EDE)	; Ở
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O WITH HORN AND TILDE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER O WITH HORN AND TILDE")
-      (=ucs		  . #x1EE1)	; ỡ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH HORN")
       (=ucs		  . #x01A0)	; Æ 
@@ -4578,16 +4574,16 @@
     (=ucs		. #x1EE0)	; á» 
     (latin-viscii	. #xB3)	; &I-MULE-VIET-U-5E;
     (latin-viscii-upper . #xDE)	; &I-MULE-VIET-U-5E;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER O WITH HORN AND TILDE")
+      (=ucs		  . #x1EE1)	; ỡ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH HORN AND TILDE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER O WITH HORN AND TILDE")
-      (=ucs		  . #x1EE0)	; á» 
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH HORN")
       (=ucs		  . #x01A1)	; Æ¡
@@ -4599,16 +4595,16 @@
     (latin-tcvn5712	. #xEC)	; &I-VSCII2-6C;
     (latin-viscii	. #xDE)	; &I-MULE-VIET-L-5E;
     (latin-viscii-lower . #xDE)	; &I-MULE-VIET-L-5E;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER O WITH HORN AND TILDE")
+      (=ucs		  . #x1EE0)	; á» 
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER O WITH HORN AND DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER O WITH HORN AND DOT BELOW")
-      (=ucs		  . #x1EE3)	; ợ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER O WITH HORN")
       (=ucs		  . #x01A0)	; Æ 
@@ -4619,16 +4615,16 @@
     (=ucs		. #x1EE2)	; Ợ
     (latin-viscii	. #x94)	; &I-MULE-VIET-U-7E;
     (latin-viscii-upper . #xFE)	; &I-MULE-VIET-U-7E;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER O WITH HORN AND DOT BELOW")
+      (=ucs		  . #x1EE3)	; ợ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O WITH HORN AND DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER O WITH HORN AND DOT BELOW")
-      (=ucs		  . #x1EE2)	; Ợ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER O WITH HORN")
       (=ucs		  . #x01A1)	; Æ¡
@@ -4640,16 +4636,16 @@
     (latin-tcvn5712	. #xEE)	; &I-VSCII2-6E;
     (latin-viscii	. #xFE)	; &I-MULE-VIET-L-7E;
     (latin-viscii-lower . #xFE)	; &I-MULE-VIET-L-7E;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER O WITH HORN AND DOT BELOW")
+      (=ucs		  . #x1EE2)	; Ợ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH DOT BELOW")
-      (=ucs		  . #x1EE5)	; ụ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -4660,16 +4656,16 @@
     (=ucs		. #x1EE4)	; Ụ
     (latin-viscii	. #x9E)	; &I-MULE-VIET-U-78;
     (latin-viscii-upper . #xF8)	; &I-MULE-VIET-U-78;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH DOT BELOW")
+      (=ucs		  . #x1EE5)	; ụ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH DOT BELOW")
-      (=ucs		  . #x1EE4)	; Ụ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -4681,16 +4677,16 @@
     (latin-tcvn5712	. #xF4)	; &I-VSCII2-74;
     (latin-viscii	. #xF8)	; &I-MULE-VIET-L-78;
     (latin-viscii-lower . #xF8)	; &I-MULE-VIET-L-78;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH DOT BELOW")
+      (=ucs		  . #x1EE4)	; Ụ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH HOOK ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH HOOK ABOVE")
-      (=ucs		  . #x1EE7)	; ủ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U")
       (=ucs		  . #x0055)	; U
@@ -4701,16 +4697,16 @@
     (=ucs		. #x1EE6)	; Ủ
     (latin-viscii	. #x9C)	; &I-MULE-VIET-U-7C;
     (latin-viscii-upper . #xFC)	; &I-MULE-VIET-U-7C;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH HOOK ABOVE")
+      (=ucs		  . #x1EE7)	; ủ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH HOOK ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH HOOK ABOVE")
-      (=ucs		  . #x1EE6)	; Ủ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U")
       (=ucs		  . #x0075)	; u
@@ -4722,16 +4718,16 @@
     (latin-tcvn5712	. #xF1)	; &I-VSCII2-71;
     (latin-viscii	. #xFC)	; &I-MULE-VIET-L-7C;
     (latin-viscii-lower . #xFC)	; &I-MULE-VIET-L-7C;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH HOOK ABOVE")
+      (=ucs		  . #x1EE6)	; Ủ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH HORN AND ACUTE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH HORN AND ACUTE")
-      (=ucs		  . #x1EE9)	; ứ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U WITH HORN")
       (=ucs		  . #x01AF)	; Ư
@@ -4742,16 +4738,16 @@
     (=ucs		. #x1EE8)	; Ứ
     (latin-viscii	. #xBA)	; &I-MULE-VIET-U-51;
     (latin-viscii-upper . #xD1)	; &I-MULE-VIET-U-51;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH HORN AND ACUTE")
+      (=ucs		  . #x1EE9)	; ứ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH HORN AND ACUTE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH HORN AND ACUTE")
-      (=ucs		  . #x1EE8)	; Ứ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U WITH HORN")
       (=ucs		  . #x01B0)	; Æ°
@@ -4763,16 +4759,16 @@
     (latin-tcvn5712	. #xF8)	; &I-VSCII2-78;
     (latin-viscii	. #xD1)	; &I-MULE-VIET-L-51;
     (latin-viscii-lower . #xD1)	; &I-MULE-VIET-L-51;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH HORN AND ACUTE")
+      (=ucs		  . #x1EE8)	; Ứ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH HORN AND GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH HORN AND GRAVE")
-      (=ucs		  . #x1EEB)	; ừ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U WITH HORN")
       (=ucs		  . #x01AF)	; Ư
@@ -4783,16 +4779,16 @@
     (=ucs		. #x1EEA)	; Ừ
     (latin-viscii	. #xBB)	; &I-MULE-VIET-U-57;
     (latin-viscii-upper . #xD7)	; &I-MULE-VIET-U-57;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH HORN AND GRAVE")
+      (=ucs		  . #x1EEB)	; ừ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH HORN AND GRAVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH HORN AND GRAVE")
-      (=ucs		  . #x1EEA)	; Ừ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U WITH HORN")
       (=ucs		  . #x01B0)	; Æ°
@@ -4804,16 +4800,16 @@
     (latin-tcvn5712	. #xF5)	; &I-VSCII2-75;
     (latin-viscii	. #xD7)	; &I-MULE-VIET-L-57;
     (latin-viscii-lower . #xD7)	; &I-MULE-VIET-L-57;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH HORN AND GRAVE")
+      (=ucs		  . #x1EEA)	; Ừ
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER U WITH HORN AND HOOK ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER U WITH HORN AND HOOK ABOVE")
-      (=ucs		  . #x1EED)	; á»­
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U WITH HORN")
       (=ucs		  . #x01AF)	; Ư
@@ -4824,16 +4820,16 @@
     (=ucs		. #x1EEC)	; Ử
     (latin-viscii	. #xBC)	; &I-MULE-VIET-U-58;
     (latin-viscii-upper . #xD8)	; &I-MULE-VIET-U-58;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER U WITH HORN AND HOOK ABOVE")
+      (=ucs		  . #x1EED)	; á»­
+      ))
     ))
 (define-char
   '((name . "LATIN SMALL LETTER U WITH HORN AND HOOK ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER U WITH HORN AND HOOK ABOVE")
-      (=ucs		  . #x1EEC)	; Ử
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U WITH HORN")
       (=ucs		  . #x01B0)	; Æ°
@@ -4845,16 +4841,16 @@
     (latin-tcvn5712	. #xF6)	; &I-VSCII2-76;
     (latin-viscii	. #xD8)	; &I-MULE-VIET-L-58;
     (latin-viscii-lower . #xD8)	; &I-MULE-VIET-L-58;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER U WITH HORN AND HOOK ABOVE")
+      (=ucs		  . #x1EEC)	; Ử
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U WITH HORN AND TILDE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER U WITH HORN AND TILDE")
-      (=ucs		  . #x1EEF)	; ữ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U WITH HORN")
       (=ucs		  . #x01AF)	; Ư
@@ -4865,16 +4861,16 @@
     (=ucs		. #x1EEE)	; á»®
     (latin-viscii	. #xFF)	; &I-MULE-VIET-U-66;
     (latin-viscii-upper . #xE6)	; &I-MULE-VIET-U-66;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER U WITH HORN AND TILDE")
+      (=ucs		  . #x1EEF)	; ữ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH HORN AND TILDE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER U WITH HORN AND TILDE")
-      (=ucs		  . #x1EEE)	; á»®
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U WITH HORN")
       (=ucs		  . #x01B0)	; Æ°
@@ -4886,16 +4882,16 @@
     (latin-tcvn5712	. #xF7)	; &I-VSCII2-77;
     (latin-viscii	. #xE6)	; &I-MULE-VIET-L-66;
     (latin-viscii-lower . #xE6)	; &I-MULE-VIET-L-66;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER U WITH HORN AND TILDE")
+      (=ucs		  . #x1EEE)	; á»®
+      ))
     ))
 (define-char
   '((name . "LATIN CAPITAL LETTER U WITH HORN AND DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "LATIN SMALL LETTER U WITH HORN AND DOT BELOW")
-      (=ucs		  . #x1EF1)	; á»±
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER U WITH HORN")
       (=ucs		  . #x01AF)	; Ư
@@ -4906,16 +4902,16 @@
     (=ucs		. #x1EF0)	; á»°
     (latin-viscii	. #xB9)	; &I-MULE-VIET-U-71;
     (latin-viscii-upper . #xF1)	; &I-MULE-VIET-U-71;
+    (->lowercase
+     ((name . "LATIN SMALL LETTER U WITH HORN AND DOT BELOW")
+      (=ucs		  . #x1EF1)	; á»±
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U WITH HORN AND DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "LATIN CAPITAL LETTER U WITH HORN AND DOT BELOW")
-      (=ucs		  . #x1EF0)	; á»°
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER U WITH HORN")
       (=ucs		  . #x01B0)	; Æ°
@@ -4927,16 +4923,16 @@
     (latin-tcvn5712	. #xF9)	; &I-VSCII2-79;
     (latin-viscii	. #xF1)	; &I-MULE-VIET-L-71;
     (latin-viscii-lower . #xF1)	; &I-MULE-VIET-L-71;
+    (->uppercase
+     ((name . "LATIN CAPITAL LETTER U WITH HORN AND DOT BELOW")
+      (=ucs		  . #x1EF0)	; á»°
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Y WITH GRAVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER Y WITH GRAVE")
-      (=ucs		  . #x1EF3)	; ỳ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER Y")
       (=ucs		  . #x0059)	; Y
@@ -4947,6 +4943,10 @@
     (=ucs		. #x1EF2)	; Ỳ
     (latin-viscii	. #x9F)	; &I-MULE-VIET-U-4F;
     (latin-viscii-upper . #xCF)	; &I-MULE-VIET-U-4F;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER Y WITH GRAVE")
+      (=ucs		  . #x1EF3)	; ỳ
+      ))
     ))
 (define-char
   '((<-denotational
@@ -4971,10 +4971,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER Y WITH GRAVE")
-      (=ucs		  . #x1EF2)	; Ỳ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER Y")
       (=ucs		  . #x0079)	; y
@@ -4986,16 +4982,16 @@
     (latin-tcvn5712	. #xFA)	; &I-VSCII2-7A;
     (latin-viscii	. #xCF)	; &I-MULE-VIET-L-4F;
     (latin-viscii-lower . #xCF)	; &I-MULE-VIET-L-4F;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER Y WITH GRAVE")
+      (=ucs		  . #x1EF2)	; Ỳ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Y WITH DOT BELOW")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER Y WITH DOT BELOW")
-      (=ucs		  . #x1EF5)	; ỵ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER Y")
       (=ucs		  . #x0059)	; Y
@@ -5006,16 +5002,16 @@
     (=ucs		. #x1EF4)	; á»´
     (latin-viscii	. #x1E)	; &I-MULE-VIET-U-5C;
     (latin-viscii-upper . #xDC)	; &I-MULE-VIET-U-5C;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER Y WITH DOT BELOW")
+      (=ucs		  . #x1EF5)	; ỵ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Y WITH DOT BELOW")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER Y WITH DOT BELOW")
-      (=ucs		  . #x1EF4)	; á»´
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER Y")
       (=ucs		  . #x0079)	; y
@@ -5027,16 +5023,16 @@
     (latin-tcvn5712	. #xFE)	; &I-VSCII2-7E;
     (latin-viscii	. #xDC)	; &I-MULE-VIET-L-5C;
     (latin-viscii-lower . #xDC)	; &I-MULE-VIET-L-5C;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER Y WITH DOT BELOW")
+      (=ucs		  . #x1EF4)	; á»´
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Y WITH HOOK ABOVE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER Y WITH HOOK ABOVE")
-      (=ucs		  . #x1EF7)	; á»·
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER Y")
       (=ucs		  . #x0059)	; Y
@@ -5047,16 +5043,16 @@
     (=ucs		. #x1EF6)	; Ỷ
     (latin-viscii	. #x14)	; &I-MULE-VIET-U-56;
     (latin-viscii-upper . #xD6)	; &I-MULE-VIET-U-56;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER Y WITH HOOK ABOVE")
+      (=ucs		  . #x1EF7)	; á»·
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Y WITH HOOK ABOVE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER Y WITH HOOK ABOVE")
-      (=ucs		  . #x1EF6)	; Ỷ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER Y")
       (=ucs		  . #x0079)	; y
@@ -5068,16 +5064,16 @@
     (latin-tcvn5712	. #xFB)	; &I-VSCII2-7B;
     (latin-viscii	. #xD6)	; &I-MULE-VIET-L-56;
     (latin-viscii-lower . #xD6)	; &I-MULE-VIET-L-56;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER Y WITH HOOK ABOVE")
+      (=ucs		  . #x1EF6)	; Ỷ
+      ))
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Y WITH TILDE")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "LATIN SMALL LETTER Y WITH TILDE")
-      (=ucs		  . #x1EF9)	; ỹ
-      ))
     (=decomposition
      ((name		  . "LATIN CAPITAL LETTER Y")
       (=ucs		  . #x0059)	; Y
@@ -5088,16 +5084,16 @@
     (=ucs		. #x1EF8)	; Ỹ
     (latin-viscii	. #x19)	; &I-MULE-VIET-U-5B;
     (latin-viscii-upper . #xDB)	; &I-MULE-VIET-U-5B;
+    (->lowercase
+     ((name		  . "LATIN SMALL LETTER Y WITH TILDE")
+      (=ucs		  . #x1EF9)	; ỹ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Y WITH TILDE")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER Y WITH TILDE")
-      (=ucs		  . #x1EF8)	; Ỹ
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER Y")
       (=ucs		  . #x0079)	; y
@@ -5109,4 +5105,8 @@
     (latin-tcvn5712	. #xFC)	; &I-VSCII2-7C;
     (latin-viscii	. #xDB)	; &I-MULE-VIET-L-5B;
     (latin-viscii-lower . #xDB)	; &I-MULE-VIET-L-5B;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER Y WITH TILDE")
+      (=ucs		  . #x1EF8)	; Ỹ
+      ))
     ))
diff --git a/lisp/utf-2000/u01F00-Greek-Extended.el b/lisp/utf-2000/u01F00-Greek-Extended.el
index 3939f08..c043c90 100644
--- a/lisp/utf-2000/u01F00-Greek-Extended.el
+++ b/lisp/utf-2000/u01F00-Greek-Extended.el
@@ -4,10 +4,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER ALPHA WITH PSILI")
-      (=ucs		  . #x1F08)	; Ἀ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ALPHA")
       (=ucs		  . #x03B1)	; α
@@ -16,16 +12,16 @@
       (=ucs		  . #x0313)	; ̓
       ))
     (=ucs		. #x1F00)	; ἀ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER ALPHA WITH PSILI")
+      (=ucs		  . #x1F08)	; Ἀ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ALPHA WITH DASIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER ALPHA WITH DASIA")
-      (=ucs		  . #x1F09)	; Ἁ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ALPHA")
       (=ucs		  . #x03B1)	; α
@@ -34,16 +30,16 @@
       (=ucs		  . #x0314)	; ̔
       ))
     (=ucs		. #x1F01)	; ἁ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER ALPHA WITH DASIA")
+      (=ucs		  . #x1F09)	; Ἁ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND VARIA")
-      (=ucs		  . #x1F0A)	; Ἂ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ALPHA WITH PSILI")
       (=ucs		  . #x1F00)	; ἀ
@@ -52,16 +48,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F02)	; ἂ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND VARIA")
+      (=ucs		  . #x1F0A)	; Ἂ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND VARIA")
-      (=ucs		  . #x1F0B)	; Ἃ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ALPHA WITH DASIA")
       (=ucs		  . #x1F01)	; ἁ
@@ -70,16 +66,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F03)	; ἃ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND VARIA")
+      (=ucs		  . #x1F0B)	; Ἃ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ALPHA WITH PSILI AND OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND OXIA")
-      (=ucs		  . #x1F0C)	; Ἄ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ALPHA WITH PSILI")
       (=ucs		  . #x1F00)	; ἀ
@@ -88,16 +84,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F04)	; ἄ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND OXIA")
+      (=ucs		  . #x1F0C)	; Ἄ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ALPHA WITH DASIA AND OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND OXIA")
-      (=ucs		  . #x1F0D)	; Ἅ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ALPHA WITH DASIA")
       (=ucs		  . #x1F01)	; ἁ
@@ -106,16 +102,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F05)	; ἅ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND OXIA")
+      (=ucs		  . #x1F0D)	; Ἅ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND PERISPOMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND PERISPOMENI")
-      (=ucs		  . #x1F0E)	; Ἆ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ALPHA WITH PSILI")
       (=ucs		  . #x1F00)	; ἀ
@@ -124,16 +120,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F06)	; ἆ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND PERISPOMENI")
+      (=ucs		  . #x1F0E)	; Ἆ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND PERISPOMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND PERISPOMENI")
-      (=ucs		  . #x1F0F)	; Ἇ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ALPHA WITH DASIA")
       (=ucs		  . #x1F01)	; ἁ
@@ -142,16 +138,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F07)	; ἇ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND PERISPOMENI")
+      (=ucs		  . #x1F0F)	; Ἇ
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER ALPHA WITH PSILI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER ALPHA WITH PSILI")
-      (=ucs		  . #x1F00)	; ἀ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ALPHA")
       (=ucs		  . #x0391)	; Α
@@ -160,16 +156,16 @@
       (=ucs		  . #x0313)	; ̓
       ))
     (=ucs		. #x1F08)	; Ἀ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER ALPHA WITH PSILI")
+      (=ucs		  . #x1F00)	; ἀ
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER ALPHA WITH DASIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER ALPHA WITH DASIA")
-      (=ucs		  . #x1F01)	; ἁ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ALPHA")
       (=ucs		  . #x0391)	; Α
@@ -178,16 +174,16 @@
       (=ucs		  . #x0314)	; ̔
       ))
     (=ucs		. #x1F09)	; Ἁ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER ALPHA WITH DASIA")
+      (=ucs		  . #x1F01)	; ἁ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND VARIA")
-      (=ucs		  . #x1F02)	; ἂ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ALPHA WITH PSILI")
       (=ucs		  . #x1F08)	; Ἀ
@@ -196,16 +192,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F0A)	; Ἂ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND VARIA")
+      (=ucs		  . #x1F02)	; ἂ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND VARIA")
-      (=ucs		  . #x1F03)	; ἃ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ALPHA WITH DASIA")
       (=ucs		  . #x1F09)	; Ἁ
@@ -214,16 +210,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F0B)	; Ἃ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND VARIA")
+      (=ucs		  . #x1F03)	; ἃ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND OXIA")
-      (=ucs		  . #x1F04)	; ἄ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ALPHA WITH PSILI")
       (=ucs		  . #x1F08)	; Ἀ
@@ -232,16 +228,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F0C)	; Ἄ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND OXIA")
+      (=ucs		  . #x1F04)	; ἄ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND OXIA")
-      (=ucs		  . #x1F05)	; ἅ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ALPHA WITH DASIA")
       (=ucs		  . #x1F09)	; Ἁ
@@ -250,16 +246,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F0D)	; Ἅ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND OXIA")
+      (=ucs		  . #x1F05)	; ἅ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND PERISPOMENI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND PERISPOMENI")
-      (=ucs		  . #x1F06)	; ἆ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ALPHA WITH PSILI")
       (=ucs		  . #x1F08)	; Ἀ
@@ -268,16 +264,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F0E)	; Ἆ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND PERISPOMENI")
+      (=ucs		  . #x1F06)	; ἆ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND PERISPOMENI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND PERISPOMENI")
-      (=ucs		  . #x1F07)	; ἇ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ALPHA WITH DASIA")
       (=ucs		  . #x1F09)	; Ἁ
@@ -286,16 +282,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F0F)	; Ἇ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND PERISPOMENI")
+      (=ucs		  . #x1F07)	; ἇ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER EPSILON WITH PSILI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER EPSILON WITH PSILI")
-      (=ucs		  . #x1F18)	; Ἐ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER EPSILON")
       (=ucs		  . #x03B5)	; ε
@@ -304,16 +300,16 @@
       (=ucs		  . #x0313)	; ̓
       ))
     (=ucs		. #x1F10)	; ἐ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER EPSILON WITH PSILI")
+      (=ucs		  . #x1F18)	; Ἐ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER EPSILON WITH DASIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER EPSILON WITH DASIA")
-      (=ucs		  . #x1F19)	; Ἑ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER EPSILON")
       (=ucs		  . #x03B5)	; ε
@@ -322,16 +318,16 @@
       (=ucs		  . #x0314)	; ̔
       ))
     (=ucs		. #x1F11)	; ἑ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER EPSILON WITH DASIA")
+      (=ucs		  . #x1F19)	; Ἑ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER EPSILON WITH PSILI AND VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER EPSILON WITH PSILI AND VARIA")
-      (=ucs		  . #x1F1A)	; Ἒ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER EPSILON WITH PSILI")
       (=ucs		  . #x1F10)	; ἐ
@@ -340,16 +336,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F12)	; ἒ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER EPSILON WITH PSILI AND VARIA")
+      (=ucs		  . #x1F1A)	; Ἒ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER EPSILON WITH DASIA AND VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER EPSILON WITH DASIA AND VARIA")
-      (=ucs		  . #x1F1B)	; Ἓ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER EPSILON WITH DASIA")
       (=ucs		  . #x1F11)	; ἑ
@@ -358,16 +354,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F13)	; ἓ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER EPSILON WITH DASIA AND VARIA")
+      (=ucs		  . #x1F1B)	; Ἓ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER EPSILON WITH PSILI AND OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER EPSILON WITH PSILI AND OXIA")
-      (=ucs		  . #x1F1C)	; Ἔ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER EPSILON WITH PSILI")
       (=ucs		  . #x1F10)	; ἐ
@@ -376,16 +372,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F14)	; ἔ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER EPSILON WITH PSILI AND OXIA")
+      (=ucs		  . #x1F1C)	; Ἔ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER EPSILON WITH DASIA AND OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER EPSILON WITH DASIA AND OXIA")
-      (=ucs		  . #x1F1D)	; Ἕ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER EPSILON WITH DASIA")
       (=ucs		  . #x1F11)	; ἑ
@@ -394,16 +390,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F15)	; ἕ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER EPSILON WITH DASIA AND OXIA")
+      (=ucs		  . #x1F1D)	; Ἕ
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER EPSILON WITH PSILI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER EPSILON WITH PSILI")
-      (=ucs		  . #x1F10)	; ἐ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER EPSILON")
       (=ucs		  . #x0395)	; Ε
@@ -412,16 +408,16 @@
       (=ucs		  . #x0313)	; ̓
       ))
     (=ucs		. #x1F18)	; Ἐ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER EPSILON WITH PSILI")
+      (=ucs		  . #x1F10)	; ἐ
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER EPSILON WITH DASIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER EPSILON WITH DASIA")
-      (=ucs		  . #x1F11)	; ἑ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER EPSILON")
       (=ucs		  . #x0395)	; Ε
@@ -430,16 +426,16 @@
       (=ucs		  . #x0314)	; ̔
       ))
     (=ucs		. #x1F19)	; Ἑ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER EPSILON WITH DASIA")
+      (=ucs		  . #x1F11)	; ἑ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER EPSILON WITH PSILI AND VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER EPSILON WITH PSILI AND VARIA")
-      (=ucs		  . #x1F12)	; ἒ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER EPSILON WITH PSILI")
       (=ucs		  . #x1F18)	; Ἐ
@@ -448,16 +444,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F1A)	; Ἒ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER EPSILON WITH PSILI AND VARIA")
+      (=ucs		  . #x1F12)	; ἒ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER EPSILON WITH DASIA AND VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER EPSILON WITH DASIA AND VARIA")
-      (=ucs		  . #x1F13)	; ἓ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER EPSILON WITH DASIA")
       (=ucs		  . #x1F19)	; Ἑ
@@ -466,16 +462,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F1B)	; Ἓ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER EPSILON WITH DASIA AND VARIA")
+      (=ucs		  . #x1F13)	; ἓ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER EPSILON WITH PSILI AND OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER EPSILON WITH PSILI AND OXIA")
-      (=ucs		  . #x1F14)	; ἔ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER EPSILON WITH PSILI")
       (=ucs		  . #x1F18)	; Ἐ
@@ -484,16 +480,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F1C)	; Ἔ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER EPSILON WITH PSILI AND OXIA")
+      (=ucs		  . #x1F14)	; ἔ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER EPSILON WITH DASIA AND OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER EPSILON WITH DASIA AND OXIA")
-      (=ucs		  . #x1F15)	; ἕ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER EPSILON WITH DASIA")
       (=ucs		  . #x1F19)	; Ἑ
@@ -502,16 +498,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F1D)	; Ἕ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER EPSILON WITH DASIA AND OXIA")
+      (=ucs		  . #x1F15)	; ἕ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ETA WITH PSILI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER ETA WITH PSILI")
-      (=ucs		  . #x1F28)	; Ἠ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ETA")
       (=ucs		  . #x03B7)	; η
@@ -520,16 +516,16 @@
       (=ucs		  . #x0313)	; ̓
       ))
     (=ucs		. #x1F20)	; á¼ 
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER ETA WITH PSILI")
+      (=ucs		  . #x1F28)	; Ἠ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ETA WITH DASIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER ETA WITH DASIA")
-      (=ucs		  . #x1F29)	; Ἡ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ETA")
       (=ucs		  . #x03B7)	; η
@@ -538,16 +534,16 @@
       (=ucs		  . #x0314)	; ̔
       ))
     (=ucs		. #x1F21)	; ἡ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER ETA WITH DASIA")
+      (=ucs		  . #x1F29)	; Ἡ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ETA WITH PSILI AND VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND VARIA")
-      (=ucs		  . #x1F2A)	; Ἢ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ETA WITH PSILI")
       (=ucs		  . #x1F20)	; á¼ 
@@ -556,16 +552,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F22)	; á¼¢
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND VARIA")
+      (=ucs		  . #x1F2A)	; Ἢ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ETA WITH DASIA AND VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND VARIA")
-      (=ucs		  . #x1F2B)	; Ἣ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ETA WITH DASIA")
       (=ucs		  . #x1F21)	; ἡ
@@ -574,16 +570,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F23)	; á¼£
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND VARIA")
+      (=ucs		  . #x1F2B)	; Ἣ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ETA WITH PSILI AND OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND OXIA")
-      (=ucs		  . #x1F2C)	; Ἤ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ETA WITH PSILI")
       (=ucs		  . #x1F20)	; á¼ 
@@ -592,16 +588,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F24)	; ἤ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND OXIA")
+      (=ucs		  . #x1F2C)	; Ἤ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ETA WITH DASIA AND OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND OXIA")
-      (=ucs		  . #x1F2D)	; á¼­
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ETA WITH DASIA")
       (=ucs		  . #x1F21)	; ἡ
@@ -610,16 +606,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F25)	; á¼¥
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND OXIA")
+      (=ucs		  . #x1F2D)	; á¼­
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH PSILI AND PERISPOMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND PERISPOMENI")
-      (=ucs		  . #x1F2E)	; á¼®
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ETA WITH PSILI")
       (=ucs		  . #x1F20)	; á¼ 
@@ -628,16 +624,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F26)	; ἦ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND PERISPOMENI")
+      (=ucs		  . #x1F2E)	; á¼®
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH DASIA AND PERISPOMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND PERISPOMENI")
-      (=ucs		  . #x1F2F)	; Ἧ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ETA WITH DASIA")
       (=ucs		  . #x1F21)	; ἡ
@@ -646,16 +642,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F27)	; ἧ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND PERISPOMENI")
+      (=ucs		  . #x1F2F)	; Ἧ
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER ETA WITH PSILI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER ETA WITH PSILI")
-      (=ucs		  . #x1F20)	; á¼ 
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ETA")
       (=ucs		  . #x0397)	; Η
@@ -664,16 +660,16 @@
       (=ucs		  . #x0313)	; ̓
       ))
     (=ucs		. #x1F28)	; Ἠ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER ETA WITH PSILI")
+      (=ucs		  . #x1F20)	; á¼ 
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER ETA WITH DASIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER ETA WITH DASIA")
-      (=ucs		  . #x1F21)	; ἡ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ETA")
       (=ucs		  . #x0397)	; Η
@@ -682,16 +678,16 @@
       (=ucs		  . #x0314)	; ̔
       ))
     (=ucs		. #x1F29)	; Ἡ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER ETA WITH DASIA")
+      (=ucs		  . #x1F21)	; ἡ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ETA WITH PSILI AND VARIA")
-      (=ucs		  . #x1F22)	; á¼¢
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ETA WITH PSILI")
       (=ucs		  . #x1F28)	; Ἠ
@@ -700,16 +696,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F2A)	; Ἢ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ETA WITH PSILI AND VARIA")
+      (=ucs		  . #x1F22)	; á¼¢
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ETA WITH DASIA AND VARIA")
-      (=ucs		  . #x1F23)	; á¼£
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ETA WITH DASIA")
       (=ucs		  . #x1F29)	; Ἡ
@@ -718,16 +714,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F2B)	; Ἣ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ETA WITH DASIA AND VARIA")
+      (=ucs		  . #x1F23)	; á¼£
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER ETA WITH PSILI AND OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER ETA WITH PSILI AND OXIA")
-      (=ucs		  . #x1F24)	; ἤ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ETA WITH PSILI")
       (=ucs		  . #x1F28)	; Ἠ
@@ -736,16 +732,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F2C)	; Ἤ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER ETA WITH PSILI AND OXIA")
+      (=ucs		  . #x1F24)	; ἤ
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER ETA WITH DASIA AND OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER ETA WITH DASIA AND OXIA")
-      (=ucs		  . #x1F25)	; á¼¥
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ETA WITH DASIA")
       (=ucs		  . #x1F29)	; Ἡ
@@ -754,16 +750,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F2D)	; á¼­
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER ETA WITH DASIA AND OXIA")
+      (=ucs		  . #x1F25)	; á¼¥
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND PERISPOMENI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ETA WITH PSILI AND PERISPOMENI")
-      (=ucs		  . #x1F26)	; ἦ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ETA WITH PSILI")
       (=ucs		  . #x1F28)	; Ἠ
@@ -772,16 +768,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F2E)	; á¼®
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ETA WITH PSILI AND PERISPOMENI")
+      (=ucs		  . #x1F26)	; ἦ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND PERISPOMENI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ETA WITH DASIA AND PERISPOMENI")
-      (=ucs		  . #x1F27)	; ἧ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ETA WITH DASIA")
       (=ucs		  . #x1F29)	; Ἡ
@@ -790,16 +786,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F2F)	; Ἧ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ETA WITH DASIA AND PERISPOMENI")
+      (=ucs		  . #x1F27)	; ἧ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER IOTA WITH PSILI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER IOTA WITH PSILI")
-      (=ucs		  . #x1F38)	; Ἰ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER IOTA")
       (=ucs		  . #x03B9)	; ι
@@ -808,16 +804,16 @@
       (=ucs		  . #x0313)	; ̓
       ))
     (=ucs		. #x1F30)	; á¼°
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER IOTA WITH PSILI")
+      (=ucs		  . #x1F38)	; Ἰ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER IOTA WITH DASIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER IOTA WITH DASIA")
-      (=ucs		  . #x1F39)	; á¼¹
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER IOTA")
       (=ucs		  . #x03B9)	; ι
@@ -826,16 +822,16 @@
       (=ucs		  . #x0314)	; ̔
       ))
     (=ucs		. #x1F31)	; á¼±
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER IOTA WITH DASIA")
+      (=ucs		  . #x1F39)	; á¼¹
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER IOTA WITH PSILI AND VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER IOTA WITH PSILI AND VARIA")
-      (=ucs		  . #x1F3A)	; Ἲ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER IOTA WITH PSILI")
       (=ucs		  . #x1F30)	; á¼°
@@ -844,16 +840,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F32)	; á¼²
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER IOTA WITH PSILI AND VARIA")
+      (=ucs		  . #x1F3A)	; Ἲ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER IOTA WITH DASIA AND VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER IOTA WITH DASIA AND VARIA")
-      (=ucs		  . #x1F3B)	; á¼»
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER IOTA WITH DASIA")
       (=ucs		  . #x1F31)	; á¼±
@@ -862,16 +858,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F33)	; á¼³
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER IOTA WITH DASIA AND VARIA")
+      (=ucs		  . #x1F3B)	; á¼»
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER IOTA WITH PSILI AND OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER IOTA WITH PSILI AND OXIA")
-      (=ucs		  . #x1F3C)	; á¼¼
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER IOTA WITH PSILI")
       (=ucs		  . #x1F30)	; á¼°
@@ -880,16 +876,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F34)	; á¼´
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER IOTA WITH PSILI AND OXIA")
+      (=ucs		  . #x1F3C)	; á¼¼
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER IOTA WITH DASIA AND OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER IOTA WITH DASIA AND OXIA")
-      (=ucs		  . #x1F3D)	; á¼½
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER IOTA WITH DASIA")
       (=ucs		  . #x1F31)	; á¼±
@@ -898,16 +894,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F35)	; á¼µ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER IOTA WITH DASIA AND OXIA")
+      (=ucs		  . #x1F3D)	; á¼½
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER IOTA WITH PSILI AND PERISPOMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER IOTA WITH PSILI AND PERISPOMENI")
-      (=ucs		  . #x1F3E)	; á¼¾
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER IOTA WITH PSILI")
       (=ucs		  . #x1F30)	; á¼°
@@ -916,16 +912,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F36)	; ἶ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER IOTA WITH PSILI AND PERISPOMENI")
+      (=ucs		  . #x1F3E)	; á¼¾
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER IOTA WITH DASIA AND PERISPOMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER IOTA WITH DASIA AND PERISPOMENI")
-      (=ucs		  . #x1F3F)	; Ἷ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER IOTA WITH DASIA")
       (=ucs		  . #x1F31)	; á¼±
@@ -934,16 +930,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F37)	; á¼·
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER IOTA WITH DASIA AND PERISPOMENI")
+      (=ucs		  . #x1F3F)	; Ἷ
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER IOTA WITH PSILI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER IOTA WITH PSILI")
-      (=ucs		  . #x1F30)	; á¼°
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER IOTA")
       (=ucs		  . #x0399)	; Ι
@@ -952,16 +948,16 @@
       (=ucs		  . #x0313)	; ̓
       ))
     (=ucs		. #x1F38)	; Ἰ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER IOTA WITH PSILI")
+      (=ucs		  . #x1F30)	; á¼°
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER IOTA WITH DASIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER IOTA WITH DASIA")
-      (=ucs		  . #x1F31)	; á¼±
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER IOTA")
       (=ucs		  . #x0399)	; Ι
@@ -970,16 +966,16 @@
       (=ucs		  . #x0314)	; ̔
       ))
     (=ucs		. #x1F39)	; á¼¹
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER IOTA WITH DASIA")
+      (=ucs		  . #x1F31)	; á¼±
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER IOTA WITH PSILI AND VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER IOTA WITH PSILI AND VARIA")
-      (=ucs		  . #x1F32)	; á¼²
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER IOTA WITH PSILI")
       (=ucs		  . #x1F38)	; Ἰ
@@ -988,16 +984,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F3A)	; Ἲ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER IOTA WITH PSILI AND VARIA")
+      (=ucs		  . #x1F32)	; á¼²
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER IOTA WITH DASIA AND VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER IOTA WITH DASIA AND VARIA")
-      (=ucs		  . #x1F33)	; á¼³
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER IOTA WITH DASIA")
       (=ucs		  . #x1F39)	; á¼¹
@@ -1006,16 +1002,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F3B)	; á¼»
+    (->lowercase
+     ((name . "GREEK SMALL LETTER IOTA WITH DASIA AND VARIA")
+      (=ucs		  . #x1F33)	; á¼³
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER IOTA WITH PSILI AND OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER IOTA WITH PSILI AND OXIA")
-      (=ucs		  . #x1F34)	; á¼´
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER IOTA WITH PSILI")
       (=ucs		  . #x1F38)	; Ἰ
@@ -1024,16 +1020,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F3C)	; á¼¼
+    (->lowercase
+     ((name . "GREEK SMALL LETTER IOTA WITH PSILI AND OXIA")
+      (=ucs		  . #x1F34)	; á¼´
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER IOTA WITH DASIA AND OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER IOTA WITH DASIA AND OXIA")
-      (=ucs		  . #x1F35)	; á¼µ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER IOTA WITH DASIA")
       (=ucs		  . #x1F39)	; á¼¹
@@ -1042,16 +1038,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F3D)	; á¼½
+    (->lowercase
+     ((name . "GREEK SMALL LETTER IOTA WITH DASIA AND OXIA")
+      (=ucs		  . #x1F35)	; á¼µ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER IOTA WITH PSILI AND PERISPOMENI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER IOTA WITH PSILI AND PERISPOMENI")
-      (=ucs		  . #x1F36)	; ἶ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER IOTA WITH PSILI")
       (=ucs		  . #x1F38)	; Ἰ
@@ -1060,16 +1056,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F3E)	; á¼¾
+    (->lowercase
+     ((name . "GREEK SMALL LETTER IOTA WITH PSILI AND PERISPOMENI")
+      (=ucs		  . #x1F36)	; ἶ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER IOTA WITH DASIA AND PERISPOMENI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER IOTA WITH DASIA AND PERISPOMENI")
-      (=ucs		  . #x1F37)	; á¼·
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER IOTA WITH DASIA")
       (=ucs		  . #x1F39)	; á¼¹
@@ -1078,16 +1074,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F3F)	; Ἷ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER IOTA WITH DASIA AND PERISPOMENI")
+      (=ucs		  . #x1F37)	; á¼·
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER OMICRON WITH PSILI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER OMICRON WITH PSILI")
-      (=ucs		  . #x1F48)	; Ὀ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMICRON")
       (=ucs		  . #x03BF)	; ο
@@ -1096,16 +1092,16 @@
       (=ucs		  . #x0313)	; ̓
       ))
     (=ucs		. #x1F40)	; ὀ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER OMICRON WITH PSILI")
+      (=ucs		  . #x1F48)	; Ὀ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER OMICRON WITH DASIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER OMICRON WITH DASIA")
-      (=ucs		  . #x1F49)	; Ὁ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMICRON")
       (=ucs		  . #x03BF)	; ο
@@ -1114,16 +1110,16 @@
       (=ucs		  . #x0314)	; ̔
       ))
     (=ucs		. #x1F41)	; ὁ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER OMICRON WITH DASIA")
+      (=ucs		  . #x1F49)	; Ὁ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMICRON WITH PSILI AND VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMICRON WITH PSILI AND VARIA")
-      (=ucs		  . #x1F4A)	; Ὂ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMICRON WITH PSILI")
       (=ucs		  . #x1F40)	; ὀ
@@ -1132,16 +1128,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F42)	; ὂ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMICRON WITH PSILI AND VARIA")
+      (=ucs		  . #x1F4A)	; Ὂ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMICRON WITH DASIA AND VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMICRON WITH DASIA AND VARIA")
-      (=ucs		  . #x1F4B)	; Ὃ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMICRON WITH DASIA")
       (=ucs		  . #x1F41)	; ὁ
@@ -1150,16 +1146,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F43)	; ὃ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMICRON WITH DASIA AND VARIA")
+      (=ucs		  . #x1F4B)	; Ὃ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMICRON WITH PSILI AND OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMICRON WITH PSILI AND OXIA")
-      (=ucs		  . #x1F4C)	; Ὄ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMICRON WITH PSILI")
       (=ucs		  . #x1F40)	; ὀ
@@ -1168,16 +1164,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F44)	; ὄ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMICRON WITH PSILI AND OXIA")
+      (=ucs		  . #x1F4C)	; Ὄ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMICRON WITH DASIA AND OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMICRON WITH DASIA AND OXIA")
-      (=ucs		  . #x1F4D)	; Ὅ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMICRON WITH DASIA")
       (=ucs		  . #x1F41)	; ὁ
@@ -1186,16 +1182,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F45)	; ὅ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMICRON WITH DASIA AND OXIA")
+      (=ucs		  . #x1F4D)	; Ὅ
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER OMICRON WITH PSILI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER OMICRON WITH PSILI")
-      (=ucs		  . #x1F40)	; ὀ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMICRON")
       (=ucs		  . #x039F)	; Ο
@@ -1204,16 +1200,16 @@
       (=ucs		  . #x0313)	; ̓
       ))
     (=ucs		. #x1F48)	; Ὀ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER OMICRON WITH PSILI")
+      (=ucs		  . #x1F40)	; ὀ
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER OMICRON WITH DASIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER OMICRON WITH DASIA")
-      (=ucs		  . #x1F41)	; ὁ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMICRON")
       (=ucs		  . #x039F)	; Ο
@@ -1222,16 +1218,16 @@
       (=ucs		  . #x0314)	; ̔
       ))
     (=ucs		. #x1F49)	; Ὁ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER OMICRON WITH DASIA")
+      (=ucs		  . #x1F41)	; ὁ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMICRON WITH PSILI AND VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMICRON WITH PSILI AND VARIA")
-      (=ucs		  . #x1F42)	; ὂ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMICRON WITH PSILI")
       (=ucs		  . #x1F48)	; Ὀ
@@ -1240,16 +1236,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F4A)	; Ὂ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMICRON WITH PSILI AND VARIA")
+      (=ucs		  . #x1F42)	; ὂ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMICRON WITH DASIA AND VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMICRON WITH DASIA AND VARIA")
-      (=ucs		  . #x1F43)	; ὃ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMICRON WITH DASIA")
       (=ucs		  . #x1F49)	; Ὁ
@@ -1258,16 +1254,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F4B)	; Ὃ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMICRON WITH DASIA AND VARIA")
+      (=ucs		  . #x1F43)	; ὃ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMICRON WITH PSILI AND OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMICRON WITH PSILI AND OXIA")
-      (=ucs		  . #x1F44)	; ὄ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMICRON WITH PSILI")
       (=ucs		  . #x1F48)	; Ὀ
@@ -1276,16 +1272,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F4C)	; Ὄ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMICRON WITH PSILI AND OXIA")
+      (=ucs		  . #x1F44)	; ὄ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMICRON WITH DASIA AND OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMICRON WITH DASIA AND OXIA")
-      (=ucs		  . #x1F45)	; ὅ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMICRON WITH DASIA")
       (=ucs		  . #x1F49)	; Ὁ
@@ -1294,6 +1290,10 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F4D)	; Ὅ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMICRON WITH DASIA AND OXIA")
+      (=ucs		  . #x1F45)	; ὅ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER UPSILON WITH PSILI")
@@ -1314,10 +1314,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER UPSILON WITH DASIA")
-      (=ucs		  . #x1F59)	; Ὑ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER UPSILON")
       (=ucs		  . #x03C5)	; υ
@@ -1326,6 +1322,10 @@
       (=ucs		  . #x0314)	; ̔
       ))
     (=ucs		. #x1F51)	; ὑ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER UPSILON WITH DASIA")
+      (=ucs		  . #x1F59)	; Ὑ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER UPSILON WITH PSILI AND VARIA")
@@ -1346,10 +1346,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER UPSILON WITH DASIA AND VARIA")
-      (=ucs		  . #x1F5B)	; Ὓ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER UPSILON WITH DASIA")
       (=ucs		  . #x1F51)	; ὑ
@@ -1358,6 +1354,10 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F53)	; ὓ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER UPSILON WITH DASIA AND VARIA")
+      (=ucs		  . #x1F5B)	; Ὓ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER UPSILON WITH PSILI AND OXIA")
@@ -1378,10 +1378,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER UPSILON WITH DASIA AND OXIA")
-      (=ucs		  . #x1F5D)	; Ὕ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER UPSILON WITH DASIA")
       (=ucs		  . #x1F51)	; ὑ
@@ -1390,6 +1386,10 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F55)	; ὕ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER UPSILON WITH DASIA AND OXIA")
+      (=ucs		  . #x1F5D)	; Ὕ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER UPSILON WITH PSILI AND PERISPOMENI")
@@ -1410,10 +1410,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER UPSILON WITH DASIA AND PERISPOMENI")
-      (=ucs		  . #x1F5F)	; Ὗ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER UPSILON WITH DASIA")
       (=ucs		  . #x1F51)	; ὑ
@@ -1422,16 +1418,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F57)	; ὗ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER UPSILON WITH DASIA AND PERISPOMENI")
+      (=ucs		  . #x1F5F)	; Ὗ
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER UPSILON WITH DASIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER UPSILON WITH DASIA")
-      (=ucs		  . #x1F51)	; ὑ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER UPSILON")
       (=ucs		  . #x03A5)	; Υ
@@ -1440,16 +1436,16 @@
       (=ucs		  . #x0314)	; ̔
       ))
     (=ucs		. #x1F59)	; Ὑ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER UPSILON WITH DASIA")
+      (=ucs		  . #x1F51)	; ὑ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER UPSILON WITH DASIA AND VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER UPSILON WITH DASIA AND VARIA")
-      (=ucs		  . #x1F53)	; ὓ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER UPSILON WITH DASIA")
       (=ucs		  . #x1F59)	; Ὑ
@@ -1458,16 +1454,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F5B)	; Ὓ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER UPSILON WITH DASIA AND VARIA")
+      (=ucs		  . #x1F53)	; ὓ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER UPSILON WITH DASIA AND OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER UPSILON WITH DASIA AND OXIA")
-      (=ucs		  . #x1F55)	; ὕ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER UPSILON WITH DASIA")
       (=ucs		  . #x1F59)	; Ὑ
@@ -1476,16 +1472,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F5D)	; Ὕ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER UPSILON WITH DASIA AND OXIA")
+      (=ucs		  . #x1F55)	; ὕ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER UPSILON WITH DASIA AND PERISPOMENI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER UPSILON WITH DASIA AND PERISPOMENI")
-      (=ucs		  . #x1F57)	; ὗ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER UPSILON WITH DASIA")
       (=ucs		  . #x1F59)	; Ὑ
@@ -1494,16 +1490,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F5F)	; Ὗ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER UPSILON WITH DASIA AND PERISPOMENI")
+      (=ucs		  . #x1F57)	; ὗ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER OMEGA WITH PSILI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER OMEGA WITH PSILI")
-      (=ucs		  . #x1F68)	; Ὠ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMEGA")
       (=ucs		  . #x03C9)	; ω
@@ -1512,16 +1508,16 @@
       (=ucs		  . #x0313)	; ̓
       ))
     (=ucs		. #x1F60)	; á½ 
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER OMEGA WITH PSILI")
+      (=ucs		  . #x1F68)	; Ὠ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER OMEGA WITH DASIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER OMEGA WITH DASIA")
-      (=ucs		  . #x1F69)	; Ὡ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMEGA")
       (=ucs		  . #x03C9)	; ω
@@ -1530,16 +1526,16 @@
       (=ucs		  . #x0314)	; ̔
       ))
     (=ucs		. #x1F61)	; ὡ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER OMEGA WITH DASIA")
+      (=ucs		  . #x1F69)	; Ὡ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND VARIA")
-      (=ucs		  . #x1F6A)	; Ὢ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMEGA WITH PSILI")
       (=ucs		  . #x1F60)	; á½ 
@@ -1548,16 +1544,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F62)	; á½¢
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND VARIA")
+      (=ucs		  . #x1F6A)	; Ὢ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND VARIA")
-      (=ucs		  . #x1F6B)	; Ὣ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMEGA WITH DASIA")
       (=ucs		  . #x1F61)	; ὡ
@@ -1566,16 +1562,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F63)	; á½£
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND VARIA")
+      (=ucs		  . #x1F6B)	; Ὣ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER OMEGA WITH PSILI AND OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND OXIA")
-      (=ucs		  . #x1F6C)	; Ὤ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMEGA WITH PSILI")
       (=ucs		  . #x1F60)	; á½ 
@@ -1584,16 +1580,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F64)	; ὤ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND OXIA")
+      (=ucs		  . #x1F6C)	; Ὤ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER OMEGA WITH DASIA AND OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND OXIA")
-      (=ucs		  . #x1F6D)	; á½­
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMEGA WITH DASIA")
       (=ucs		  . #x1F61)	; ὡ
@@ -1602,16 +1598,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F65)	; á½¥
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND OXIA")
+      (=ucs		  . #x1F6D)	; á½­
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND PERISPOMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND PERISPOMENI")
-      (=ucs		  . #x1F6E)	; á½®
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMEGA WITH PSILI")
       (=ucs		  . #x1F60)	; á½ 
@@ -1620,16 +1616,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F66)	; ὦ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND PERISPOMENI")
+      (=ucs		  . #x1F6E)	; á½®
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND PERISPOMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND PERISPOMENI")
-      (=ucs		  . #x1F6F)	; Ὧ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMEGA WITH DASIA")
       (=ucs		  . #x1F61)	; ὡ
@@ -1638,16 +1634,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F67)	; ὧ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND PERISPOMENI")
+      (=ucs		  . #x1F6F)	; Ὧ
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER OMEGA WITH PSILI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER OMEGA WITH PSILI")
-      (=ucs		  . #x1F60)	; á½ 
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMEGA")
       (=ucs		  . #x03A9)	; Ω
@@ -1656,16 +1652,16 @@
       (=ucs		  . #x0313)	; ̓
       ))
     (=ucs		. #x1F68)	; Ὠ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER OMEGA WITH PSILI")
+      (=ucs		  . #x1F60)	; á½ 
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER OMEGA WITH DASIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER OMEGA WITH DASIA")
-      (=ucs		  . #x1F61)	; ὡ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMEGA")
       (=ucs		  . #x03A9)	; Ω
@@ -1674,16 +1670,16 @@
       (=ucs		  . #x0314)	; ̔
       ))
     (=ucs		. #x1F69)	; Ὡ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER OMEGA WITH DASIA")
+      (=ucs		  . #x1F61)	; ὡ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND VARIA")
-      (=ucs		  . #x1F62)	; á½¢
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMEGA WITH PSILI")
       (=ucs		  . #x1F68)	; Ὠ
@@ -1692,16 +1688,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F6A)	; Ὢ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND VARIA")
+      (=ucs		  . #x1F62)	; á½¢
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND VARIA")
-      (=ucs		  . #x1F63)	; á½£
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMEGA WITH DASIA")
       (=ucs		  . #x1F69)	; Ὡ
@@ -1710,16 +1706,16 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F6B)	; Ὣ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND VARIA")
+      (=ucs		  . #x1F63)	; á½£
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND OXIA")
-      (=ucs		  . #x1F64)	; ὤ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMEGA WITH PSILI")
       (=ucs		  . #x1F68)	; Ὠ
@@ -1728,16 +1724,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F6C)	; Ὤ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND OXIA")
+      (=ucs		  . #x1F64)	; ὤ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND OXIA")
-      (=ucs		  . #x1F65)	; á½¥
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMEGA WITH DASIA")
       (=ucs		  . #x1F69)	; Ὡ
@@ -1746,16 +1742,16 @@
       (=ucs		  . #x0301)	; ́
       ))
     (=ucs		. #x1F6D)	; á½­
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND OXIA")
+      (=ucs		  . #x1F65)	; á½¥
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND PERISPOMENI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND PERISPOMENI")
-      (=ucs		  . #x1F66)	; ὦ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMEGA WITH PSILI")
       (=ucs		  . #x1F68)	; Ὠ
@@ -1764,16 +1760,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F6E)	; á½®
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND PERISPOMENI")
+      (=ucs		  . #x1F66)	; ὦ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND PERISPOMENI")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND PERISPOMENI")
-      (=ucs		  . #x1F67)	; ὧ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMEGA WITH DASIA")
       (=ucs		  . #x1F69)	; Ὡ
@@ -1782,16 +1778,16 @@
       (=ucs		  . #x0342)	; ͂
       ))
     (=ucs		. #x1F6F)	; Ὧ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND PERISPOMENI")
+      (=ucs		  . #x1F67)	; ὧ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ALPHA WITH VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER ALPHA WITH VARIA")
-      (=ucs		  . #x1FBA)	; Ὰ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ALPHA")
       (=ucs		  . #x03B1)	; α
@@ -1800,6 +1796,10 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F70)	; á½°
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER ALPHA WITH VARIA")
+      (=ucs		  . #x1FBA)	; Ὰ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER ALPHA WITH GRAVE")
@@ -1822,6 +1822,7 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1F71)	; á½±
     (->canonical
      ((name		  . "GREEK SMALL LETTER ALPHA WITH TONOS")
       (=ucs		  . #x03AC)	; ά
@@ -1830,7 +1831,6 @@
      ((name		  . "GREEK CAPITAL LETTER ALPHA WITH OXIA")
       (=ucs		  . #x1FBB)	; á¾»
       ))
-    (=ucs		. #x1F71)	; á½±
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER ALPHA WITH ACUTE")
@@ -1853,10 +1853,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER EPSILON WITH VARIA")
-      (=ucs		  . #x1FC8)	; Ὲ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER EPSILON")
       (=ucs		  . #x03B5)	; ε
@@ -1865,6 +1861,10 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F72)	; á½²
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER EPSILON WITH VARIA")
+      (=ucs		  . #x1FC8)	; Ὲ
+      ))
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER OPEN E WITH GRAVE")
@@ -1872,9 +1872,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER OPEN E WITH GRAVE")
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER OPEN E")
       (=ucs		  . #x025B)	; ɛ
@@ -1884,12 +1881,16 @@
       ))
     (=jis-x0213-1-2000	. #x2B50)	; &JX1-2B50; [11-48]
     (=ucs@jis		. #x1F72)	; &JX1-2B50;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER OPEN E WITH GRAVE")
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER EPSILON WITH OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1F73)	; á½³
     (->canonical
      ((name		  . "GREEK SMALL LETTER EPSILON WITH TONOS")
       (=ucs		  . #x03AD)	; έ
@@ -1898,7 +1899,6 @@
      ((name		  . "GREEK CAPITAL LETTER EPSILON WITH OXIA")
       (=ucs		  . #x1FC9)	; Έ
       ))
-    (=ucs		. #x1F73)	; á½³
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER OPEN E WITH ACUTE")
@@ -1906,9 +1906,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "LATIN CAPITAL LETTER OPEN E WITH ACUTE")
-      ))
     (=decomposition
      ((name		  . "LATIN SMALL LETTER OPEN E")
       (=ucs		  . #x025B)	; ɛ
@@ -1918,16 +1915,15 @@
       ))
     (=jis-x0213-1-2000	. #x2B51)	; &JX1-2B51; [11-49]
     (=ucs@jis		. #x1F73)	; &JX1-2B51;
+    (->uppercase
+     ((name		  . "LATIN CAPITAL LETTER OPEN E WITH ACUTE")
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ETA WITH VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER ETA WITH VARIA")
-      (=ucs		  . #x1FCA)	; Ὴ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ETA")
       (=ucs		  . #x03B7)	; η
@@ -1936,12 +1932,17 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F74)	; á½´
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER ETA WITH VARIA")
+      (=ucs		  . #x1FCA)	; Ὴ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ETA WITH OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1F75)	; á½µ
     (->canonical
      ((name		  . "GREEK SMALL LETTER ETA WITH TONOS")
       (=ucs		  . #x03AE)	; ή
@@ -1950,17 +1951,12 @@
      ((name		  . "GREEK CAPITAL LETTER ETA WITH OXIA")
       (=ucs		  . #x1FCB)	; Ή
       ))
-    (=ucs		. #x1F75)	; á½µ
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER IOTA WITH VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER IOTA WITH VARIA")
-      (=ucs		  . #x1FDA)	; Ὶ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER IOTA")
       (=ucs		  . #x03B9)	; ι
@@ -1969,12 +1965,17 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F76)	; ὶ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER IOTA WITH VARIA")
+      (=ucs		  . #x1FDA)	; Ὶ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER IOTA WITH OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1F77)	; á½·
     (->canonical
      ((name		  . "GREEK SMALL LETTER IOTA WITH TONOS")
       (=ucs		  . #x03AF)	; ί
@@ -1983,17 +1984,12 @@
      ((name		  . "GREEK CAPITAL LETTER IOTA WITH OXIA")
       (=ucs		  . #x1FDB)	; Ί
       ))
-    (=ucs		. #x1F77)	; á½·
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER OMICRON WITH VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER OMICRON WITH VARIA")
-      (=ucs		  . #x1FF8)	; Ὸ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMICRON")
       (=ucs		  . #x03BF)	; ο
@@ -2002,12 +1998,17 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F78)	; ὸ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER OMICRON WITH VARIA")
+      (=ucs		  . #x1FF8)	; Ὸ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER OMICRON WITH OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1F79)	; á½¹
     (->canonical
      ((name		  . "GREEK SMALL LETTER OMICRON WITH TONOS")
       (=ucs		  . #x03CC)	; ό
@@ -2016,17 +2017,12 @@
      ((name		  . "GREEK CAPITAL LETTER OMICRON WITH OXIA")
       (=ucs		  . #x1FF9)	; Ό
       ))
-    (=ucs		. #x1F79)	; á½¹
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER UPSILON WITH VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER UPSILON WITH VARIA")
-      (=ucs		  . #x1FEA)	; Ὺ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER UPSILON")
       (=ucs		  . #x03C5)	; υ
@@ -2035,12 +2031,17 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F7A)	; ὺ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER UPSILON WITH VARIA")
+      (=ucs		  . #x1FEA)	; Ὺ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER UPSILON WITH OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1F7B)	; á½»
     (->canonical
      ((name		  . "GREEK SMALL LETTER UPSILON WITH TONOS")
       (=ucs		  . #x03CD)	; ύ
@@ -2049,17 +2050,12 @@
      ((name		  . "GREEK CAPITAL LETTER UPSILON WITH OXIA")
       (=ucs		  . #x1FEB)	; á¿«
       ))
-    (=ucs		. #x1F7B)	; á½»
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER OMEGA WITH VARIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER OMEGA WITH VARIA")
-      (=ucs		  . #x1FFA)	; Ὼ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMEGA")
       (=ucs		  . #x03C9)	; ω
@@ -2068,12 +2064,17 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1F7C)	; á½¼
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER OMEGA WITH VARIA")
+      (=ucs		  . #x1FFA)	; Ὼ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER OMEGA WITH OXIA")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1F7D)	; á½½
     (->canonical
      ((name		  . "GREEK SMALL LETTER OMEGA WITH TONOS")
       (=ucs		  . #x03CE)	; ώ
@@ -2082,17 +2083,12 @@
      ((name		  . "GREEK CAPITAL LETTER OMEGA WITH OXIA")
       (=ucs		  . #x1FFB)	; á¿»
       ))
-    (=ucs		. #x1F7D)	; á½½
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND PROSGEGRAMMENI")
-      (=ucs		  . #x1F88)	; ᾈ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ALPHA WITH PSILI")
       (=ucs		  . #x1F00)	; ἀ
@@ -2101,16 +2097,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F80)	; ᾀ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND PROSGEGRAMMENI")
+      (=ucs		  . #x1F88)	; ᾈ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND PROSGEGRAMMENI")
-      (=ucs		  . #x1F89)	; ᾉ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ALPHA WITH DASIA")
       (=ucs		  . #x1F01)	; ἁ
@@ -2119,16 +2115,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F81)	; ᾁ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND PROSGEGRAMMENI")
+      (=ucs		  . #x1F89)	; ᾉ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND VARIA AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND VARIA AND PROSGEGRAMMENI")
-      (=ucs		  . #x1F8A)	; ᾊ
-      ))
     (=decomposition
      ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND VARIA")
       (=ucs		  . #x1F02)	; ἂ
@@ -2137,16 +2133,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F82)	; ᾂ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND VARIA AND PROSGEGRAMMENI")
+      (=ucs		  . #x1F8A)	; ᾊ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND VARIA AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND VARIA AND PROSGEGRAMMENI")
-      (=ucs		  . #x1F8B)	; ᾋ
-      ))
     (=decomposition
      ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND VARIA")
       (=ucs		  . #x1F03)	; ἃ
@@ -2155,16 +2151,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F83)	; ᾃ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND VARIA AND PROSGEGRAMMENI")
+      (=ucs		  . #x1F8B)	; ᾋ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND OXIA AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND OXIA AND PROSGEGRAMMENI")
-      (=ucs		  . #x1F8C)	; ᾌ
-      ))
     (=decomposition
      ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND OXIA")
       (=ucs		  . #x1F04)	; ἄ
@@ -2173,16 +2169,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F84)	; ᾄ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND OXIA AND PROSGEGRAMMENI")
+      (=ucs		  . #x1F8C)	; ᾌ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND OXIA AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND OXIA AND PROSGEGRAMMENI")
-      (=ucs		  . #x1F8D)	; ᾍ
-      ))
     (=decomposition
      ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND OXIA")
       (=ucs		  . #x1F05)	; ἅ
@@ -2191,16 +2187,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F85)	; ᾅ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND OXIA AND PROSGEGRAMMENI")
+      (=ucs		  . #x1F8D)	; ᾍ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI")
-      (=ucs		  . #x1F8E)	; ᾎ
-      ))
     (=decomposition
      ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND PERISPOMENI")
       (=ucs		  . #x1F06)	; ἆ
@@ -2209,16 +2205,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F86)	; ᾆ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI")
+      (=ucs		  . #x1F8E)	; ᾎ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI")
-      (=ucs		  . #x1F8F)	; ᾏ
-      ))
     (=decomposition
      ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND PERISPOMENI")
       (=ucs		  . #x1F07)	; ἇ
@@ -2227,16 +2223,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F87)	; ᾇ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI")
+      (=ucs		  . #x1F8F)	; ᾏ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND YPOGEGRAMMENI")
-      (=ucs		  . #x1F80)	; ᾀ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ALPHA WITH PSILI")
       (=ucs		  . #x1F08)	; Ἀ
@@ -2245,16 +2241,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F88)	; ᾈ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND YPOGEGRAMMENI")
+      (=ucs		  . #x1F80)	; ᾀ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND YPOGEGRAMMENI")
-      (=ucs		  . #x1F81)	; ᾁ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ALPHA WITH DASIA")
       (=ucs		  . #x1F09)	; Ἁ
@@ -2263,16 +2259,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F89)	; ᾉ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND YPOGEGRAMMENI")
+      (=ucs		  . #x1F81)	; ᾁ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND VARIA AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND VARIA AND YPOGEGRAMMENI")
-      (=ucs		  . #x1F82)	; ᾂ
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND VARIA")
       (=ucs		  . #x1F0A)	; Ἂ
@@ -2281,16 +2277,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F8A)	; ᾊ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND VARIA AND YPOGEGRAMMENI")
+      (=ucs		  . #x1F82)	; ᾂ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND VARIA AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND VARIA AND YPOGEGRAMMENI")
-      (=ucs		  . #x1F83)	; ᾃ
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND VARIA")
       (=ucs		  . #x1F0B)	; Ἃ
@@ -2299,16 +2295,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F8B)	; ᾋ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND VARIA AND YPOGEGRAMMENI")
+      (=ucs		  . #x1F83)	; ᾃ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND OXIA AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND OXIA AND YPOGEGRAMMENI")
-      (=ucs		  . #x1F84)	; ᾄ
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND OXIA")
       (=ucs		  . #x1F0C)	; Ἄ
@@ -2317,16 +2313,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F8C)	; ᾌ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND OXIA AND YPOGEGRAMMENI")
+      (=ucs		  . #x1F84)	; ᾄ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND OXIA AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND OXIA AND YPOGEGRAMMENI")
-      (=ucs		  . #x1F85)	; ᾅ
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND OXIA")
       (=ucs		  . #x1F0D)	; Ἅ
@@ -2335,16 +2331,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F8D)	; ᾍ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND OXIA AND YPOGEGRAMMENI")
+      (=ucs		  . #x1F85)	; ᾅ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI")
-      (=ucs		  . #x1F86)	; ᾆ
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND PERISPOMENI")
       (=ucs		  . #x1F0E)	; Ἆ
@@ -2353,16 +2349,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F8E)	; ᾎ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI")
+      (=ucs		  . #x1F86)	; ᾆ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI")
-      (=ucs		  . #x1F87)	; ᾇ
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND PERISPOMENI")
       (=ucs		  . #x1F0F)	; Ἇ
@@ -2371,16 +2367,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F8F)	; ᾏ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI")
+      (=ucs		  . #x1F87)	; ᾇ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH PSILI AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND PROSGEGRAMMENI")
-      (=ucs		  . #x1F98)	; ᾘ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ETA WITH PSILI")
       (=ucs		  . #x1F20)	; á¼ 
@@ -2389,16 +2385,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F90)	; ᾐ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND PROSGEGRAMMENI")
+      (=ucs		  . #x1F98)	; ᾘ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH DASIA AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND PROSGEGRAMMENI")
-      (=ucs		  . #x1F99)	; ᾙ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ETA WITH DASIA")
       (=ucs		  . #x1F21)	; ἡ
@@ -2407,16 +2403,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F91)	; ᾑ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND PROSGEGRAMMENI")
+      (=ucs		  . #x1F99)	; ᾙ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH PSILI AND VARIA AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND VARIA AND PROSGEGRAMMENI")
-      (=ucs		  . #x1F9A)	; ᾚ
-      ))
     (=decomposition
      ((name . "GREEK SMALL LETTER ETA WITH PSILI AND VARIA")
       (=ucs		  . #x1F22)	; á¼¢
@@ -2425,16 +2421,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F92)	; ᾒ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND VARIA AND PROSGEGRAMMENI")
+      (=ucs		  . #x1F9A)	; ᾚ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH DASIA AND VARIA AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND VARIA AND PROSGEGRAMMENI")
-      (=ucs		  . #x1F9B)	; ᾛ
-      ))
     (=decomposition
      ((name . "GREEK SMALL LETTER ETA WITH DASIA AND VARIA")
       (=ucs		  . #x1F23)	; á¼£
@@ -2443,16 +2439,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F93)	; ᾓ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND VARIA AND PROSGEGRAMMENI")
+      (=ucs		  . #x1F9B)	; ᾛ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH PSILI AND OXIA AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND OXIA AND PROSGEGRAMMENI")
-      (=ucs		  . #x1F9C)	; ᾜ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ETA WITH PSILI AND OXIA")
       (=ucs		  . #x1F24)	; ἤ
@@ -2461,16 +2457,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F94)	; ᾔ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND OXIA AND PROSGEGRAMMENI")
+      (=ucs		  . #x1F9C)	; ᾜ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH DASIA AND OXIA AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND OXIA AND PROSGEGRAMMENI")
-      (=ucs		  . #x1F9D)	; ᾝ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ETA WITH DASIA AND OXIA")
       (=ucs		  . #x1F25)	; á¼¥
@@ -2479,16 +2475,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F95)	; ᾕ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND OXIA AND PROSGEGRAMMENI")
+      (=ucs		  . #x1F9D)	; ᾝ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI")
-      (=ucs		  . #x1F9E)	; ᾞ
-      ))
     (=decomposition
      ((name . "GREEK SMALL LETTER ETA WITH PSILI AND PERISPOMENI")
       (=ucs		  . #x1F26)	; ἦ
@@ -2497,16 +2493,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F96)	; ᾖ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI")
+      (=ucs		  . #x1F9E)	; ᾞ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI")
-      (=ucs		  . #x1F9F)	; ᾟ
-      ))
     (=decomposition
      ((name . "GREEK SMALL LETTER ETA WITH DASIA AND PERISPOMENI")
       (=ucs		  . #x1F27)	; ἧ
@@ -2515,16 +2511,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F97)	; ᾗ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI")
+      (=ucs		  . #x1F9F)	; ᾟ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ETA WITH PSILI AND YPOGEGRAMMENI")
-      (=ucs		  . #x1F90)	; ᾐ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ETA WITH PSILI")
       (=ucs		  . #x1F28)	; Ἠ
@@ -2533,16 +2529,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F98)	; ᾘ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ETA WITH PSILI AND YPOGEGRAMMENI")
+      (=ucs		  . #x1F90)	; ᾐ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ETA WITH DASIA AND YPOGEGRAMMENI")
-      (=ucs		  . #x1F91)	; ᾑ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ETA WITH DASIA")
       (=ucs		  . #x1F29)	; Ἡ
@@ -2551,16 +2547,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F99)	; ᾙ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ETA WITH DASIA AND YPOGEGRAMMENI")
+      (=ucs		  . #x1F91)	; ᾑ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND VARIA AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ETA WITH PSILI AND VARIA AND YPOGEGRAMMENI")
-      (=ucs		  . #x1F92)	; ᾒ
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND VARIA")
       (=ucs		  . #x1F2A)	; Ἢ
@@ -2569,16 +2565,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F9A)	; ᾚ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ETA WITH PSILI AND VARIA AND YPOGEGRAMMENI")
+      (=ucs		  . #x1F92)	; ᾒ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND VARIA AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ETA WITH DASIA AND VARIA AND YPOGEGRAMMENI")
-      (=ucs		  . #x1F93)	; ᾓ
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND VARIA")
       (=ucs		  . #x1F2B)	; Ἣ
@@ -2587,16 +2583,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F9B)	; ᾛ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ETA WITH DASIA AND VARIA AND YPOGEGRAMMENI")
+      (=ucs		  . #x1F93)	; ᾓ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND OXIA AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ETA WITH PSILI AND OXIA AND YPOGEGRAMMENI")
-      (=ucs		  . #x1F94)	; ᾔ
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND OXIA")
       (=ucs		  . #x1F2C)	; Ἤ
@@ -2605,16 +2601,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F9C)	; ᾜ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ETA WITH PSILI AND OXIA AND YPOGEGRAMMENI")
+      (=ucs		  . #x1F94)	; ᾔ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND OXIA AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ETA WITH DASIA AND OXIA AND YPOGEGRAMMENI")
-      (=ucs		  . #x1F95)	; ᾕ
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND OXIA")
       (=ucs		  . #x1F2D)	; á¼­
@@ -2623,16 +2619,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F9D)	; ᾝ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ETA WITH DASIA AND OXIA AND YPOGEGRAMMENI")
+      (=ucs		  . #x1F95)	; ᾕ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ETA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI")
-      (=ucs		  . #x1F96)	; ᾖ
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND PERISPOMENI")
       (=ucs		  . #x1F2E)	; á¼®
@@ -2641,16 +2637,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F9E)	; ᾞ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ETA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI")
+      (=ucs		  . #x1F96)	; ᾖ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ETA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI")
-      (=ucs		  . #x1F97)	; ᾗ
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND PERISPOMENI")
       (=ucs		  . #x1F2F)	; Ἧ
@@ -2659,16 +2655,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1F9F)	; ᾟ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ETA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI")
+      (=ucs		  . #x1F97)	; ᾗ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND PROSGEGRAMMENI")
-      (=ucs		  . #x1FA8)	; ᾨ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMEGA WITH PSILI")
       (=ucs		  . #x1F60)	; á½ 
@@ -2677,16 +2673,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FA0)	; á¾ 
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND PROSGEGRAMMENI")
+      (=ucs		  . #x1FA8)	; ᾨ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND PROSGEGRAMMENI")
-      (=ucs		  . #x1FA9)	; ᾩ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMEGA WITH DASIA")
       (=ucs		  . #x1F61)	; ὡ
@@ -2695,16 +2691,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FA1)	; ᾡ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND PROSGEGRAMMENI")
+      (=ucs		  . #x1FA9)	; ᾩ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND VARIA AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND VARIA AND PROSGEGRAMMENI")
-      (=ucs		  . #x1FAA)	; ᾪ
-      ))
     (=decomposition
      ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND VARIA")
       (=ucs		  . #x1F62)	; á½¢
@@ -2713,16 +2709,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FA2)	; á¾¢
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND VARIA AND PROSGEGRAMMENI")
+      (=ucs		  . #x1FAA)	; ᾪ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND VARIA AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND VARIA AND PROSGEGRAMMENI")
-      (=ucs		  . #x1FAB)	; ᾫ
-      ))
     (=decomposition
      ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND VARIA")
       (=ucs		  . #x1F63)	; á½£
@@ -2731,16 +2727,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FA3)	; á¾£
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND VARIA AND PROSGEGRAMMENI")
+      (=ucs		  . #x1FAB)	; ᾫ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND OXIA AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND OXIA AND PROSGEGRAMMENI")
-      (=ucs		  . #x1FAC)	; ᾬ
-      ))
     (=decomposition
      ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND OXIA")
       (=ucs		  . #x1F64)	; ὤ
@@ -2749,16 +2745,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FA4)	; ᾤ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND OXIA AND PROSGEGRAMMENI")
+      (=ucs		  . #x1FAC)	; ᾬ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND OXIA AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND OXIA AND PROSGEGRAMMENI")
-      (=ucs		  . #x1FAD)	; á¾­
-      ))
     (=decomposition
      ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND OXIA")
       (=ucs		  . #x1F65)	; á½¥
@@ -2767,16 +2763,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FA5)	; á¾¥
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND OXIA AND PROSGEGRAMMENI")
+      (=ucs		  . #x1FAD)	; á¾­
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI")
-      (=ucs		  . #x1FAE)	; á¾®
-      ))
     (=decomposition
      ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND PERISPOMENI")
       (=ucs		  . #x1F66)	; ὦ
@@ -2785,16 +2781,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FA6)	; ᾦ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI")
+      (=ucs		  . #x1FAE)	; á¾®
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI")
-      (=ucs		  . #x1FAF)	; ᾯ
-      ))
     (=decomposition
      ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND PERISPOMENI")
       (=ucs		  . #x1F67)	; ὧ
@@ -2803,16 +2799,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FA7)	; ᾧ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI")
+      (=ucs		  . #x1FAF)	; ᾯ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND YPOGEGRAMMENI")
-      (=ucs		  . #x1FA0)	; á¾ 
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMEGA WITH PSILI")
       (=ucs		  . #x1F68)	; Ὠ
@@ -2821,16 +2817,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FA8)	; ᾨ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND YPOGEGRAMMENI")
+      (=ucs		  . #x1FA0)	; á¾ 
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND YPOGEGRAMMENI")
-      (=ucs		  . #x1FA1)	; ᾡ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMEGA WITH DASIA")
       (=ucs		  . #x1F69)	; Ὡ
@@ -2839,16 +2835,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FA9)	; ᾩ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND YPOGEGRAMMENI")
+      (=ucs		  . #x1FA1)	; ᾡ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND VARIA AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND VARIA AND YPOGEGRAMMENI")
-      (=ucs		  . #x1FA2)	; á¾¢
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND VARIA")
       (=ucs		  . #x1F6A)	; Ὢ
@@ -2857,16 +2853,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FAA)	; ᾪ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND VARIA AND YPOGEGRAMMENI")
+      (=ucs		  . #x1FA2)	; á¾¢
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND VARIA AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND VARIA AND YPOGEGRAMMENI")
-      (=ucs		  . #x1FA3)	; á¾£
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND VARIA")
       (=ucs		  . #x1F6B)	; Ὣ
@@ -2875,16 +2871,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FAB)	; ᾫ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND VARIA AND YPOGEGRAMMENI")
+      (=ucs		  . #x1FA3)	; á¾£
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND OXIA AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND OXIA AND YPOGEGRAMMENI")
-      (=ucs		  . #x1FA4)	; ᾤ
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND OXIA")
       (=ucs		  . #x1F6C)	; Ὤ
@@ -2893,16 +2889,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FAC)	; ᾬ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND OXIA AND YPOGEGRAMMENI")
+      (=ucs		  . #x1FA4)	; ᾤ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND OXIA AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND OXIA AND YPOGEGRAMMENI")
-      (=ucs		  . #x1FA5)	; á¾¥
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND OXIA")
       (=ucs		  . #x1F6D)	; á½­
@@ -2911,16 +2907,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FAD)	; á¾­
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND OXIA AND YPOGEGRAMMENI")
+      (=ucs		  . #x1FA5)	; á¾¥
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
-    (bidi-category	. "L")
-    (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI")
-      (=ucs		  . #x1FA6)	; ᾦ
-      ))
+    (bidi-category	. "L")
+    (mirrored		. nil)
     (=decomposition
      ((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND PERISPOMENI")
       (=ucs		  . #x1F6E)	; á½®
@@ -2929,16 +2925,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FAE)	; á¾®
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI")
+      (=ucs		  . #x1FA6)	; ᾦ
+      ))
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI")
-      (=ucs		  . #x1FA7)	; ᾧ
-      ))
     (=decomposition
      ((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND PERISPOMENI")
       (=ucs		  . #x1F6F)	; Ὧ
@@ -2947,16 +2943,16 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FAF)	; ᾯ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI")
+      (=ucs		  . #x1FA7)	; ᾧ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ALPHA WITH VRACHY")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER ALPHA WITH VRACHY")
-      (=ucs		  . #x1FB8)	; Ᾰ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ALPHA")
       (=ucs		  . #x03B1)	; α
@@ -2965,16 +2961,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x1FB0)	; á¾°
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER ALPHA WITH VRACHY")
+      (=ucs		  . #x1FB8)	; Ᾰ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER ALPHA WITH MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER ALPHA WITH MACRON")
-      (=ucs		  . #x1FB9)	; á¾¹
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ALPHA")
       (=ucs		  . #x03B1)	; α
@@ -2983,6 +2979,10 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x1FB1)	; á¾±
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER ALPHA WITH MACRON")
+      (=ucs		  . #x1FB9)	; á¾¹
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH VARIA AND YPOGEGRAMMENI")
@@ -3003,10 +3003,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ALPHA WITH PROSGEGRAMMENI")
-      (=ucs		  . #x1FBC)	; á¾¼
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ALPHA")
       (=ucs		  . #x03B1)	; α
@@ -3015,6 +3011,10 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FB3)	; á¾³
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ALPHA WITH PROSGEGRAMMENI")
+      (=ucs		  . #x1FBC)	; á¾¼
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH OXIA AND YPOGEGRAMMENI")
@@ -3063,10 +3063,6 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER ALPHA WITH VRACHY")
-      (=ucs		  . #x1FB0)	; á¾°
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ALPHA")
       (=ucs		  . #x0391)	; Α
@@ -3075,16 +3071,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x1FB8)	; Ᾰ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER ALPHA WITH VRACHY")
+      (=ucs		  . #x1FB0)	; á¾°
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER ALPHA WITH MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER ALPHA WITH MACRON")
-      (=ucs		  . #x1FB1)	; á¾±
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ALPHA")
       (=ucs		  . #x0391)	; Α
@@ -3093,16 +3089,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x1FB9)	; á¾¹
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER ALPHA WITH MACRON")
+      (=ucs		  . #x1FB1)	; á¾±
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER ALPHA WITH VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER ALPHA WITH VARIA")
-      (=ucs		  . #x1F70)	; á½°
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ALPHA")
       (=ucs		  . #x0391)	; Α
@@ -3111,12 +3107,17 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1FBA)	; Ὰ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER ALPHA WITH VARIA")
+      (=ucs		  . #x1F70)	; á½°
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER ALPHA WITH OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1FBB)	; á¾»
     (->canonical
      ((name		  . "GREEK CAPITAL LETTER ALPHA WITH TONOS")
       (=ucs		  . #x0386)	; Ά
@@ -3125,17 +3126,12 @@
      ((name		  . "GREEK SMALL LETTER ALPHA WITH OXIA")
       (=ucs		  . #x1F71)	; á½±
       ))
-    (=ucs		. #x1FBB)	; á¾»
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER ALPHA WITH YPOGEGRAMMENI")
-      (=ucs		  . #x1FB3)	; á¾³
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ALPHA")
       (=ucs		  . #x0391)	; Α
@@ -3144,6 +3140,10 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FBC)	; á¾¼
+    (->lowercase
+     ((name . "GREEK SMALL LETTER ALPHA WITH YPOGEGRAMMENI")
+      (=ucs		  . #x1FB3)	; á¾³
+      ))
     ))
 (define-char
   '((name		. "GREEK KORONIS")
@@ -3164,6 +3164,7 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1FBE)	; á¾¾
     (->canonical
      ((name		  . "GREEK SMALL LETTER IOTA")
       (=ucs		  . #x03B9)	; ι
@@ -3172,7 +3173,6 @@
      ((name		  . "GREEK CAPITAL LETTER IOTA")
       (=ucs		  . #x0399)	; Ι
       ))
-    (=ucs		. #x1FBE)	; á¾¾
     ))
 (define-char
   '((name		. "GREEK PSILI")
@@ -3235,10 +3235,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER ETA WITH PROSGEGRAMMENI")
-      (=ucs		  . #x1FCC)	; ῌ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER ETA")
       (=ucs		  . #x03B7)	; η
@@ -3247,6 +3243,10 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FC3)	; ῃ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER ETA WITH PROSGEGRAMMENI")
+      (=ucs		  . #x1FCC)	; ῌ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH OXIA AND YPOGEGRAMMENI")
@@ -3295,10 +3295,6 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER EPSILON WITH VARIA")
-      (=ucs		  . #x1F72)	; á½²
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER EPSILON")
       (=ucs		  . #x0395)	; Ε
@@ -3307,12 +3303,17 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1FC8)	; Ὲ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER EPSILON WITH VARIA")
+      (=ucs		  . #x1F72)	; á½²
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER EPSILON WITH OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1FC9)	; Έ
     (->canonical
      ((name		  . "GREEK CAPITAL LETTER EPSILON WITH TONOS")
       (=ucs		  . #x0388)	; Έ
@@ -3321,17 +3322,12 @@
      ((name		  . "GREEK SMALL LETTER EPSILON WITH OXIA")
       (=ucs		  . #x1F73)	; á½³
       ))
-    (=ucs		. #x1FC9)	; Έ
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER ETA WITH VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER ETA WITH VARIA")
-      (=ucs		  . #x1F74)	; á½´
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ETA")
       (=ucs		  . #x0397)	; Η
@@ -3340,12 +3336,17 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1FCA)	; Ὴ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER ETA WITH VARIA")
+      (=ucs		  . #x1F74)	; á½´
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER ETA WITH OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1FCB)	; Ή
     (->canonical
      ((name		  . "GREEK CAPITAL LETTER ETA WITH TONOS")
       (=ucs		  . #x0389)	; Ή
@@ -3354,17 +3355,12 @@
      ((name		  . "GREEK SMALL LETTER ETA WITH OXIA")
       (=ucs		  . #x1F75)	; á½µ
       ))
-    (=ucs		. #x1FCB)	; Ή
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER ETA WITH PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER ETA WITH YPOGEGRAMMENI")
-      (=ucs		  . #x1FC3)	; ῃ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER ETA")
       (=ucs		  . #x0397)	; Η
@@ -3373,6 +3369,10 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FCC)	; ῌ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER ETA WITH YPOGEGRAMMENI")
+      (=ucs		  . #x1FC3)	; ῃ
+      ))
     ))
 (define-char
   '((name		. "GREEK PSILI AND VARIA")
@@ -3421,10 +3421,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER IOTA WITH VRACHY")
-      (=ucs		  . #x1FD8)	; Ῐ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER IOTA")
       (=ucs		  . #x03B9)	; ι
@@ -3433,16 +3429,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x1FD0)	; ῐ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER IOTA WITH VRACHY")
+      (=ucs		  . #x1FD8)	; Ῐ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER IOTA WITH MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER IOTA WITH MACRON")
-      (=ucs		  . #x1FD9)	; Ῑ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER IOTA")
       (=ucs		  . #x03B9)	; ι
@@ -3451,6 +3447,10 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x1FD1)	; ῑ
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER IOTA WITH MACRON")
+      (=ucs		  . #x1FD9)	; Ῑ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER IOTA WITH DIALYTIKA AND VARIA")
@@ -3471,11 +3471,11 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1FD3)	; ΐ
     (->canonical
      ((name . "GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS")
       (=ucs		  . #x0390)	; ΐ
       ))
-    (=ucs		. #x1FD3)	; ΐ
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER IOTA WITH PERISPOMENI")
@@ -3510,10 +3510,6 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER IOTA WITH VRACHY")
-      (=ucs		  . #x1FD0)	; ῐ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER IOTA")
       (=ucs		  . #x0399)	; Ι
@@ -3522,16 +3518,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x1FD8)	; Ῐ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER IOTA WITH VRACHY")
+      (=ucs		  . #x1FD0)	; ῐ
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER IOTA WITH MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER IOTA WITH MACRON")
-      (=ucs		  . #x1FD1)	; ῑ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER IOTA")
       (=ucs		  . #x0399)	; Ι
@@ -3540,16 +3536,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x1FD9)	; Ῑ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER IOTA WITH MACRON")
+      (=ucs		  . #x1FD1)	; ῑ
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER IOTA WITH VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER IOTA WITH VARIA")
-      (=ucs		  . #x1F76)	; ὶ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER IOTA")
       (=ucs		  . #x0399)	; Ι
@@ -3558,12 +3554,17 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1FDA)	; Ὶ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER IOTA WITH VARIA")
+      (=ucs		  . #x1F76)	; ὶ
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER IOTA WITH OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1FDB)	; Ί
     (->canonical
      ((name		  . "GREEK CAPITAL LETTER IOTA WITH TONOS")
       (=ucs		  . #x038A)	; Ί
@@ -3572,7 +3573,6 @@
      ((name		  . "GREEK SMALL LETTER IOTA WITH OXIA")
       (=ucs		  . #x1F77)	; á½·
       ))
-    (=ucs		. #x1FDB)	; Ί
     ))
 (define-char
   '((name		. "GREEK DASIA AND VARIA")
@@ -3621,10 +3621,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER UPSILON WITH VRACHY")
-      (=ucs		  . #x1FE8)	; Ῠ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER UPSILON")
       (=ucs		  . #x03C5)	; υ
@@ -3633,16 +3629,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x1FE0)	; á¿ 
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER UPSILON WITH VRACHY")
+      (=ucs		  . #x1FE8)	; Ῠ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER UPSILON WITH MACRON")
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER UPSILON WITH MACRON")
-      (=ucs		  . #x1FE9)	; á¿©
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER UPSILON")
       (=ucs		  . #x03C5)	; υ
@@ -3651,6 +3647,10 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x1FE1)	; á¿¡
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER UPSILON WITH MACRON")
+      (=ucs		  . #x1FE9)	; á¿©
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND VARIA")
@@ -3671,11 +3671,11 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1FE3)	; á¿£
     (->canonical
      ((name . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS")
       (=ucs		  . #x03B0)	; ΰ
       ))
-    (=ucs		. #x1FE3)	; á¿£
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER RHO WITH PSILI")
@@ -3696,10 +3696,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name		  . "GREEK CAPITAL LETTER RHO WITH DASIA")
-      (=ucs		  . #x1FEC)	; Ῥ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER RHO")
       (=ucs		  . #x03C1)	; ρ
@@ -3708,6 +3704,10 @@
       (=ucs		  . #x0314)	; ̔
       ))
     (=ucs		. #x1FE5)	; á¿¥
+    (->uppercase
+     ((name		  . "GREEK CAPITAL LETTER RHO WITH DASIA")
+      (=ucs		  . #x1FEC)	; Ῥ
+      ))
     ))
 (define-char
   '((name		. "GREEK SMALL LETTER UPSILON WITH PERISPOMENI")
@@ -3742,10 +3742,6 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER UPSILON WITH VRACHY")
-      (=ucs		  . #x1FE0)	; á¿ 
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER UPSILON")
       (=ucs		  . #x03A5)	; Υ
@@ -3754,16 +3750,16 @@
       (=ucs		  . #x0306)	; ̆
       ))
     (=ucs		. #x1FE8)	; Ῠ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER UPSILON WITH VRACHY")
+      (=ucs		  . #x1FE0)	; á¿ 
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER UPSILON WITH MACRON")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER UPSILON WITH MACRON")
-      (=ucs		  . #x1FE1)	; á¿¡
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER UPSILON")
       (=ucs		  . #x03A5)	; Υ
@@ -3772,16 +3768,16 @@
       (=ucs		  . #x0304)	; ̄
       ))
     (=ucs		. #x1FE9)	; á¿©
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER UPSILON WITH MACRON")
+      (=ucs		  . #x1FE1)	; á¿¡
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER UPSILON WITH VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER UPSILON WITH VARIA")
-      (=ucs		  . #x1F7A)	; ὺ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER UPSILON")
       (=ucs		  . #x03A5)	; Υ
@@ -3790,12 +3786,17 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1FEA)	; Ὺ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER UPSILON WITH VARIA")
+      (=ucs		  . #x1F7A)	; ὺ
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER UPSILON WITH OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1FEB)	; á¿«
     (->canonical
      ((name		  . "GREEK CAPITAL LETTER UPSILON WITH TONOS")
       (=ucs		  . #x038E)	; Ύ
@@ -3804,17 +3805,12 @@
      ((name		  . "GREEK SMALL LETTER UPSILON WITH OXIA")
       (=ucs		  . #x1F7B)	; á½»
       ))
-    (=ucs		. #x1FEB)	; á¿«
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER RHO WITH DASIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER RHO WITH DASIA")
-      (=ucs		  . #x1FE5)	; á¿¥
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER RHO")
       (=ucs		  . #x03A1)	; Ρ
@@ -3823,6 +3819,10 @@
       (=ucs		  . #x0314)	; ̔
       ))
     (=ucs		. #x1FEC)	; Ῥ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER RHO WITH DASIA")
+      (=ucs		  . #x1FE5)	; á¿¥
+      ))
     ))
 (define-char
   '((name		. "GREEK DIALYTIKA AND VARIA")
@@ -3843,22 +3843,22 @@
     (general-category	symbol modifier) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (=ucs		. #x1FEE)	; á¿®
     (->canonical
      ((name		  . "GREEK DIALYTIKA TONOS")
       (=ucs		  . #x0385)	; ΅
       ))
-    (=ucs		. #x1FEE)	; á¿®
     ))
 (define-char
   '((name		. "GREEK VARIA")
     (general-category	symbol modifier) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (=ucs		. #x1FEF)	; `
     (->canonical
      ((name		  . "GRAVE ACCENT")
       (=ucs		  . #x0060)	; `
       ))
-    (=ucs		. #x1FEF)	; `
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH VARIA AND YPOGEGRAMMENI")
@@ -3879,10 +3879,6 @@
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->uppercase
-     ((name . "GREEK CAPITAL LETTER OMEGA WITH PROSGEGRAMMENI")
-      (=ucs		  . #x1FFC)	; ῼ
-      ))
     (=decomposition
      ((name		  . "GREEK SMALL LETTER OMEGA")
       (=ucs		  . #x03C9)	; ω
@@ -3891,6 +3887,10 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FF3)	; ῳ
+    (->uppercase
+     ((name . "GREEK CAPITAL LETTER OMEGA WITH PROSGEGRAMMENI")
+      (=ucs		  . #x1FFC)	; ῼ
+      ))
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH OXIA AND YPOGEGRAMMENI")
@@ -3939,10 +3939,6 @@
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER OMICRON WITH VARIA")
-      (=ucs		  . #x1F78)	; ὸ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMICRON")
       (=ucs		  . #x039F)	; Ο
@@ -3951,12 +3947,17 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1FF8)	; Ὸ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER OMICRON WITH VARIA")
+      (=ucs		  . #x1F78)	; ὸ
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER OMICRON WITH OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1FF9)	; Ό
     (->canonical
      ((name		  . "GREEK CAPITAL LETTER OMICRON WITH TONOS")
       (=ucs		  . #x038C)	; Ό
@@ -3965,17 +3966,12 @@
      ((name		  . "GREEK SMALL LETTER OMICRON WITH OXIA")
       (=ucs		  . #x1F79)	; á½¹
       ))
-    (=ucs		. #x1FF9)	; Ό
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER OMEGA WITH VARIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name		  . "GREEK SMALL LETTER OMEGA WITH VARIA")
-      (=ucs		  . #x1F7C)	; á½¼
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMEGA")
       (=ucs		  . #x03A9)	; Ω
@@ -3984,12 +3980,17 @@
       (=ucs		  . #x0300)	; ̀
       ))
     (=ucs		. #x1FFA)	; Ὼ
+    (->lowercase
+     ((name		  . "GREEK SMALL LETTER OMEGA WITH VARIA")
+      (=ucs		  . #x1F7C)	; á½¼
+      ))
     ))
 (define-char
   '((name		. "GREEK CAPITAL LETTER OMEGA WITH OXIA")
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
+    (=ucs		. #x1FFB)	; á¿»
     (->canonical
      ((name		  . "GREEK CAPITAL LETTER OMEGA WITH TONOS")
       (=ucs		  . #x038F)	; Ώ
@@ -3998,17 +3999,12 @@
      ((name		  . "GREEK SMALL LETTER OMEGA WITH OXIA")
       (=ucs		  . #x1F7D)	; á½½
       ))
-    (=ucs		. #x1FFB)	; á¿»
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH PROSGEGRAMMENI")
     (general-category	letter titlecase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->lowercase
-     ((name . "GREEK SMALL LETTER OMEGA WITH YPOGEGRAMMENI")
-      (=ucs		  . #x1FF3)	; ῳ
-      ))
     (=decomposition
      ((name		  . "GREEK CAPITAL LETTER OMEGA")
       (=ucs		  . #x03A9)	; Ω
@@ -4017,17 +4013,21 @@
       (=ucs		  . #x0345)	; ͅ
       ))
     (=ucs		. #x1FFC)	; ῼ
+    (->lowercase
+     ((name . "GREEK SMALL LETTER OMEGA WITH YPOGEGRAMMENI")
+      (=ucs		  . #x1FF3)	; ῳ
+      ))
     ))
 (define-char
   '((name		. "GREEK OXIA")
     (general-category	symbol modifier) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (=ucs		. #x1FFD)	; ´
     (->canonical
      ((name		  . "ACUTE ACCENT")
       (=ucs		  . #x00B4)	; ´
       ))
-    (=ucs		. #x1FFD)	; ´
     ))
 (define-char
   '((name		. "GREEK DASIA")
diff --git a/lisp/utf-2000/u02000-General-Punctuation.el b/lisp/utf-2000/u02000-General-Punctuation.el
index 3a1a9ea..522d80b 100644
--- a/lisp/utf-2000/u02000-General-Punctuation.el
+++ b/lisp/utf-2000/u02000-General-Punctuation.el
@@ -4,22 +4,22 @@
     (general-category	separator space) ; Normative Category
     (bidi-category	. "WS")
     (mirrored		. nil)
+    (=ucs		. #x2000)	;  
     (->canonical
      ((name		  . "EN SPACE")
       (=ucs		  . #x2002)	;  
       ))
-    (=ucs		. #x2000)	;  
     ))
 (define-char
   '((name		. "EM QUAD")
     (general-category	separator space) ; Normative Category
     (bidi-category	. "WS")
     (mirrored		. nil)
+    (=ucs		. #x2001)	;  
     (->canonical
      ((name		  . "EM SPACE")
       (=ucs		  . #x2003)	;  
       ))
-    (=ucs		. #x2001)	;  
     ))
 (define-char
   '((name		. "EN SPACE")
diff --git a/lisp/utf-2000/u020A0-Currency-Symbols.el b/lisp/utf-2000/u020A0-Currency-Symbols.el
index 35d10e5..3879647 100644
--- a/lisp/utf-2000/u020A0-Currency-Symbols.el
+++ b/lisp/utf-2000/u020A0-Currency-Symbols.el
@@ -74,11 +74,11 @@
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (=ucs		. #x20A9)	; ₩
     (->fullwidth
      ((name		  . "FULLWIDTH WON SIGN")
       (=ucs		  . #xFFE6)	; ￦
       ))
-    (=ucs		. #x20A9)	; ₩
     ))
 (define-char
   '((name		. "NEW SHEQEL SIGN")