Merge `japanese-jisx0213-1'.

diff --git a/lisp/utf-2000/u01F00-Greek-Extended.el b/lisp/utf-2000/u01F00-Greek-Extended.el
index bc3bf41..cd0cf4f 100644 (file)
--- a/lisp/utf-2000/u01F00-Greek-Extended.el
+++ b/lisp/utf-2000/u01F00-Greek-Extended.el
@@ -3,8 +3,8 @@
     (ucs               . #x1F00)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B1 #x0313)
     (mirrored          . nil)
+    (->decomposition   #x03B1 #x0313)
     (->uppercase       #x1F08)
     (->titlecase       #x1F08)
     ))
@@ -13,8 +13,8 @@
     (ucs               . #x1F01)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B1 #x0314)
     (mirrored          . nil)
+    (->decomposition   #x03B1 #x0314)
     (->uppercase       #x1F09)
     (->titlecase       #x1F09)
     ))
@@ -23,8 +23,8 @@
     (ucs               . #x1F02)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F00 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F00 #x0300)
     (->uppercase       #x1F0A)
     (->titlecase       #x1F0A)
     ))
@@ -33,8 +33,8 @@
     (ucs               . #x1F03)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F01 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F01 #x0300)
     (->uppercase       #x1F0B)
     (->titlecase       #x1F0B)
     ))
@@ -43,8 +43,8 @@
     (ucs               . #x1F04)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F00 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F00 #x0301)
     (->uppercase       #x1F0C)
     (->titlecase       #x1F0C)
     ))
@@ -53,28 +53,28 @@
     (ucs               . #x1F05)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F01 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F01 #x0301)
     (->uppercase       #x1F0D)
     (->titlecase       #x1F0D)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND PERISPOMENI")
-    (ucs  . #x1F06)
+    (ucs               . #x1F06)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F00 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F00 #x0342)
     (->uppercase       #x1F0E)
     (->titlecase       #x1F0E)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND PERISPOMENI")
-    (ucs  . #x1F07)
+    (ucs               . #x1F07)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F01 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F01 #x0342)
     (->uppercase       #x1F0F)
     (->titlecase       #x1F0F)
     ))
@@ -83,8 +83,8 @@
     (ucs               . #x1F08)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0391 #x0313)
     (mirrored          . nil)
+    (->decomposition   #x0391 #x0313)
     (->lowercase       #x1F00)
     ))
 (define-char
@@ -92,8 +92,8 @@
     (ucs               . #x1F09)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0391 #x0314)
     (mirrored          . nil)
+    (->decomposition   #x0391 #x0314)
     (->lowercase       #x1F01)
     ))
 (define-char
@@ -101,8 +101,8 @@
     (ucs               . #x1F0A)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F08 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F08 #x0300)
     (->lowercase       #x1F02)
     ))
 (define-char
@@ -110,8 +110,8 @@
     (ucs               . #x1F0B)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F09 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F09 #x0300)
     (->lowercase       #x1F03)
     ))
 (define-char
@@ -119,8 +119,8 @@
     (ucs               . #x1F0C)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F08 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F08 #x0301)
     (->lowercase       #x1F04)
     ))
 (define-char
@@ -128,26 +128,26 @@
     (ucs               . #x1F0D)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F09 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F09 #x0301)
     (->lowercase       #x1F05)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND PERISPOMENI")
-    (ucs  . #x1F0E)
+    (ucs               . #x1F0E)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F08 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F08 #x0342)
     (->lowercase       #x1F06)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND PERISPOMENI")
-    (ucs  . #x1F0F)
+    (ucs               . #x1F0F)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F09 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F09 #x0342)
     (->lowercase       #x1F07)
     ))
 (define-char
@@ -155,8 +155,8 @@
     (ucs               . #x1F10)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B5 #x0313)
     (mirrored          . nil)
+    (->decomposition   #x03B5 #x0313)
     (->uppercase       #x1F18)
     (->titlecase       #x1F18)
     ))
@@ -165,8 +165,8 @@
     (ucs               . #x1F11)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B5 #x0314)
     (mirrored          . nil)
+    (->decomposition   #x03B5 #x0314)
     (->uppercase       #x1F19)
     (->titlecase       #x1F19)
     ))
@@ -175,8 +175,8 @@
     (ucs               . #x1F12)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F10 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F10 #x0300)
     (->uppercase       #x1F1A)
     (->titlecase       #x1F1A)
     ))
@@ -185,8 +185,8 @@
     (ucs               . #x1F13)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F11 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F11 #x0300)
     (->uppercase       #x1F1B)
     (->titlecase       #x1F1B)
     ))
@@ -195,8 +195,8 @@
     (ucs               . #x1F14)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F10 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F10 #x0301)
     (->uppercase       #x1F1C)
     (->titlecase       #x1F1C)
     ))
@@ -205,8 +205,8 @@
     (ucs               . #x1F15)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F11 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F11 #x0301)
     (->uppercase       #x1F1D)
     (->titlecase       #x1F1D)
     ))
@@ -215,8 +215,8 @@
     (ucs               . #x1F18)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0395 #x0313)
     (mirrored          . nil)
+    (->decomposition   #x0395 #x0313)
     (->lowercase       #x1F10)
     ))
 (define-char
@@ -224,44 +224,44 @@
     (ucs               . #x1F19)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0395 #x0314)
     (mirrored          . nil)
+    (->decomposition   #x0395 #x0314)
     (->lowercase       #x1F11)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER EPSILON WITH PSILI AND VARIA")
-    (ucs  . #x1F1A)
+    (ucs               . #x1F1A)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F18 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F18 #x0300)
     (->lowercase       #x1F12)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER EPSILON WITH DASIA AND VARIA")
-    (ucs  . #x1F1B)
+    (ucs               . #x1F1B)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F19 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F19 #x0300)
     (->lowercase       #x1F13)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER EPSILON WITH PSILI AND OXIA")
-    (ucs  . #x1F1C)
+    (ucs               . #x1F1C)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F18 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F18 #x0301)
     (->lowercase       #x1F14)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER EPSILON WITH DASIA AND OXIA")
-    (ucs  . #x1F1D)
+    (ucs               . #x1F1D)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F19 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F19 #x0301)
     (->lowercase       #x1F15)
     ))
 (define-char
@@ -269,8 +269,8 @@
     (ucs               . #x1F20)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B7 #x0313)
     (mirrored          . nil)
+    (->decomposition   #x03B7 #x0313)
     (->uppercase       #x1F28)
     (->titlecase       #x1F28)
     ))
@@ -279,8 +279,8 @@
     (ucs               . #x1F21)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B7 #x0314)
     (mirrored          . nil)
+    (->decomposition   #x03B7 #x0314)
     (->uppercase       #x1F29)
     (->titlecase       #x1F29)
     ))
@@ -289,8 +289,8 @@
     (ucs               . #x1F22)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F20 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F20 #x0300)
     (->uppercase       #x1F2A)
     (->titlecase       #x1F2A)
     ))
@@ -299,8 +299,8 @@
     (ucs               . #x1F23)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F21 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F21 #x0300)
     (->uppercase       #x1F2B)
     (->titlecase       #x1F2B)
     ))
@@ -309,8 +309,8 @@
     (ucs               . #x1F24)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F20 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F20 #x0301)
     (->uppercase       #x1F2C)
     (->titlecase       #x1F2C)
     ))
@@ -319,28 +319,28 @@
     (ucs               . #x1F25)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F21 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F21 #x0301)
     (->uppercase       #x1F2D)
     (->titlecase       #x1F2D)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH PSILI AND PERISPOMENI")
-    (ucs  . #x1F26)
+    (ucs               . #x1F26)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F20 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F20 #x0342)
     (->uppercase       #x1F2E)
     (->titlecase       #x1F2E)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH DASIA AND PERISPOMENI")
-    (ucs  . #x1F27)
+    (ucs               . #x1F27)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F21 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F21 #x0342)
     (->uppercase       #x1F2F)
     (->titlecase       #x1F2F)
     ))
@@ -349,8 +349,8 @@
     (ucs               . #x1F28)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0397 #x0313)
     (mirrored          . nil)
+    (->decomposition   #x0397 #x0313)
     (->lowercase       #x1F20)
     ))
 (define-char
@@ -358,8 +358,8 @@
     (ucs               . #x1F29)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0397 #x0314)
     (mirrored          . nil)
+    (->decomposition   #x0397 #x0314)
     (->lowercase       #x1F21)
     ))
 (define-char
@@ -367,8 +367,8 @@
     (ucs               . #x1F2A)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F28 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F28 #x0300)
     (->lowercase       #x1F22)
     ))
 (define-char
@@ -376,8 +376,8 @@
     (ucs               . #x1F2B)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F29 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F29 #x0300)
     (->lowercase       #x1F23)
     ))
 (define-char
@@ -385,8 +385,8 @@
     (ucs               . #x1F2C)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F28 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F28 #x0301)
     (->lowercase       #x1F24)
     ))
 (define-char
@@ -394,26 +394,26 @@
     (ucs               . #x1F2D)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F29 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F29 #x0301)
     (->lowercase       #x1F25)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND PERISPOMENI")
-    (ucs  . #x1F2E)
+    (ucs               . #x1F2E)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F28 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F28 #x0342)
     (->lowercase       #x1F26)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND PERISPOMENI")
-    (ucs  . #x1F2F)
+    (ucs               . #x1F2F)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F29 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F29 #x0342)
     (->lowercase       #x1F27)
     ))
 (define-char
@@ -421,8 +421,8 @@
     (ucs               . #x1F30)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B9 #x0313)
     (mirrored          . nil)
+    (->decomposition   #x03B9 #x0313)
     (->uppercase       #x1F38)
     (->titlecase       #x1F38)
     ))
@@ -431,8 +431,8 @@
     (ucs               . #x1F31)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B9 #x0314)
     (mirrored          . nil)
+    (->decomposition   #x03B9 #x0314)
     (->uppercase       #x1F39)
     (->titlecase       #x1F39)
     ))
@@ -441,8 +441,8 @@
     (ucs               . #x1F32)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F30 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F30 #x0300)
     (->uppercase       #x1F3A)
     (->titlecase       #x1F3A)
     ))
@@ -451,8 +451,8 @@
     (ucs               . #x1F33)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F31 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F31 #x0300)
     (->uppercase       #x1F3B)
     (->titlecase       #x1F3B)
     ))
@@ -461,8 +461,8 @@
     (ucs               . #x1F34)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F30 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F30 #x0301)
     (->uppercase       #x1F3C)
     (->titlecase       #x1F3C)
     ))
@@ -471,28 +471,28 @@
     (ucs               . #x1F35)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F31 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F31 #x0301)
     (->uppercase       #x1F3D)
     (->titlecase       #x1F3D)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER IOTA WITH PSILI AND PERISPOMENI")
-    (ucs  . #x1F36)
+    (ucs               . #x1F36)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F30 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F30 #x0342)
     (->uppercase       #x1F3E)
     (->titlecase       #x1F3E)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER IOTA WITH DASIA AND PERISPOMENI")
-    (ucs  . #x1F37)
+    (ucs               . #x1F37)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F31 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F31 #x0342)
     (->uppercase       #x1F3F)
     (->titlecase       #x1F3F)
     ))
@@ -501,8 +501,8 @@
     (ucs               . #x1F38)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0399 #x0313)
     (mirrored          . nil)
+    (->decomposition   #x0399 #x0313)
     (->lowercase       #x1F30)
     ))
 (define-char
@@ -510,8 +510,8 @@
     (ucs               . #x1F39)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0399 #x0314)
     (mirrored          . nil)
+    (->decomposition   #x0399 #x0314)
     (->lowercase       #x1F31)
     ))
 (define-char
@@ -519,8 +519,8 @@
     (ucs               . #x1F3A)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F38 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F38 #x0300)
     (->lowercase       #x1F32)
     ))
 (define-char
@@ -528,8 +528,8 @@
     (ucs               . #x1F3B)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F39 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F39 #x0300)
     (->lowercase       #x1F33)
     ))
 (define-char
@@ -537,8 +537,8 @@
     (ucs               . #x1F3C)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F38 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F38 #x0301)
     (->lowercase       #x1F34)
     ))
 (define-char
@@ -546,26 +546,26 @@
     (ucs               . #x1F3D)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F39 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F39 #x0301)
     (->lowercase       #x1F35)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER IOTA WITH PSILI AND PERISPOMENI")
-    (ucs  . #x1F3E)
+    (ucs               . #x1F3E)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F38 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F38 #x0342)
     (->lowercase       #x1F36)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER IOTA WITH DASIA AND PERISPOMENI")
-    (ucs  . #x1F3F)
+    (ucs               . #x1F3F)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F39 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F39 #x0342)
     (->lowercase       #x1F37)
     ))
 (define-char
@@ -573,8 +573,8 @@
     (ucs               . #x1F40)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03BF #x0313)
     (mirrored          . nil)
+    (->decomposition   #x03BF #x0313)
     (->uppercase       #x1F48)
     (->titlecase       #x1F48)
     ))
@@ -583,8 +583,8 @@
     (ucs               . #x1F41)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03BF #x0314)
     (mirrored          . nil)
+    (->decomposition   #x03BF #x0314)
     (->uppercase       #x1F49)
     (->titlecase       #x1F49)
     ))
@@ -593,8 +593,8 @@
     (ucs               . #x1F42)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F40 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F40 #x0300)
     (->uppercase       #x1F4A)
     (->titlecase       #x1F4A)
     ))
@@ -603,8 +603,8 @@
     (ucs               . #x1F43)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F41 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F41 #x0300)
     (->uppercase       #x1F4B)
     (->titlecase       #x1F4B)
     ))
@@ -613,8 +613,8 @@
     (ucs               . #x1F44)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F40 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F40 #x0301)
     (->uppercase       #x1F4C)
     (->titlecase       #x1F4C)
     ))
@@ -623,8 +623,8 @@
     (ucs               . #x1F45)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F41 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F41 #x0301)
     (->uppercase       #x1F4D)
     (->titlecase       #x1F4D)
     ))
@@ -633,8 +633,8 @@
     (ucs               . #x1F48)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x039F #x0313)
     (mirrored          . nil)
+    (->decomposition   #x039F #x0313)
     (->lowercase       #x1F40)
     ))
 (define-char
@@ -642,44 +642,44 @@
     (ucs               . #x1F49)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x039F #x0314)
     (mirrored          . nil)
+    (->decomposition   #x039F #x0314)
     (->lowercase       #x1F41)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMICRON WITH PSILI AND VARIA")
-    (ucs  . #x1F4A)
+    (ucs               . #x1F4A)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F48 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F48 #x0300)
     (->lowercase       #x1F42)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMICRON WITH DASIA AND VARIA")
-    (ucs  . #x1F4B)
+    (ucs               . #x1F4B)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F49 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F49 #x0300)
     (->lowercase       #x1F43)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMICRON WITH PSILI AND OXIA")
-    (ucs  . #x1F4C)
+    (ucs               . #x1F4C)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F48 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F48 #x0301)
     (->lowercase       #x1F44)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMICRON WITH DASIA AND OXIA")
-    (ucs  . #x1F4D)
+    (ucs               . #x1F4D)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F49 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F49 #x0301)
     (->lowercase       #x1F45)
     ))
 (define-char
@@ -687,16 +687,16 @@
     (ucs               . #x1F50)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03C5 #x0313)
     (mirrored          . nil)
+    (->decomposition   #x03C5 #x0313)
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER UPSILON WITH DASIA")
     (ucs               . #x1F51)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03C5 #x0314)
     (mirrored          . nil)
+    (->decomposition   #x03C5 #x0314)
     (->uppercase       #x1F59)
     (->titlecase       #x1F59)
     ))
@@ -705,16 +705,16 @@
     (ucs               . #x1F52)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F50 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F50 #x0300)
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER UPSILON WITH DASIA AND VARIA")
     (ucs               . #x1F53)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F51 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F51 #x0300)
     (->uppercase       #x1F5B)
     (->titlecase       #x1F5B)
     ))
@@ -723,34 +723,34 @@
     (ucs               . #x1F54)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F50 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F50 #x0301)
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER UPSILON WITH DASIA AND OXIA")
     (ucs               . #x1F55)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F51 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F51 #x0301)
     (->uppercase       #x1F5D)
     (->titlecase       #x1F5D)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER UPSILON WITH PSILI AND PERISPOMENI")
-    (ucs  . #x1F56)
+    (ucs               . #x1F56)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F50 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F50 #x0342)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER UPSILON WITH DASIA AND PERISPOMENI")
-    (ucs  . #x1F57)
+    (ucs               . #x1F57)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F51 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F51 #x0342)
     (->uppercase       #x1F5F)
     (->titlecase       #x1F5F)
     ))
@@ -759,35 +759,35 @@
     (ucs               . #x1F59)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03A5 #x0314)
     (mirrored          . nil)
+    (->decomposition   #x03A5 #x0314)
     (->lowercase       #x1F51)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER UPSILON WITH DASIA AND VARIA")
-    (ucs  . #x1F5B)
+    (ucs               . #x1F5B)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F59 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F59 #x0300)
     (->lowercase       #x1F53)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER UPSILON WITH DASIA AND OXIA")
-    (ucs  . #x1F5D)
+    (ucs               . #x1F5D)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F59 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F59 #x0301)
     (->lowercase       #x1F55)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER UPSILON WITH DASIA AND PERISPOMENI")
-    (ucs  . #x1F5F)
+    (ucs               . #x1F5F)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F59 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F59 #x0342)
     (->lowercase       #x1F57)
     ))
 (define-char
@@ -795,8 +795,8 @@
     (ucs               . #x1F60)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03C9 #x0313)
     (mirrored          . nil)
+    (->decomposition   #x03C9 #x0313)
     (->uppercase       #x1F68)
     (->titlecase       #x1F68)
     ))
@@ -805,8 +805,8 @@
     (ucs               . #x1F61)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03C9 #x0314)
     (mirrored          . nil)
+    (->decomposition   #x03C9 #x0314)
     (->uppercase       #x1F69)
     (->titlecase       #x1F69)
     ))
@@ -815,8 +815,8 @@
     (ucs               . #x1F62)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F60 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F60 #x0300)
     (->uppercase       #x1F6A)
     (->titlecase       #x1F6A)
     ))
@@ -825,8 +825,8 @@
     (ucs               . #x1F63)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F61 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F61 #x0300)
     (->uppercase       #x1F6B)
     (->titlecase       #x1F6B)
     ))
@@ -835,8 +835,8 @@
     (ucs               . #x1F64)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F60 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F60 #x0301)
     (->uppercase       #x1F6C)
     (->titlecase       #x1F6C)
     ))
@@ -845,28 +845,28 @@
     (ucs               . #x1F65)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F61 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F61 #x0301)
     (->uppercase       #x1F6D)
     (->titlecase       #x1F6D)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND PERISPOMENI")
-    (ucs  . #x1F66)
+    (ucs               . #x1F66)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F60 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F60 #x0342)
     (->uppercase       #x1F6E)
     (->titlecase       #x1F6E)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND PERISPOMENI")
-    (ucs  . #x1F67)
+    (ucs               . #x1F67)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F61 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F61 #x0342)
     (->uppercase       #x1F6F)
     (->titlecase       #x1F6F)
     ))
@@ -875,8 +875,8 @@
     (ucs               . #x1F68)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03A9 #x0313)
     (mirrored          . nil)
+    (->decomposition   #x03A9 #x0313)
     (->lowercase       #x1F60)
     ))
 (define-char
@@ -884,8 +884,8 @@
     (ucs               . #x1F69)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03A9 #x0314)
     (mirrored          . nil)
+    (->decomposition   #x03A9 #x0314)
     (->lowercase       #x1F61)
     ))
 (define-char
@@ -893,8 +893,8 @@
     (ucs               . #x1F6A)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F68 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F68 #x0300)
     (->lowercase       #x1F62)
     ))
 (define-char
@@ -902,8 +902,8 @@
     (ucs               . #x1F6B)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F69 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1F69 #x0300)
     (->lowercase       #x1F63)
     ))
 (define-char
@@ -911,8 +911,8 @@
     (ucs               . #x1F6C)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F68 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F68 #x0301)
     (->lowercase       #x1F64)
     ))
 (define-char
@@ -920,26 +920,26 @@
     (ucs               . #x1F6D)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F69 #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1F69 #x0301)
     (->lowercase       #x1F65)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND PERISPOMENI")
-    (ucs  . #x1F6E)
+    (ucs               . #x1F6E)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F68 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F68 #x0342)
     (->lowercase       #x1F66)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND PERISPOMENI")
-    (ucs  . #x1F6F)
+    (ucs               . #x1F6F)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F69 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1F69 #x0342)
     (->lowercase       #x1F67)
     ))
 (define-char
@@ -947,48 +947,52 @@
     (ucs               . #x1F70)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B1 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x03B1 #x0300)
     (->uppercase       #x1FBA)
     (->titlecase       #x1FBA)
+    (japanese-jisx0213-1       #x2B #x46)      ; ὰ
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER ALPHA WITH OXIA")
     (ucs               . #x1F71)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03AC)
     (mirrored          . nil)
+    (->decomposition   #x03AC)
     (->uppercase       #x1FBB)
     (->titlecase       #x1FBB)
+    (japanese-jisx0213-1       #x2B #x47)      ; ά
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER EPSILON WITH VARIA")
     (ucs               . #x1F72)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B5 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x03B5 #x0300)
     (->uppercase       #x1FC8)
     (->titlecase       #x1FC8)
+    (japanese-jisx0213-1       #x2B #x50)      ; ὲ
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER EPSILON WITH OXIA")
     (ucs               . #x1F73)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03AD)
     (mirrored          . nil)
+    (->decomposition   #x03AD)
     (->uppercase       #x1FC9)
     (->titlecase       #x1FC9)
+    (japanese-jisx0213-1       #x2B #x51)      ; έ
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER ETA WITH VARIA")
     (ucs               . #x1F74)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B7 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x03B7 #x0300)
     (->uppercase       #x1FCA)
     (->titlecase       #x1FCA)
     ))
@@ -997,8 +1001,8 @@
     (ucs               . #x1F75)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03AE)
     (mirrored          . nil)
+    (->decomposition   #x03AE)
     (->uppercase       #x1FCB)
     (->titlecase       #x1FCB)
     ))
@@ -1007,8 +1011,8 @@
     (ucs               . #x1F76)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B9 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x03B9 #x0300)
     (->uppercase       #x1FDA)
     (->titlecase       #x1FDA)
     ))
@@ -1017,8 +1021,8 @@
     (ucs               . #x1F77)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03AF)
     (mirrored          . nil)
+    (->decomposition   #x03AF)
     (->uppercase       #x1FDB)
     (->titlecase       #x1FDB)
     ))
@@ -1027,8 +1031,8 @@
     (ucs               . #x1F78)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03BF #x0300)
     (mirrored          . nil)
+    (->decomposition   #x03BF #x0300)
     (->uppercase       #x1FF8)
     (->titlecase       #x1FF8)
     ))
@@ -1037,8 +1041,8 @@
     (ucs               . #x1F79)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03CC)
     (mirrored          . nil)
+    (->decomposition   #x03CC)
     (->uppercase       #x1FF9)
     (->titlecase       #x1FF9)
     ))
@@ -1047,8 +1051,8 @@
     (ucs               . #x1F7A)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03C5 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x03C5 #x0300)
     (->uppercase       #x1FEA)
     (->titlecase       #x1FEA)
     ))
@@ -1057,8 +1061,8 @@
     (ucs               . #x1F7B)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03CD)
     (mirrored          . nil)
+    (->decomposition   #x03CD)
     (->uppercase       #x1FEB)
     (->titlecase       #x1FEB)
     ))
@@ -1067,8 +1071,8 @@
     (ucs               . #x1F7C)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03C9 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x03C9 #x0300)
     (->uppercase       #x1FFA)
     (->titlecase       #x1FFA)
     ))
@@ -1077,465 +1081,465 @@
     (ucs               . #x1F7D)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03CE)
     (mirrored          . nil)
+    (->decomposition   #x03CE)
     (->uppercase       #x1FFB)
     (->titlecase       #x1FFB)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND YPOGEGRAMMENI")
-    (ucs  . #x1F80)
+    (ucs               . #x1F80)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F00 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F00 #x0345)
     (->uppercase       #x1F88)
     (->titlecase       #x1F88)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND YPOGEGRAMMENI")
-    (ucs  . #x1F81)
+    (ucs               . #x1F81)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F01 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F01 #x0345)
     (->uppercase       #x1F89)
     (->titlecase       #x1F89)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND VARIA AND YPOGEGRAMMENI")
-    (ucs  . #x1F82)
+    (ucs               . #x1F82)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F02 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F02 #x0345)
     (->uppercase       #x1F8A)
     (->titlecase       #x1F8A)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND VARIA AND YPOGEGRAMMENI")
-    (ucs  . #x1F83)
+    (ucs               . #x1F83)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F03 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F03 #x0345)
     (->uppercase       #x1F8B)
     (->titlecase       #x1F8B)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND OXIA AND YPOGEGRAMMENI")
-    (ucs  . #x1F84)
+    (ucs               . #x1F84)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F04 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F04 #x0345)
     (->uppercase       #x1F8C)
     (->titlecase       #x1F8C)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND OXIA AND YPOGEGRAMMENI")
-    (ucs  . #x1F85)
+    (ucs               . #x1F85)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F05 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F05 #x0345)
     (->uppercase       #x1F8D)
     (->titlecase       #x1F8D)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI")
-    (ucs  . #x1F86)
+    (ucs               . #x1F86)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F06 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F06 #x0345)
     (->uppercase       #x1F8E)
     (->titlecase       #x1F8E)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI")
-    (ucs  . #x1F87)
+    (ucs               . #x1F87)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F07 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F07 #x0345)
     (->uppercase       #x1F8F)
     (->titlecase       #x1F8F)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND PROSGEGRAMMENI")
-    (ucs  . #x1F88)
+    (ucs               . #x1F88)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F08 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F08 #x0345)
     (->lowercase       #x1F80)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND PROSGEGRAMMENI")
-    (ucs  . #x1F89)
+    (ucs               . #x1F89)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F09 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F09 #x0345)
     (->lowercase       #x1F81)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND VARIA AND PROSGEGRAMMENI")
-    (ucs  . #x1F8A)
+    (ucs               . #x1F8A)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F0A #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F0A #x0345)
     (->lowercase       #x1F82)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND VARIA AND PROSGEGRAMMENI")
-    (ucs  . #x1F8B)
+    (ucs               . #x1F8B)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F0B #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F0B #x0345)
     (->lowercase       #x1F83)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND OXIA AND PROSGEGRAMMENI")
-    (ucs  . #x1F8C)
+    (ucs               . #x1F8C)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F0C #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F0C #x0345)
     (->lowercase       #x1F84)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND OXIA AND PROSGEGRAMMENI")
-    (ucs  . #x1F8D)
+    (ucs               . #x1F8D)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F0D #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F0D #x0345)
     (->lowercase       #x1F85)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI")
-    (ucs  . #x1F8E)
+    (ucs               . #x1F8E)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F0E #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F0E #x0345)
     (->lowercase       #x1F86)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ALPHA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI")
-    (ucs  . #x1F8F)
+    (ucs               . #x1F8F)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F0F #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F0F #x0345)
     (->lowercase       #x1F87)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH PSILI AND YPOGEGRAMMENI")
-    (ucs  . #x1F90)
+    (ucs               . #x1F90)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F20 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F20 #x0345)
     (->uppercase       #x1F98)
     (->titlecase       #x1F98)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH DASIA AND YPOGEGRAMMENI")
-    (ucs  . #x1F91)
+    (ucs               . #x1F91)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F21 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F21 #x0345)
     (->uppercase       #x1F99)
     (->titlecase       #x1F99)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH PSILI AND VARIA AND YPOGEGRAMMENI")
-    (ucs  . #x1F92)
+    (ucs               . #x1F92)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F22 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F22 #x0345)
     (->uppercase       #x1F9A)
     (->titlecase       #x1F9A)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH DASIA AND VARIA AND YPOGEGRAMMENI")
-    (ucs  . #x1F93)
+    (ucs               . #x1F93)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F23 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F23 #x0345)
     (->uppercase       #x1F9B)
     (->titlecase       #x1F9B)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH PSILI AND OXIA AND YPOGEGRAMMENI")
-    (ucs  . #x1F94)
+    (ucs               . #x1F94)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F24 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F24 #x0345)
     (->uppercase       #x1F9C)
     (->titlecase       #x1F9C)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH DASIA AND OXIA AND YPOGEGRAMMENI")
-    (ucs  . #x1F95)
+    (ucs               . #x1F95)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F25 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F25 #x0345)
     (->uppercase       #x1F9D)
     (->titlecase       #x1F9D)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI")
-    (ucs  . #x1F96)
+    (ucs               . #x1F96)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F26 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F26 #x0345)
     (->uppercase       #x1F9E)
     (->titlecase       #x1F9E)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI")
-    (ucs  . #x1F97)
+    (ucs               . #x1F97)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F27 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F27 #x0345)
     (->uppercase       #x1F9F)
     (->titlecase       #x1F9F)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND PROSGEGRAMMENI")
-    (ucs  . #x1F98)
+    (ucs               . #x1F98)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F28 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F28 #x0345)
     (->lowercase       #x1F90)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND PROSGEGRAMMENI")
-    (ucs  . #x1F99)
+    (ucs               . #x1F99)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F29 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F29 #x0345)
     (->lowercase       #x1F91)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND VARIA AND PROSGEGRAMMENI")
-    (ucs  . #x1F9A)
+    (ucs               . #x1F9A)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F2A #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F2A #x0345)
     (->lowercase       #x1F92)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND VARIA AND PROSGEGRAMMENI")
-    (ucs  . #x1F9B)
+    (ucs               . #x1F9B)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F2B #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F2B #x0345)
     (->lowercase       #x1F93)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND OXIA AND PROSGEGRAMMENI")
-    (ucs  . #x1F9C)
+    (ucs               . #x1F9C)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F2C #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F2C #x0345)
     (->lowercase       #x1F94)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND OXIA AND PROSGEGRAMMENI")
-    (ucs  . #x1F9D)
+    (ucs               . #x1F9D)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F2D #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F2D #x0345)
     (->lowercase       #x1F95)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI")
-    (ucs  . #x1F9E)
+    (ucs               . #x1F9E)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F2E #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F2E #x0345)
     (->lowercase       #x1F96)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER ETA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI")
-    (ucs  . #x1F9F)
+    (ucs               . #x1F9F)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F2F #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F2F #x0345)
     (->lowercase       #x1F97)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND YPOGEGRAMMENI")
-    (ucs  . #x1FA0)
+    (ucs               . #x1FA0)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F60 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F60 #x0345)
     (->uppercase       #x1FA8)
     (->titlecase       #x1FA8)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND YPOGEGRAMMENI")
-    (ucs  . #x1FA1)
+    (ucs               . #x1FA1)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F61 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F61 #x0345)
     (->uppercase       #x1FA9)
     (->titlecase       #x1FA9)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND VARIA AND YPOGEGRAMMENI")
-    (ucs  . #x1FA2)
+    (ucs               . #x1FA2)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F62 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F62 #x0345)
     (->uppercase       #x1FAA)
     (->titlecase       #x1FAA)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND VARIA AND YPOGEGRAMMENI")
-    (ucs  . #x1FA3)
+    (ucs               . #x1FA3)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F63 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F63 #x0345)
     (->uppercase       #x1FAB)
     (->titlecase       #x1FAB)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND OXIA AND YPOGEGRAMMENI")
-    (ucs  . #x1FA4)
+    (ucs               . #x1FA4)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F64 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F64 #x0345)
     (->uppercase       #x1FAC)
     (->titlecase       #x1FAC)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND OXIA AND YPOGEGRAMMENI")
-    (ucs  . #x1FA5)
+    (ucs               . #x1FA5)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F65 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F65 #x0345)
     (->uppercase       #x1FAD)
     (->titlecase       #x1FAD)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI")
-    (ucs  . #x1FA6)
+    (ucs               . #x1FA6)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F66 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F66 #x0345)
     (->uppercase       #x1FAE)
     (->titlecase       #x1FAE)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI")
-    (ucs  . #x1FA7)
+    (ucs               . #x1FA7)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F67 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F67 #x0345)
     (->uppercase       #x1FAF)
     (->titlecase       #x1FAF)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND PROSGEGRAMMENI")
-    (ucs  . #x1FA8)
+    (ucs               . #x1FA8)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F68 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F68 #x0345)
     (->lowercase       #x1FA0)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND PROSGEGRAMMENI")
-    (ucs  . #x1FA9)
+    (ucs               . #x1FA9)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F69 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F69 #x0345)
     (->lowercase       #x1FA1)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND VARIA AND PROSGEGRAMMENI")
-    (ucs  . #x1FAA)
+    (ucs               . #x1FAA)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F6A #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F6A #x0345)
     (->lowercase       #x1FA2)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND VARIA AND PROSGEGRAMMENI")
-    (ucs  . #x1FAB)
+    (ucs               . #x1FAB)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F6B #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F6B #x0345)
     (->lowercase       #x1FA3)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND OXIA AND PROSGEGRAMMENI")
-    (ucs  . #x1FAC)
+    (ucs               . #x1FAC)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F6C #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F6C #x0345)
     (->lowercase       #x1FA4)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND OXIA AND PROSGEGRAMMENI")
-    (ucs  . #x1FAD)
+    (ucs               . #x1FAD)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F6D #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F6D #x0345)
     (->lowercase       #x1FA5)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI")
-    (ucs  . #x1FAE)
+    (ucs               . #x1FAE)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F6E #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F6E #x0345)
     (->lowercase       #x1FA6)
     ))
 (define-char
   '((name . "GREEK CAPITAL LETTER OMEGA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI")
-    (ucs  . #x1FAF)
+    (ucs               . #x1FAF)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F6F #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F6F #x0345)
     (->lowercase       #x1FA7)
     ))
 (define-char
@@ -1543,8 +1547,8 @@
     (ucs               . #x1FB0)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B1 #x0306)
     (mirrored          . nil)
+    (->decomposition   #x03B1 #x0306)
     (->uppercase       #x1FB8)
     (->titlecase       #x1FB8)
     ))
@@ -1553,60 +1557,60 @@
     (ucs               . #x1FB1)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B1 #x0304)
     (mirrored          . nil)
+    (->decomposition   #x03B1 #x0304)
     (->uppercase       #x1FB9)
     (->titlecase       #x1FB9)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH VARIA AND YPOGEGRAMMENI")
-    (ucs  . #x1FB2)
+    (ucs               . #x1FB2)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F70 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F70 #x0345)
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER ALPHA WITH YPOGEGRAMMENI")
     (ucs               . #x1FB3)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B1 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x03B1 #x0345)
     (->uppercase       #x1FBC)
     (->titlecase       #x1FBC)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH OXIA AND YPOGEGRAMMENI")
-    (ucs  . #x1FB4)
+    (ucs               . #x1FB4)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03AC #x0345)
     (mirrored          . nil)
+    (->decomposition   #x03AC #x0345)
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER ALPHA WITH PERISPOMENI")
     (ucs               . #x1FB6)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B1 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x03B1 #x0342)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ALPHA WITH PERISPOMENI AND YPOGEGRAMMENI")
-    (ucs  . #x1FB7)
+    (ucs               . #x1FB7)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1FB6 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1FB6 #x0345)
     ))
 (define-char
   '((name              . "GREEK CAPITAL LETTER ALPHA WITH VRACHY")
     (ucs               . #x1FB8)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0391 #x0306)
     (mirrored          . nil)
+    (->decomposition   #x0391 #x0306)
     (->lowercase       #x1FB0)
     ))
 (define-char
@@ -1614,8 +1618,8 @@
     (ucs               . #x1FB9)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0391 #x0304)
     (mirrored          . nil)
+    (->decomposition   #x0391 #x0304)
     (->lowercase       #x1FB1)
     ))
 (define-char
@@ -1623,8 +1627,8 @@
     (ucs               . #x1FBA)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0391 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x0391 #x0300)
     (->lowercase       #x1F70)
     ))
 (define-char
@@ -1632,8 +1636,8 @@
     (ucs               . #x1FBB)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0386)
     (mirrored          . nil)
+    (->decomposition   #x0386)
     (->lowercase       #x1F71)
     ))
 (define-char
@@ -1641,8 +1645,8 @@
     (ucs               . #x1FBC)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0391 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x0391 #x0345)
     (->lowercase       #x1FB3)
     ))
 (define-char
@@ -1650,16 +1654,16 @@
     (ucs               . #x1FBD)
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
-    (->decomposition   compat #x0020 #x0313)
     (mirrored          . nil)
+    (->decomposition   compat #x0020 #x0313)
     ))
 (define-char
   '((name              . "GREEK PROSGEGRAMMENI")
     (ucs               . #x1FBE)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B9)
     (mirrored          . nil)
+    (->decomposition   #x03B9)
     (->uppercase       #x0399)
     (->titlecase       #x0399)
     ))
@@ -1668,74 +1672,74 @@
     (ucs               . #x1FBF)
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
-    (->decomposition   compat #x0020 #x0313)
     (mirrored          . nil)
+    (->decomposition   compat #x0020 #x0313)
     ))
 (define-char
   '((name              . "GREEK PERISPOMENI")
     (ucs               . #x1FC0)
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
-    (->decomposition   compat #x0020 #x0342)
     (mirrored          . nil)
+    (->decomposition   compat #x0020 #x0342)
     ))
 (define-char
   '((name              . "GREEK DIALYTIKA AND PERISPOMENI")
     (ucs               . #x1FC1)
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
-    (->decomposition   #x00A8 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x00A8 #x0342)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH VARIA AND YPOGEGRAMMENI")
-    (ucs  . #x1FC2)
+    (ucs               . #x1FC2)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F74 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F74 #x0345)
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER ETA WITH YPOGEGRAMMENI")
     (ucs               . #x1FC3)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B7 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x03B7 #x0345)
     (->uppercase       #x1FCC)
     (->titlecase       #x1FCC)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH OXIA AND YPOGEGRAMMENI")
-    (ucs  . #x1FC4)
+    (ucs               . #x1FC4)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03AE #x0345)
     (mirrored          . nil)
+    (->decomposition   #x03AE #x0345)
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER ETA WITH PERISPOMENI")
     (ucs               . #x1FC6)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B7 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x03B7 #x0342)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER ETA WITH PERISPOMENI AND YPOGEGRAMMENI")
-    (ucs  . #x1FC7)
+    (ucs               . #x1FC7)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1FC6 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1FC6 #x0345)
     ))
 (define-char
   '((name              . "GREEK CAPITAL LETTER EPSILON WITH VARIA")
     (ucs               . #x1FC8)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0395 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x0395 #x0300)
     (->lowercase       #x1F72)
     ))
 (define-char
@@ -1743,8 +1747,8 @@
     (ucs               . #x1FC9)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0388)
     (mirrored          . nil)
+    (->decomposition   #x0388)
     (->lowercase       #x1F73)
     ))
 (define-char
@@ -1752,8 +1756,8 @@
     (ucs               . #x1FCA)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0397 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x0397 #x0300)
     (->lowercase       #x1F74)
     ))
 (define-char
@@ -1761,8 +1765,8 @@
     (ucs               . #x1FCB)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0389)
     (mirrored          . nil)
+    (->decomposition   #x0389)
     (->lowercase       #x1F75)
     ))
 (define-char
@@ -1770,8 +1774,8 @@
     (ucs               . #x1FCC)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0397 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x0397 #x0345)
     (->lowercase       #x1FC3)
     ))
 (define-char
@@ -1779,32 +1783,32 @@
     (ucs               . #x1FCD)
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
-    (->decomposition   #x1FBF #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1FBF #x0300)
     ))
 (define-char
   '((name              . "GREEK PSILI AND OXIA")
     (ucs               . #x1FCE)
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
-    (->decomposition   #x1FBF #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1FBF #x0301)
     ))
 (define-char
   '((name              . "GREEK PSILI AND PERISPOMENI")
     (ucs               . #x1FCF)
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
-    (->decomposition   #x1FBF #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1FBF #x0342)
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER IOTA WITH VRACHY")
     (ucs               . #x1FD0)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B9 #x0306)
     (mirrored          . nil)
+    (->decomposition   #x03B9 #x0306)
     (->uppercase       #x1FD8)
     (->titlecase       #x1FD8)
     ))
@@ -1813,50 +1817,50 @@
     (ucs               . #x1FD1)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B9 #x0304)
     (mirrored          . nil)
+    (->decomposition   #x03B9 #x0304)
     (->uppercase       #x1FD9)
     (->titlecase       #x1FD9)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER IOTA WITH DIALYTIKA AND VARIA")
-    (ucs  . #x1FD2)
+    (ucs               . #x1FD2)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03CA #x0300)
     (mirrored          . nil)
+    (->decomposition   #x03CA #x0300)
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER IOTA WITH DIALYTIKA AND OXIA")
     (ucs               . #x1FD3)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0390)
     (mirrored          . nil)
+    (->decomposition   #x0390)
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER IOTA WITH PERISPOMENI")
     (ucs               . #x1FD6)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B9 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x03B9 #x0342)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER IOTA WITH DIALYTIKA AND PERISPOMENI")
-    (ucs  . #x1FD7)
+    (ucs               . #x1FD7)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03CA #x0342)
     (mirrored          . nil)
+    (->decomposition   #x03CA #x0342)
     ))
 (define-char
   '((name              . "GREEK CAPITAL LETTER IOTA WITH VRACHY")
     (ucs               . #x1FD8)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0399 #x0306)
     (mirrored          . nil)
+    (->decomposition   #x0399 #x0306)
     (->lowercase       #x1FD0)
     ))
 (define-char
@@ -1864,8 +1868,8 @@
     (ucs               . #x1FD9)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0399 #x0304)
     (mirrored          . nil)
+    (->decomposition   #x0399 #x0304)
     (->lowercase       #x1FD1)
     ))
 (define-char
@@ -1873,8 +1877,8 @@
     (ucs               . #x1FDA)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x0399 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x0399 #x0300)
     (->lowercase       #x1F76)
     ))
 (define-char
@@ -1882,8 +1886,8 @@
     (ucs               . #x1FDB)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x038A)
     (mirrored          . nil)
+    (->decomposition   #x038A)
     (->lowercase       #x1F77)
     ))
 (define-char
@@ -1891,32 +1895,32 @@
     (ucs               . #x1FDD)
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
-    (->decomposition   #x1FFE #x0300)
     (mirrored          . nil)
+    (->decomposition   #x1FFE #x0300)
     ))
 (define-char
   '((name              . "GREEK DASIA AND OXIA")
     (ucs               . #x1FDE)
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
-    (->decomposition   #x1FFE #x0301)
     (mirrored          . nil)
+    (->decomposition   #x1FFE #x0301)
     ))
 (define-char
   '((name              . "GREEK DASIA AND PERISPOMENI")
     (ucs               . #x1FDF)
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
-    (->decomposition   #x1FFE #x0342)
     (mirrored          . nil)
+    (->decomposition   #x1FFE #x0342)
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER UPSILON WITH VRACHY")
     (ucs               . #x1FE0)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03C5 #x0306)
     (mirrored          . nil)
+    (->decomposition   #x03C5 #x0306)
     (->uppercase       #x1FE8)
     (->titlecase       #x1FE8)
     ))
@@ -1925,42 +1929,42 @@
     (ucs               . #x1FE1)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03C5 #x0304)
     (mirrored          . nil)
+    (->decomposition   #x03C5 #x0304)
     (->uppercase       #x1FE9)
     (->titlecase       #x1FE9)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND VARIA")
-    (ucs  . #x1FE2)
+    (ucs               . #x1FE2)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03CB #x0300)
     (mirrored          . nil)
+    (->decomposition   #x03CB #x0300)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND OXIA")
-    (ucs  . #x1FE3)
+    (ucs               . #x1FE3)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03B0)
     (mirrored          . nil)
+    (->decomposition   #x03B0)
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER RHO WITH PSILI")
     (ucs               . #x1FE4)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03C1 #x0313)
     (mirrored          . nil)
+    (->decomposition   #x03C1 #x0313)
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER RHO WITH DASIA")
     (ucs               . #x1FE5)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03C1 #x0314)
     (mirrored          . nil)
+    (->decomposition   #x03C1 #x0314)
     (->uppercase       #x1FEC)
     (->titlecase       #x1FEC)
     ))
@@ -1969,24 +1973,24 @@
     (ucs               . #x1FE6)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03C5 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x03C5 #x0342)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND PERISPOMENI")
-    (ucs  . #x1FE7)
+    (ucs               . #x1FE7)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03CB #x0342)
     (mirrored          . nil)
+    (->decomposition   #x03CB #x0342)
     ))
 (define-char
   '((name              . "GREEK CAPITAL LETTER UPSILON WITH VRACHY")
     (ucs               . #x1FE8)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03A5 #x0306)
     (mirrored          . nil)
+    (->decomposition   #x03A5 #x0306)
     (->lowercase       #x1FE0)
     ))
 (define-char
@@ -1994,8 +1998,8 @@
     (ucs               . #x1FE9)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03A5 #x0304)
     (mirrored          . nil)
+    (->decomposition   #x03A5 #x0304)
     (->lowercase       #x1FE1)
     ))
 (define-char
@@ -2003,8 +2007,8 @@
     (ucs               . #x1FEA)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03A5 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x03A5 #x0300)
     (->lowercase       #x1F7A)
     ))
 (define-char
@@ -2012,8 +2016,8 @@
     (ucs               . #x1FEB)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x038E)
     (mirrored          . nil)
+    (->decomposition   #x038E)
     (->lowercase       #x1F7B)
     ))
 (define-char
@@ -2021,8 +2025,8 @@
     (ucs               . #x1FEC)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03A1 #x0314)
     (mirrored          . nil)
+    (->decomposition   #x03A1 #x0314)
     (->lowercase       #x1FE5)
     ))
 (define-char
@@ -2030,74 +2034,74 @@
     (ucs               . #x1FED)
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
-    (->decomposition   #x00A8 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x00A8 #x0300)
     ))
 (define-char
   '((name              . "GREEK DIALYTIKA AND OXIA")
     (ucs               . #x1FEE)
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
-    (->decomposition   #x0385)
     (mirrored          . nil)
+    (->decomposition   #x0385)
     ))
 (define-char
   '((name              . "GREEK VARIA")
     (ucs               . #x1FEF)
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
-    (->decomposition   #x0060)
     (mirrored          . nil)
+    (->decomposition   #x0060)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH VARIA AND YPOGEGRAMMENI")
-    (ucs  . #x1FF2)
+    (ucs               . #x1FF2)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1F7C #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1F7C #x0345)
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER OMEGA WITH YPOGEGRAMMENI")
     (ucs               . #x1FF3)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03C9 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x03C9 #x0345)
     (->uppercase       #x1FFC)
     (->titlecase       #x1FFC)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH OXIA AND YPOGEGRAMMENI")
-    (ucs  . #x1FF4)
+    (ucs               . #x1FF4)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03CE #x0345)
     (mirrored          . nil)
+    (->decomposition   #x03CE #x0345)
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER OMEGA WITH PERISPOMENI")
     (ucs               . #x1FF6)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03C9 #x0342)
     (mirrored          . nil)
+    (->decomposition   #x03C9 #x0342)
     ))
 (define-char
   '((name . "GREEK SMALL LETTER OMEGA WITH PERISPOMENI AND YPOGEGRAMMENI")
-    (ucs  . #x1FF7)
+    (ucs               . #x1FF7)
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x1FF6 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x1FF6 #x0345)
     ))
 (define-char
   '((name              . "GREEK CAPITAL LETTER OMICRON WITH VARIA")
     (ucs               . #x1FF8)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x039F #x0300)
     (mirrored          . nil)
+    (->decomposition   #x039F #x0300)
     (->lowercase       #x1F78)
     ))
 (define-char
@@ -2105,8 +2109,8 @@
     (ucs               . #x1FF9)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x038C)
     (mirrored          . nil)
+    (->decomposition   #x038C)
     (->lowercase       #x1F79)
     ))
 (define-char
@@ -2114,8 +2118,8 @@
     (ucs               . #x1FFA)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03A9 #x0300)
     (mirrored          . nil)
+    (->decomposition   #x03A9 #x0300)
     (->lowercase       #x1F7C)
     ))
 (define-char
@@ -2123,8 +2127,8 @@
     (ucs               . #x1FFB)
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x038F)
     (mirrored          . nil)
+    (->decomposition   #x038F)
     (->lowercase       #x1F7D)
     ))
 (define-char
@@ -2132,8 +2136,8 @@
     (ucs               . #x1FFC)
     (general-category  letter titlecase) ; Normative Category
     (bidi-category     . "L")
-    (->decomposition   #x03A9 #x0345)
     (mirrored          . nil)
+    (->decomposition   #x03A9 #x0345)
     (->lowercase       #x1FF3)
     ))
 (define-char
@@ -2141,14 +2145,14 @@
     (ucs               . #x1FFD)
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
-    (->decomposition   #x00B4)
     (mirrored          . nil)
+    (->decomposition   #x00B4)
     ))
 (define-char
   '((name              . "GREEK DASIA")
     (ucs               . #x1FFE)
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
-    (->decomposition   compat #x0020 #x0314)
     (mirrored          . nil)
+    (->decomposition   compat #x0020 #x0314)
     ))