Reformatted.
authortomo <tomo>
Tue, 5 Feb 2002 11:55:08 +0000 (11:55 +0000)
committertomo <tomo>
Tue, 5 Feb 2002 11:55:08 +0000 (11:55 +0000)
lisp/utf-2000/u00250-IPA-Extensions.el
lisp/utf-2000/u002B0-Spacing-Modifier-Letters.el
lisp/utf-2000/u00370-Greek.el

index 1c06e19..a2387cf 100644 (file)
     (ucs                       . #x02A1)       ; ʡ
     ))
 (define-char
-  '((name              . "LATIN LETTER REVERSED GLOTTAL STOP WITH STROKE")
+  '((name . "LATIN LETTER REVERSED GLOTTAL STOP WITH STROKE")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
index 87a7b0c..d6c75b8 100644 (file)
     (bidi-category     . "ON")
     (mirrored          . nil)
     (->fullwidth
-     ((name              . "fullwidth modifier letter low vertical line")
+     ((name . "fullwidth modifier letter low vertical line")
       (japanese-jisx0213-1       . #x2B54)     ; 
       ))
     (ipa               . #xF1) ; 
     (bidi-category     . "L")
     (mirrored          . nil)
     (->fullwidth
-     ((name              . "fullwidth modifier letter half triangular colon")
+     ((name . "fullwidth modifier letter half triangular colon")
       (japanese-jisx0213-1       . #x2B56)     ; 
       ))
     (ucs               . #x02D1)       ; ˑ
     ))
 (define-char
-  '((name              . "fullwidth modifier letter half triangular colon")
+  '((name . "fullwidth modifier letter half triangular colon")
     (=>ucs             . #x02D1)       ; ˑ
     (general-category  letter modifier) ; Informative Category
     (bidi-category     . "L")
     (bidi-category     . "ON")
     (mirrored          . nil)
     (->fullwidth
-     ((name              . "fullwidth modifier letter extra-high tone bar")
+     ((name . "fullwidth modifier letter extra-high tone bar")
       (japanese-jisx0213-1       . #x2B60)     ; 
       ))
     (ucs               . #x02E5)       ; ˥
     ))
 (define-char
-  '((name              . "fullwidth modifier letter extra-high tone bar")
+  '((name . "fullwidth modifier letter extra-high tone bar")
     (=>ucs             . #x02E5)       ; ˥
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
     (bidi-category     . "ON")
     (mirrored          . nil)
     (->fullwidth
-     ((name              . "fullwidth modifier letter extra-low tone bar")
+     ((name . "fullwidth modifier letter extra-low tone bar")
       (japanese-jisx0213-1       . #x2B64)     ; 
       ))
     (ucs               . #x02E9)       ; ˩
index 51709ed..e08c50d 100644 (file)
@@ -91,7 +91,7 @@
     (mirrored          . nil)
     (->decomposition   #x0391 #x0301)
     (->fullwidth
-     ((name              . "fullwidth greek capital letter alpha with tonos")
+     ((name . "fullwidth greek capital letter alpha with tonos")
       (japanese-jisx0212  . #x2661)    ; 
       ))
     (->lowercase
     (ucs               . #x0386)       ; Ά
     ))
 (define-char
-  '((name              . "fullwidth greek capital letter alpha with tonos")
+  '((name . "fullwidth greek capital letter alpha with tonos")
     (=>ucs             . #x0386)       ; Ά
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0386)
     (->lowercase
-     ((name . "fullwidth greek small letter alpha with tonos")))
+     ((name . "fullwidth greek small letter alpha with tonos")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER ALPHA WITH TONOS")
       (ucs               . #x0386)     ; Ά
     (mirrored          . nil)
     (->decomposition   wide #x0388)
     (->lowercase
-     ((name . "fullwidth greek small letter epsilon with tonos")))
+     ((name . "fullwidth greek small letter epsilon with tonos")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER EPSILON WITH TONOS")
       (ucs               . #x0388)     ; Έ
     (mirrored          . nil)
     (->decomposition   #x0397 #x0301)
     (->fullwidth
-     ((name              . "fullwidth greek capital letter eta with tonos")
+     ((name . "fullwidth greek capital letter eta with tonos")
       (japanese-jisx0212  . #x2663)    ; 
       ))
     (->lowercase
     (ucs               . #x0389)       ; Ή
     ))
 (define-char
-  '((name              . "fullwidth greek capital letter eta with tonos")
+  '((name . "fullwidth greek capital letter eta with tonos")
     (=>ucs             . #x0389)       ; Ή
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0389)
     (->lowercase
-     ((name . "fullwidth greek small letter eta with tonos")))
+     ((name . "fullwidth greek small letter eta with tonos")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER ETA WITH TONOS")
       (ucs               . #x0389)     ; Ή
     (mirrored          . nil)
     (->decomposition   #x0399 #x0301)
     (->fullwidth
-     ((name              . "fullwidth greek capital letter iota with tonos")
+     ((name . "fullwidth greek capital letter iota with tonos")
       (japanese-jisx0212  . #x2664)    ; 
       ))
     (->lowercase
     (ucs               . #x038A)       ; Ί
     ))
 (define-char
-  '((name              . "fullwidth greek capital letter iota with tonos")
+  '((name . "fullwidth greek capital letter iota with tonos")
     (=>ucs             . #x038A)       ; Ί
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x038A)
     (->lowercase
-     ((name . "fullwidth greek small letter iota with tonos")))
+     ((name . "fullwidth greek small letter iota with tonos")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER IOTA WITH TONOS")
       (ucs               . #x038A)     ; Ί
     (mirrored          . nil)
     (->decomposition   wide #x038C)
     (->lowercase
-     ((name . "fullwidth greek small letter omicron with tonos")))
+     ((name . "fullwidth greek small letter omicron with tonos")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER OMICRON WITH TONOS")
       (ucs               . #x038C)     ; Ό
     (mirrored          . nil)
     (->decomposition   wide #x038E)
     (->lowercase
-     ((name . "fullwidth greek small letter upsilon with tonos")))
+     ((name . "fullwidth greek small letter upsilon with tonos")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER UPSILON WITH TONOS")
       (ucs               . #x038E)     ; Ύ
     (mirrored          . nil)
     (->decomposition   #x03A9 #x0301)
     (->fullwidth
-     ((name              . "fullwidth greek capital letter omega with tonos")
+     ((name . "fullwidth greek capital letter omega with tonos")
       (japanese-jisx0212  . #x266C)    ; 
       ))
     (->lowercase
     (ucs               . #x038F)       ; Ώ
     ))
 (define-char
-  '((name              . "fullwidth greek capital letter omega with tonos")
+  '((name . "fullwidth greek capital letter omega with tonos")
     (=>ucs             . #x038F)       ; Ώ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x038F)
     (->lowercase
-     ((name . "fullwidth greek small letter omega with tonos")))
+     ((name . "fullwidth greek small letter omega with tonos")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER OMEGA WITH TONOS")
       (ucs               . #x038F)     ; Ώ
     (mirrored          . nil)
     (->decomposition   wide #x0391)
     (->lowercase
-     ((name . "fullwidth greek small letter alpha")))
+     ((name              . "fullwidth greek small letter alpha")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER ALPHA")
       (ucs               . #x0391)     ; Α
     (mirrored          . nil)
     (->decomposition   wide #x0392)
     (->lowercase
-     ((name . "fullwidth greek small letter beta")))
+     ((name              . "fullwidth greek small letter beta")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER BETA")
       (ucs               . #x0392)     ; Β
     (mirrored          . nil)
     (->decomposition   wide #x0393)
     (->lowercase
-     ((name . "fullwidth greek small letter gamma")))
+     ((name              . "fullwidth greek small letter gamma")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER GAMMA")
       (ucs               . #x0393)     ; Γ
     (mirrored          . nil)
     (->decomposition   wide #x0394)
     (->lowercase
-     ((name . "fullwidth greek small letter delta")))
+     ((name              . "fullwidth greek small letter delta")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER DELTA")
       (ucs               . #x0394)     ; Δ
     (mirrored          . nil)
     (->decomposition   wide #x0395)
     (->lowercase
-     ((name . "fullwidth greek small letter epsilon")))
+     ((name              . "fullwidth greek small letter epsilon")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER EPSILON")
       (ucs               . #x0395)     ; Ε
     (mirrored          . nil)
     (->decomposition   wide #x0396)
     (->lowercase
-     ((name . "fullwidth greek small letter zeta")))
+     ((name              . "fullwidth greek small letter zeta")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER ZETA")
       (ucs               . #x0396)     ; Ζ
     (mirrored          . nil)
     (->decomposition   wide #x0397)
     (->lowercase
-     ((name . "fullwidth greek small letter eta")))
+     ((name              . "fullwidth greek small letter eta")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER ETA")
       (ucs               . #x0397)     ; Η
     (mirrored          . nil)
     (->decomposition   wide #x0398)
     (->lowercase
-     ((name . "fullwidth greek small letter theta")))
+     ((name              . "fullwidth greek small letter theta")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER THETA")
       (ucs               . #x0398)     ; Θ
     (mirrored          . nil)
     (->decomposition   wide #x0399)
     (->lowercase
-     ((name . "fullwidth greek small letter iota")))
+     ((name              . "fullwidth greek small letter iota")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER IOTA")
       (ucs               . #x0399)     ; Ι
     (mirrored          . nil)
     (->decomposition   wide #x039A)
     (->lowercase
-     ((name . "fullwidth greek small letter kappa")))
+     ((name              . "fullwidth greek small letter kappa")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER KAPPA")
       (ucs               . #x039A)     ; Κ
     (mirrored          . nil)
     (->decomposition   wide #x039B)
     (->lowercase
-     ((name . "fullwidth greek small letter lamda")))
+     ((name              . "fullwidth greek small letter lamda")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER LAMDA")
       (ucs               . #x039B)     ; Λ
     (mirrored          . nil)
     (->decomposition   wide #x039C)
     (->lowercase
-     ((name . "fullwidth greek small letter mu")))
+     ((name              . "fullwidth greek small letter mu")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER MU")
       (ucs               . #x039C)     ; Μ
     (mirrored          . nil)
     (->decomposition   wide #x039D)
     (->lowercase
-     ((name . "fullwidth greek small letter nu")))
+     ((name              . "fullwidth greek small letter nu")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER NU")
       (ucs               . #x039D)     ; Ν
     (mirrored          . nil)
     (->decomposition   wide #x039E)
     (->lowercase
-     ((name . "fullwidth greek small letter xi")))
+     ((name              . "fullwidth greek small letter xi")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER XI")
       (ucs               . #x039E)     ; Ξ
     (mirrored          . nil)
     (->decomposition   wide #x039F)
     (->lowercase
-     ((name . "fullwidth greek small letter omicron")))
+     ((name              . "fullwidth greek small letter omicron")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER OMICRON")
       (ucs               . #x039F)     ; Ο
     (mirrored          . nil)
     (->decomposition   wide #x03A0)
     (->lowercase
-     ((name . "fullwidth greek small letter pi")))
+     ((name              . "fullwidth greek small letter pi")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER PI")
       (ucs               . #x03A0)     ; Π
     (mirrored          . nil)
     (->decomposition   wide #x03A1)
     (->lowercase
-     ((name . "fullwidth greek small letter rho")))
+     ((name              . "fullwidth greek small letter rho")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER RHO")
       (ucs               . #x03A1)     ; Ρ
     (mirrored          . nil)
     (->decomposition   wide #x03A3)
     (->lowercase
-     ((name . "fullwidth greek small letter sigma")))
+     ((name              . "fullwidth greek small letter sigma")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER SIGMA")
       (ucs               . #x03A3)     ; Σ
     (mirrored          . nil)
     (->decomposition   wide #x03A4)
     (->lowercase
-     ((name . "fullwidth greek small letter tau")))
+     ((name              . "fullwidth greek small letter tau")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER TAU")
       (ucs               . #x03A4)     ; Τ
     (mirrored          . nil)
     (->decomposition   wide #x03A5)
     (->lowercase
-     ((name . "fullwidth greek small letter upsilon")))
+     ((name              . "fullwidth greek small letter upsilon")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER UPSILON")
       (ucs               . #x03A5)     ; Υ
     (mirrored          . nil)
     (->decomposition   wide #x03A6)
     (->lowercase
-     ((name . "fullwidth greek small letter phi")))
+     ((name              . "fullwidth greek small letter phi")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER PHI")
       (ucs               . #x03A6)     ; Φ
     (mirrored          . nil)
     (->decomposition   wide #x03A7)
     (->lowercase
-     ((name . "fullwidth greek small letter chi")))
+     ((name              . "fullwidth greek small letter chi")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER CHI")
       (ucs               . #x03A7)     ; Χ
     (mirrored          . nil)
     (->decomposition   wide #x03A8)
     (->lowercase
-     ((name . "fullwidth greek small letter psi")))
+     ((name              . "fullwidth greek small letter psi")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER PSI")
       (ucs               . #x03A8)     ; Ψ
     (mirrored          . nil)
     (->decomposition   wide #x03A9)
     (->lowercase
-     ((name . "fullwidth greek small letter omega")))
+     ((name              . "fullwidth greek small letter omega")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER OMEGA")
       (ucs               . #x03A9)     ; Ω
     (mirrored          . nil)
     (->decomposition   wide #x03AA)
     (->lowercase
-     ((name . "fullwidth greek small letter iota with dialytika")))
+     ((name . "fullwidth greek small letter iota with dialytika")
+      ))
     (<-fullwidth
      ((name              . "GREEK CAPITAL LETTER IOTA WITH DIALYTIKA")
       (ucs               . #x03AA)     ; Ϊ
     (mirrored          . nil)
     (->decomposition   wide #x03AB)
     (->lowercase
-     ((name . "fullwidth greek small letter upsilon with dialytika")))
+     ((name . "fullwidth greek small letter upsilon with dialytika")
+      ))
     (<-fullwidth
-     ((name              . "GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA")
+     ((name . "GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA")
       (ucs               . #x03AB)     ; Ϋ
       ))
     (japanese-jisx0212 . #x266A)       ; 
     (mirrored          . nil)
     (->decomposition   #x03B1 #x0301)
     (->fullwidth
-     ((name              . "fullwidth greek small letter alpha with tonos")
+     ((name . "fullwidth greek small letter alpha with tonos")
       (japanese-jisx0212  . #x2671)    ; 
       ))
     (->uppercase
     (ucs               . #x03AC)       ; ά
     ))
 (define-char
-  '((name              . "fullwidth greek small letter alpha with tonos")
+  '((name . "fullwidth greek small letter alpha with tonos")
     (=>ucs             . #x03AC)       ; ά
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x03AC)
     (->uppercase
-     ((name . "fullwidth greek capital letter alpha with tonos")))
+     ((name . "fullwidth greek capital letter alpha with tonos")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER ALPHA WITH TONOS")
       (ucs               . #x03AC)     ; ά
     (mirrored          . nil)
     (->decomposition   #x03B5 #x0301)
     (->fullwidth
-     ((name              . "fullwidth greek small letter epsilon with tonos")
+     ((name . "fullwidth greek small letter epsilon with tonos")
       (japanese-jisx0212  . #x2672)    ; 
       ))
     (->uppercase
     (ucs               . #x03AD)       ; έ
     ))
 (define-char
-  '((name              . "fullwidth greek small letter epsilon with tonos")
+  '((name . "fullwidth greek small letter epsilon with tonos")
     (=>ucs             . #x03AD)       ; έ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x03AD)
     (->uppercase
-     ((name . "fullwidth greek capital letter epsilon with tonos")))
+     ((name . "fullwidth greek capital letter epsilon with tonos")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER EPSILON WITH TONOS")
       (ucs               . #x03AD)     ; έ
     (mirrored          . nil)
     (->decomposition   #x03B7 #x0301)
     (->fullwidth
-     ((name              . "fullwidth greek small letter eta with tonos")
+     ((name . "fullwidth greek small letter eta with tonos")
       (japanese-jisx0212  . #x2673)    ; 
       ))
     (->uppercase
     (mirrored          . nil)
     (->decomposition   wide #x03AE)
     (->uppercase
-     ((name . "fullwidth greek capital letter eta with tonos")))
+     ((name . "fullwidth greek capital letter eta with tonos")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER ETA WITH TONOS")
       (ucs               . #x03AE)     ; ή
     (mirrored          . nil)
     (->decomposition   #x03B9 #x0301)
     (->fullwidth
-     ((name              . "fullwidth greek small letter iota with tonos")
+     ((name . "fullwidth greek small letter iota with tonos")
       (japanese-jisx0212  . #x2674)    ; 
       ))
     (->uppercase
     (mirrored          . nil)
     (->decomposition   wide #x03AF)
     (->uppercase
-     ((name . "fullwidth greek capital letter iota with tonos")))
+     ((name . "fullwidth greek capital letter iota with tonos")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER IOTA WITH TONOS")
       (ucs               . #x03AF)     ; ί
     (mirrored          . nil)
     (->decomposition   wide #x03B1)
     (->uppercase
-     ((name . "fullwidth greek capital letter alpha")))
+     ((name              . "fullwidth greek capital letter alpha")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER ALPHA")
       (ucs               . #x03B1)     ; α
     (mirrored          . nil)
     (->decomposition   wide #x03B2)
     (->uppercase
-     ((name . "fullwidth greek capital letter beta")))
+     ((name              . "fullwidth greek capital letter beta")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER BETA")
       (ucs               . #x03B2)     ; β
     (mirrored          . nil)
     (->decomposition   wide #x03B3)
     (->uppercase
-     ((name . "fullwidth greek capital letter gamma")))
+     ((name              . "fullwidth greek capital letter gamma")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER GAMMA")
       (ucs               . #x03B3)     ; γ
     (mirrored          . nil)
     (->decomposition   wide #x03B4)
     (->uppercase
-     ((name . "fullwidth greek capital letter delta")))
+     ((name              . "fullwidth greek capital letter delta")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER DELTA")
       (ucs               . #x03B4)     ; δ
     (mirrored          . nil)
     (->decomposition   wide #x03B5)
     (->uppercase
-     ((name . "fullwidth greek capital letter epsilon")))
+     ((name              . "fullwidth greek capital letter epsilon")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER EPSILON")
       (ucs               . #x03B5)     ; ε
     (mirrored          . nil)
     (->decomposition   wide #x03B6)
     (->uppercase
-     ((name . "fullwidth greek capital letter zeta")))
+     ((name              . "fullwidth greek capital letter zeta")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER ZETA")
       (ucs               . #x03B6)     ; ζ
     (mirrored          . nil)
     (->decomposition   wide #x03B7)
     (->uppercase
-     ((name . "fullwidth greek capital letter eta")))
+     ((name              . "fullwidth greek capital letter eta")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER ETA")
       (ucs               . #x03B7)     ; η
     (mirrored          . nil)
     (->decomposition   wide #x03B8)
     (->uppercase
-     ((name . "fullwidth greek capital letter theta")))
+     ((name              . "fullwidth greek capital letter theta")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER THETA")
       (ucs               . #x03B8)     ; θ
     (mirrored          . nil)
     (->decomposition   wide #x03B9)
     (->uppercase
-     ((name . "fullwidth greek capital letter iota")))
+     ((name              . "fullwidth greek capital letter iota")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER IOTA")
       (ucs               . #x03B9)     ; ι
     (mirrored          . nil)
     (->decomposition   wide #x03BB)
     (->uppercase
-     ((name . "fullwidth greek capital letter lamda")))
+     ((name              . "fullwidth greek capital letter lamda")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER LAMDA")
       (ucs               . #x03BB)     ; λ
     (mirrored          . nil)
     (->decomposition   wide #x03BC)
     (->uppercase
-     ((name . "fullwidth greek capital letter mu")))
+     ((name              . "fullwidth greek capital letter mu")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER MU")
       (ucs               . #x03BC)     ; μ
     (mirrored          . nil)
     (->decomposition   wide #x03BD)
     (->uppercase
-     ((name . "fullwidth greek capital letter nu")))
+     ((name              . "fullwidth greek capital letter nu")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER NU")
       (ucs               . #x03BD)     ; ν
     (mirrored          . nil)
     (->decomposition   wide #x03BE)
     (->uppercase
-     ((name . "fullwidth greek capital letter xi")))
+     ((name              . "fullwidth greek capital letter xi")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER XI")
       (ucs               . #x03BE)     ; ξ
     (mirrored          . nil)
     (->decomposition   wide #x03BF)
     (->uppercase
-     ((name . "fullwidth greek capital letter omicron")))
+     ((name              . "fullwidth greek capital letter omicron")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER OMICRON")
       (ucs               . #x03BF)     ; ο
     (mirrored          . nil)
     (->decomposition   wide #x03C0)
     (->uppercase
-     ((name . "fullwidth greek capital letter pi")))
+     ((name              . "fullwidth greek capital letter pi")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER PI")
       (ucs               . #x03C0)     ; π
     (mirrored          . nil)
     (->decomposition   wide #x03C1)
     (->uppercase
-     ((name . "fullwidth greek capital letter rho")))
+     ((name              . "fullwidth greek capital letter rho")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER RHO")
       (ucs               . #x03C1)     ; ρ
     (mirrored          . nil)
     (->decomposition   wide #x03C2)
     (->uppercase
-     ((name . "fullwidth greek capital letter final sigma")))
+     ((name              . "fullwidth greek capital letter final sigma")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER FINAL SIGMA")
       (ucs               . #x03C2)     ; ς
     (mirrored          . nil)
     (->decomposition   wide #x03C3)
     (->uppercase
-     ((name . "fullwidth greek capital letter sigma")))
+     ((name              . "fullwidth greek capital letter sigma")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER SIGMA")
       (ucs               . #x03C3)     ; σ
     (mirrored          . nil)
     (->decomposition   wide #x03C4)
     (->uppercase
-     ((name . "fullwidth greek capital letter tau")))
+     ((name              . "fullwidth greek capital letter tau")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER TAU")
       (ucs               . #x03C4)     ; τ
     (mirrored          . nil)
     (->decomposition   wide #x03C5)
     (->uppercase
-     ((name . "fullwidth greek capital letter upsilon")))
+     ((name              . "fullwidth greek capital letter upsilon")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER UPSILON")
       (ucs               . #x03C5)     ; υ
     (mirrored          . nil)
     (->decomposition   wide #x03C6)
     (->uppercase
-     ((name . "fullwidth greek capital letter phi")))
+     ((name              . "fullwidth greek capital letter phi")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER PHI")
       (ucs               . #x03C6)     ; φ
     (mirrored          . nil)
     (->decomposition   wide #x03C7)
     (->uppercase
-     ((name . "fullwidth greek capital letter chi")))
+     ((name              . "fullwidth greek capital letter chi")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER CHI")
       (ucs               . #x03C7)     ; χ
     (mirrored          . nil)
     (->decomposition   wide #x03C8)
     (->uppercase
-     ((name . "fullwidth greek capital letter psi")))
+     ((name              . "fullwidth greek capital letter psi")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER PSI")
       (ucs               . #x03C8)     ; ψ
     (mirrored          . nil)
     (->decomposition   wide #x03C9)
     (->uppercase
-     ((name . "fullwidth greek capital letter omega")))
+     ((name              . "fullwidth greek capital letter omega")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER OMEGA")
       (ucs               . #x03C9)     ; ω
     (mirrored          . nil)
     (->decomposition   wide #x03CA)
     (->uppercase
-     ((name . "fullwidth greek capital letter iota with dialytika")))
+     ((name . "fullwidth greek capital letter iota with dialytika")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER IOTA WITH DIALYTIKA")
       (ucs               . #x03CA)     ; ϊ
       (japanese-jisx0212  . #x267A)    ; 
       ))
     (->uppercase
-     ((name              . "GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA")
+     ((name . "GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA")
       (ucs               . #x03AB)     ; Ϋ
       ))
     (greek-iso8859-7   . #xFB) ; 
     (mirrored          . nil)
     (->decomposition   wide #x03CB)
     (->uppercase
-     ((name . "fullwidth greek capital letter upsilon with dialytika")))
+     ((name . "fullwidth greek capital letter upsilon with dialytika")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA")
       (ucs               . #x03CB)     ; ϋ
     (mirrored          . nil)
     (->decomposition   #x03BF #x0301)
     (->fullwidth
-     ((name              . "fullwidth greek small letter omicron with tonos")
+     ((name . "fullwidth greek small letter omicron with tonos")
       (japanese-jisx0212  . #x2677)    ; 
       ))
     (->uppercase
     (ucs               . #x03CC)       ; ό
     ))
 (define-char
-  '((name              . "fullwidth greek small letter omicron with tonos")
+  '((name . "fullwidth greek small letter omicron with tonos")
     (=>ucs             . #x03CC)       ; ό
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x03CC)
     (->uppercase
-     ((name . "fullwidth greek capital letter omicron with tonos")))
+     ((name . "fullwidth greek capital letter omicron with tonos")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER OMICRON WITH TONOS")
       (ucs               . #x03CC)     ; ό
     (mirrored          . nil)
     (->decomposition   #x03C5 #x0301)
     (->fullwidth
-     ((name              . "fullwidth greek small letter upsilon with tonos")
+     ((name . "fullwidth greek small letter upsilon with tonos")
       (japanese-jisx0212  . #x2679)    ; 
       ))
     (->uppercase
     (ucs               . #x03CD)       ; ύ
     ))
 (define-char
-  '((name              . "fullwidth greek small letter upsilon with tonos")
+  '((name . "fullwidth greek small letter upsilon with tonos")
     (=>ucs             . #x03CD)       ; ύ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x03CD)
     (->uppercase
-     ((name . "fullwidth greek capital letter upsilon with tonos")))
+     ((name . "fullwidth greek capital letter upsilon with tonos")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER UPSILON WITH TONOS")
       (ucs               . #x03CD)     ; ύ
     (mirrored          . nil)
     (->decomposition   #x03C9 #x0301)
     (->fullwidth
-     ((name              . "fullwidth greek small letter omega with tonos")
+     ((name . "fullwidth greek small letter omega with tonos")
       (japanese-jisx0212  . #x267C)    ; 
       ))
     (->uppercase
     (ucs               . #x03CE)       ; ώ
     ))
 (define-char
-  '((name              . "fullwidth greek small letter omega with tonos")
+  '((name . "fullwidth greek small letter omega with tonos")
     (=>ucs             . #x03CE)       ; ώ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x03CE)
     (->uppercase
-     ((name . "fullwidth greek capital letter omega with tonos")))
+     ((name . "fullwidth greek capital letter omega with tonos")
+      ))
     (<-fullwidth
      ((name              . "GREEK SMALL LETTER OMEGA WITH TONOS")
       (ucs               . #x03CE)     ; ώ