git.chise.org Git - chise/xemacs-chise.git-/blob - lisp/utf-2000/u00370-Greek.el

   1 (define-char
   2   '((name               . "GREEK NUMERAL SIGN")
   3     (ucs                . #x0374)
   4     (general-category   symbol modifier) ; Informative Category
   5     (bidi-category      . "ON")
   6     (mirrored           . nil)
   7     (iso-10646-comment  . "Dexia keraia")
   8     (->decomposition    #x02B9)
   9     ))
  10 (define-char
  11   '((name               . "GREEK LOWER NUMERAL SIGN")
  12     (ucs                . #x0375)
  13     (general-category   symbol modifier) ; Informative Category
  14     (bidi-category      . "ON")
  15     (mirrored           . nil)
  16     (iso-10646-comment  . "Aristeri keraia")
  17     ))
  18 (define-char
  19   '((name               . "GREEK YPOGEGRAMMENI")
  20     (ucs                . #x037A)
  21     (general-category   letter modifier) ; Informative Category
  22     (bidi-category      . "L")
  23     (mirrored           . nil)
  24     (->decomposition    compat #x0020 #x0345)
  25     ))
  26 (define-char
  27   '((name               . "GREEK QUESTION MARK")
  28     (ucs                . #x037E)
  29     (general-category   punctuation other) ; Informative Category
  30     (bidi-category      . "ON")
  31     (mirrored           . nil)
  32     (iso-10646-comment  . "Erotimatiko")
  33     (->decomposition    #x003B)
  34     ))
  35 (define-char
  36   '((name               . "GREEK TONOS")
  37     (ucs                . #x0384)
  38     (general-category   symbol modifier) ; Informative Category
  39     (bidi-category      . "ON")
  40     (mirrored           . nil)
  41     (->decomposition    compat #x0020 #x0301)
  42     (greek-iso8859-7    #x34)   ; \e-F´\e-A
  43     ))
  44 (define-char
  45   '((name               . "FULLWIDTH GREEK TONOS")
  46     (->ucs              . #x0384)
  47     (general-category   symbol modifier) ; Informative Category
  48     (bidi-category      . "ON")
  49     (mirrored           . nil)
  50     (->decomposition    wide #x0384)
  51     (japanese-jisx0212  #x22 #x38)      ; \e$(D"8\e(B
  52     ))
  53 (define-char
  54   '((name               . "GREEK DIALYTIKA TONOS")
  55     (ucs                . #x0385)
  56     (general-category   symbol modifier) ; Informative Category
  57     (bidi-category      . "ON")
  58     (mirrored           . nil)
  59     (->decomposition    #x00A8 #x0301)
  60     (greek-iso8859-7    #x35)   ; \e-Fµ\e-A
  61     ))
  62 (define-char
  63   '((name               . "FULLWIDTH GREEK DIALYTIKA TONOS")
  64     (->ucs              . #x0385)
  65     (general-category   symbol modifier) ; Informative Category
  66     (bidi-category      . "ON")
  67     (mirrored           . nil)
  68     (->decomposition    wide #x0385)
  69     (japanese-jisx0212  #x22 #x39)      ; \e$(D"9\e(B
  70     ))
  71 (define-char
  72   '((name               . "GREEK CAPITAL LETTER ALPHA WITH TONOS")
  73     (ucs                . #x0386)
  74     (general-category   letter uppercase) ; Normative Category
  75     (bidi-category      . "L")
  76     (mirrored           . nil)
  77     (->decomposition    #x0391 #x0301)
  78     (->lowercase        #x03AC)
  79     (greek-iso8859-7    #x36)   ; \e-F¶\e-A
  80     ))
  81 (define-char
  82   '((name               . "FULLWIDTH GREEK CAPITAL LETTER ALPHA WITH TONOS")
  83     (->ucs              . #x0386)
  84     (general-category   letter uppercase) ; Normative Category
  85     (bidi-category      . "L")
  86     (mirrored           . nil)
  87     (->decomposition    wide #x0386)
  88     (->lowercase
  89      ((name . "FULLWIDTH GREEK SMALL LETTER ALPHA WITH TONOS")))
  90     (japanese-jisx0212  #x26 #x61)      ; \e$(D&a\e(B
  91     ))
  92 (define-char
  93   '((name               . "GREEK ANO TELEIA")
  94     (ucs                . #x0387)
  95     (general-category   punctuation other) ; Informative Category
  96     (bidi-category      . "ON")
  97     (mirrored           . nil)
  98     (->decomposition    #x00B7)
  99     ))
 100 (define-char
 101   '((name               . "GREEK CAPITAL LETTER EPSILON WITH TONOS")
 102     (ucs                . #x0388)
 103     (general-category   letter uppercase) ; Normative Category
 104     (bidi-category      . "L")
 105     (mirrored           . nil)
 106     (->decomposition    #x0395 #x0301)
 107     (->lowercase        #x03AD)
 108     (greek-iso8859-7    #x38)   ; \e-F¸\e-A
 109     ))
 110 (define-char
 111   '((name . "FULLWIDTH GREEK CAPITAL LETTER EPSILON WITH TONOS")
 112     (->ucs              . #x0388)
 113     (general-category   letter uppercase) ; Normative Category
 114     (bidi-category      . "L")
 115     (mirrored           . nil)
 116     (->decomposition    wide #x0388)
 117     (->lowercase
 118      ((name . "FULLWIDTH GREEK SMALL LETTER EPSILON WITH TONOS")))
 119     (japanese-jisx0212  #x26 #x62)      ; \e$(D&b\e(B
 120     ))
 121 (define-char
 122   '((name               . "GREEK CAPITAL LETTER ETA WITH TONOS")
 123     (ucs                . #x0389)
 124     (general-category   letter uppercase) ; Normative Category
 125     (bidi-category      . "L")
 126     (mirrored           . nil)
 127     (->decomposition    #x0397 #x0301)
 128     (->lowercase        #x03AE)
 129     (greek-iso8859-7    #x39)   ; \e-F¹\e-A
 130     ))
 131 (define-char
 132   '((name               . "FULLWIDTH GREEK CAPITAL LETTER ETA WITH TONOS")
 133     (->ucs              . #x0389)
 134     (general-category   letter uppercase) ; Normative Category
 135     (bidi-category      . "L")
 136     (mirrored           . nil)
 137     (->decomposition    wide #x0389)
 138     (->lowercase
 139      ((name . "FULLWIDTH GREEK SMALL LETTER ETA WITH TONOS")))
 140     (japanese-jisx0212  #x26 #x63)      ; \e$(D&c\e(B
 141     ))
 142 (define-char
 143   '((name               . "GREEK CAPITAL LETTER IOTA WITH TONOS")
 144     (ucs                . #x038A)
 145     (general-category   letter uppercase) ; Normative Category
 146     (bidi-category      . "L")
 147     (mirrored           . nil)
 148     (->decomposition    #x0399 #x0301)
 149     (->lowercase        #x03AF)
 150     (greek-iso8859-7    #x3A)   ; \e-Fº\e-A
 151     ))
 152 (define-char
 153   '((name               . "FULLWIDTH GREEK CAPITAL LETTER IOTA WITH TONOS")
 154     (->ucs              . #x038A)
 155     (general-category   letter uppercase) ; Normative Category
 156     (bidi-category      . "L")
 157     (mirrored           . nil)
 158     (->decomposition    wide #x038A)
 159     (->lowercase
 160      ((name . "FULLWIDTH GREEK SMALL LETTER IOTA WITH TONOS")))
 161     (japanese-jisx0212  #x26 #x64)      ; \e$(D&d\e(B
 162     ))
 163 (define-char
 164   '((name               . "GREEK CAPITAL LETTER OMICRON WITH TONOS")
 165     (ucs                . #x038C)
 166     (general-category   letter uppercase) ; Normative Category
 167     (bidi-category      . "L")
 168     (mirrored           . nil)
 169     (->decomposition    #x039F #x0301)
 170     (->lowercase        #x03CC)
 171     (greek-iso8859-7    #x3C)   ; \e-F¼\e-A
 172     ))
 173 (define-char
 174   '((name . "FULLWIDTH GREEK CAPITAL LETTER OMICRON WITH TONOS")
 175     (->ucs              . #x038C)
 176     (general-category   letter uppercase) ; Normative Category
 177     (bidi-category      . "L")
 178     (mirrored           . nil)
 179     (->decomposition    wide #x038C)
 180     (->lowercase
 181      ((name . "FULLWIDTH GREEK SMALL LETTER OMICRON WITH TONOS")))
 182     (japanese-jisx0212  #x26 #x67)      ; \e$(D&g\e(B
 183     ))
 184 (define-char
 185   '((name               . "GREEK CAPITAL LETTER UPSILON WITH TONOS")
 186     (ucs                . #x038E)
 187     (general-category   letter uppercase) ; Normative Category
 188     (bidi-category      . "L")
 189     (mirrored           . nil)
 190     (->decomposition    #x03A5 #x0301)
 191     (->lowercase        #x03CD)
 192     (greek-iso8859-7    #x3E)   ; \e-F¾\e-A
 193     ))
 194 (define-char
 195   '((name . "FULLWIDTH GREEK CAPITAL LETTER UPSILON WITH TONOS")
 196     (->ucs              . #x038E)
 197     (general-category   letter uppercase) ; Normative Category
 198     (bidi-category      . "L")
 199     (mirrored           . nil)
 200     (->decomposition    wide #x038E)
 201     (->lowercase
 202      ((name . "FULLWIDTH GREEK SMALL LETTER UPSILON WITH TONOS")))
 203     (japanese-jisx0212  #x26 #x69)      ; \e$(D&i\e(B
 204     ))
 205 (define-char
 206   '((name               . "GREEK CAPITAL LETTER OMEGA WITH TONOS")
 207     (ucs                . #x038F)
 208     (general-category   letter uppercase) ; Normative Category
 209     (bidi-category      . "L")
 210     (mirrored           . nil)
 211     (->decomposition    #x03A9 #x0301)
 212     (->lowercase        #x03CE)
 213     (greek-iso8859-7    #x3F)   ; \e-F¿\e-A
 214     ))
 215 (define-char
 216   '((name               . "FULLWIDTH GREEK CAPITAL LETTER OMEGA WITH TONOS")
 217     (->ucs              . #x038F)
 218     (general-category   letter uppercase) ; Normative Category
 219     (bidi-category      . "L")
 220     (mirrored           . nil)
 221     (->decomposition    wide #x038F)
 222     (->lowercase
 223      ((name . "FULLWIDTH GREEK SMALL LETTER OMEGA WITH TONOS")))
 224     (japanese-jisx0212  #x26 #x6C)      ; \e$(D&l\e(B
 225     ))
 226 (define-char
 227   '((name . "GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS")
 228     (ucs                . #x0390)
 229     (general-category   letter lowercase) ; Normative Category
 230     (bidi-category      . "L")
 231     (mirrored           . nil)
 232     (->decomposition    #x03CA #x0301)
 233     (greek-iso8859-7    #x40)   ; \e-FÀ\e-A
 234     ))
 235 (define-char
 236   '((name . "FULLWIDTH GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS")
 237     (->ucs              . #x0390)
 238     (general-category   letter lowercase) ; Normative Category
 239     (bidi-category      . "L")
 240     (mirrored           . nil)
 241     (->decomposition    wide #x0390)
 242     (japanese-jisx0212  #x26 #x76)      ; \e$(D&v\e(B
 243     ))
 244 (define-char
 245   '((name               . "GREEK CAPITAL LETTER ALPHA")
 246     (ucs                . #x0391)
 247     (general-category   letter uppercase) ; Normative Category
 248     (bidi-category      . "L")
 249     (mirrored           . nil)
 250     (->lowercase        #x03B1)
 251     (greek-iso8859-7    #x41)   ; \e-FÁ\e-A
 252     ))
 253 (define-char
 254   '((name               . "FULLWIDTH GREEK CAPITAL LETTER ALPHA")
 255     (->ucs              . #x0391)
 256     (general-category   letter uppercase) ; Normative Category
 257     (bidi-category      . "L")
 258     (mirrored           . nil)
 259     (->decomposition    wide #x0391)
 260     (->lowercase
 261      ((name . "FULLWIDTH GREEK SMALL LETTER ALPHA")))
 262     (japanese-jisx0208-1978     #x26 #x21)      ; \e$(B&!\e(B
 263     (chinese-gb2312             #x26 #x21)      ; \e$(A&!\e(B
 264     (japanese-jisx0208          #x26 #x21)      ; \e$(B&!\e(B
 265     (korean-ksc5601             #x25 #x41)      ; \e$(C%A\e(B
 266     (chinese-cns11643-1         #x24 #x75)      ; \e$(G$u\e(B
 267     ))
 268 (define-char
 269   '((name               . "GREEK CAPITAL LETTER BETA")
 270     (ucs                . #x0392)
 271     (general-category   letter uppercase) ; Normative Category
 272     (bidi-category      . "L")
 273     (mirrored           . nil)
 274     (->lowercase        #x03B2)
 275     (greek-iso8859-7    #x42)   ; \e-FÂ\e-A
 276     ))
 277 (define-char
 278   '((name               . "FULLWIDTH GREEK CAPITAL LETTER BETA")
 279     (->ucs              . #x0392)
 280     (general-category   letter uppercase) ; Normative Category
 281     (bidi-category      . "L")
 282     (mirrored           . nil)
 283     (->decomposition    wide #x0392)
 284     (->lowercase
 285      ((name . "FULLWIDTH GREEK SMALL LETTER BETA")))
 286     (japanese-jisx0208-1978     #x26 #x22)      ; \e$(B&"\e(B
 287     (chinese-gb2312             #x26 #x22)      ; \e$(A&"\e(B
 288     (japanese-jisx0208          #x26 #x22)      ; \e$(B&"\e(B
 289     (korean-ksc5601             #x25 #x42)      ; \e$(C%B\e(B
 290     (chinese-cns11643-1         #x24 #x76)      ; \e$(G$v\e(B
 291     ))
 292 (define-char
 293   '((name               . "GREEK CAPITAL LETTER GAMMA")
 294     (ucs                . #x0393)
 295     (general-category   letter uppercase) ; Normative Category
 296     (bidi-category      . "L")
 297     (mirrored           . nil)
 298     (->lowercase        #x03B3)
 299     (greek-iso8859-7    #x43)   ; \e-FÃ\e-A
 300     ))
 301 (define-char
 302   '((name               . "FULLWIDTH GREEK CAPITAL LETTER GAMMA")
 303     (->ucs              . #x0393)
 304     (general-category   letter uppercase) ; Normative Category
 305     (bidi-category      . "L")
 306     (mirrored           . nil)
 307     (->decomposition    wide #x0393)
 308     (->lowercase
 309      ((name . "FULLWIDTH GREEK SMALL LETTER GAMMA")))
 310     (japanese-jisx0208-1978     #x26 #x23)      ; \e$(B&#\e(B
 311     (chinese-gb2312             #x26 #x23)      ; \e$(A&#\e(B
 312     (japanese-jisx0208          #x26 #x23)      ; \e$(B&#\e(B
 313     (korean-ksc5601             #x25 #x43)      ; \e$(C%C\e(B
 314     (chinese-cns11643-1         #x24 #x77)      ; \e$(G$w\e(B
 315     ))
 316 (define-char
 317   '((name               . "GREEK CAPITAL LETTER DELTA")
 318     (ucs                . #x0394)
 319     (general-category   letter uppercase) ; Normative Category
 320     (bidi-category      . "L")
 321     (mirrored           . nil)
 322     (->lowercase        #x03B4)
 323     (greek-iso8859-7    #x44)   ; \e-FÄ\e-A
 324     ))
 325 (define-char
 326   '((name               . "FULLWIDTH GREEK CAPITAL LETTER DELTA")
 327     (->ucs              . #x0394)
 328     (general-category   letter uppercase) ; Normative Category
 329     (bidi-category      . "L")
 330     (mirrored           . nil)
 331     (->decomposition    wide #x0394)
 332     (->lowercase
 333      ((name . "FULLWIDTH GREEK SMALL LETTER DELTA")))
 334     (japanese-jisx0208-1978     #x26 #x24)      ; \e$(B&$\e(B
 335     (chinese-gb2312             #x26 #x24)      ; \e$(A&$\e(B
 336     (japanese-jisx0208          #x26 #x24)      ; \e$(B&$\e(B
 337     (korean-ksc5601             #x25 #x44)      ; \e$(C%D\e(B
 338     (chinese-cns11643-1         #x24 #x78)      ; \e$(G$x\e(B
 339     ))
 340 (define-char
 341   '((name               . "GREEK CAPITAL LETTER EPSILON")
 342     (ucs                . #x0395)
 343     (general-category   letter uppercase) ; Normative Category
 344     (bidi-category      . "L")
 345     (mirrored           . nil)
 346     (->lowercase        #x03B5)
 347     (greek-iso8859-7    #x45)   ; \e-FÅ\e-A
 348     ))
 349 (define-char
 350   '((name               . "FULLWIDTH GREEK CAPITAL LETTER EPSILON")
 351     (->ucs              . #x0395)
 352     (general-category   letter uppercase) ; Normative Category
 353     (bidi-category      . "L")
 354     (mirrored           . nil)
 355     (->decomposition    wide #x0395)
 356     (->lowercase
 357      ((name . "FULLWIDTH GREEK SMALL LETTER EPSILON")))
 358     (japanese-jisx0208-1978     #x26 #x25)      ; \e$(B&%\e(B
 359     (chinese-gb2312             #x26 #x25)      ; \e$(A&%\e(B
 360     (japanese-jisx0208          #x26 #x25)      ; \e$(B&%\e(B
 361     (korean-ksc5601             #x25 #x45)      ; \e$(C%E\e(B
 362     (chinese-cns11643-1         #x24 #x79)      ; \e$(G$y\e(B
 363     ))
 364 (define-char
 365   '((name               . "GREEK CAPITAL LETTER ZETA")
 366     (ucs                . #x0396)
 367     (general-category   letter uppercase) ; Normative Category
 368     (bidi-category      . "L")
 369     (mirrored           . nil)
 370     (->lowercase        #x03B6)
 371     (greek-iso8859-7    #x46)   ; \e-FÆ\e-A
 372     ))
 373 (define-char
 374   '((name               . "FULLWIDTH GREEK CAPITAL LETTER ZETA")
 375     (->ucs              . #x0396)
 376     (general-category   letter uppercase) ; Normative Category
 377     (bidi-category      . "L")
 378     (mirrored           . nil)
 379     (->decomposition    wide #x0396)
 380     (->lowercase
 381      ((name . "FULLWIDTH GREEK SMALL LETTER ZETA")))
 382     (japanese-jisx0208-1978     #x26 #x26)      ; \e$(B&&\e(B
 383     (chinese-gb2312             #x26 #x26)      ; \e$(A&&\e(B
 384     (japanese-jisx0208          #x26 #x26)      ; \e$(B&&\e(B
 385     (korean-ksc5601             #x25 #x46)      ; \e$(C%F\e(B
 386     (chinese-cns11643-1         #x24 #x7A)      ; \e$(G$z\e(B
 387     ))
 388 (define-char
 389   '((name               . "GREEK CAPITAL LETTER ETA")
 390     (ucs                . #x0397)
 391     (general-category   letter uppercase) ; Normative Category
 392     (bidi-category      . "L")
 393     (mirrored           . nil)
 394     (->lowercase        #x03B7)
 395     (greek-iso8859-7    #x47)   ; \e-FÇ\e-A
 396     ))
 397 (define-char
 398   '((name               . "FULLWIDTH GREEK CAPITAL LETTER ETA")
 399     (->ucs              . #x0397)
 400     (general-category   letter uppercase) ; Normative Category
 401     (bidi-category      . "L")
 402     (mirrored           . nil)
 403     (->decomposition    wide #x0397)
 404     (->lowercase
 405      ((name . "FULLWIDTH GREEK SMALL LETTER ETA")))
 406     (japanese-jisx0208-1978     #x26 #x27)      ; \e$(B&'\e(B
 407     (chinese-gb2312             #x26 #x27)      ; \e$(A&'\e(B
 408     (japanese-jisx0208          #x26 #x27)      ; \e$(B&'\e(B
 409     (korean-ksc5601             #x25 #x47)      ; \e$(C%G\e(B
 410     (chinese-cns11643-1         #x24 #x7B)      ; \e$(G${\e(B
 411     ))
 412 (define-char
 413   '((name               . "GREEK CAPITAL LETTER THETA")
 414     (ucs                . #x0398)
 415     (general-category   letter uppercase) ; Normative Category
 416     (bidi-category      . "L")
 417     (mirrored           . nil)
 418     (->lowercase        #x03B8)
 419     (greek-iso8859-7    #x48)   ; \e-FÈ\e-A
 420     ))
 421 (define-char
 422   '((name               . "FULLWIDTH GREEK CAPITAL LETTER THETA")
 423     (->ucs              . #x0398)
 424     (general-category   letter uppercase) ; Normative Category
 425     (bidi-category      . "L")
 426     (mirrored           . nil)
 427     (->decomposition    wide #x0398)
 428     (->lowercase
 429      ((name . "FULLWIDTH GREEK SMALL LETTER THETA")))
 430     (japanese-jisx0208-1978     #x26 #x28)      ; \e$(B&(\e(B
 431     (chinese-gb2312             #x26 #x28)      ; \e$(A&(\e(B
 432     (japanese-jisx0208          #x26 #x28)      ; \e$(B&(\e(B
 433     (korean-ksc5601             #x25 #x48)      ; \e$(C%H\e(B
 434     (chinese-cns11643-1         #x24 #x7C)      ; \e$(G$|\e(B
 435     ))
 436 (define-char
 437   '((name               . "GREEK CAPITAL LETTER IOTA")
 438     (ucs                . #x0399)
 439     (general-category   letter uppercase) ; Normative Category
 440     (bidi-category      . "L")
 441     (mirrored           . nil)
 442     (->lowercase        #x03B9)
 443     (greek-iso8859-7    #x49)   ; \e-FÉ\e-A
 444     ))
 445 (define-char
 446   '((name               . "FULLWIDTH GREEK CAPITAL LETTER IOTA")
 447     (->ucs              . #x0399)
 448     (general-category   letter uppercase) ; Normative Category
 449     (bidi-category      . "L")
 450     (mirrored           . nil)
 451     (->decomposition    wide #x0399)
 452     (->lowercase
 453      ((name . "FULLWIDTH GREEK SMALL LETTER IOTA")))
 454     (japanese-jisx0208-1978     #x26 #x29)      ; \e$(B&)\e(B
 455     (chinese-gb2312             #x26 #x29)      ; \e$(A&)\e(B
 456     (japanese-jisx0208          #x26 #x29)      ; \e$(B&)\e(B
 457     (korean-ksc5601             #x25 #x49)      ; \e$(C%I\e(B
 458     (chinese-cns11643-1         #x24 #x7D)      ; \e$(G$}\e(B
 459     ))
 460 (define-char
 461   '((name               . "GREEK CAPITAL LETTER KAPPA")
 462     (ucs                . #x039A)
 463     (general-category   letter uppercase) ; Normative Category
 464     (bidi-category      . "L")
 465     (mirrored           . nil)
 466     (->lowercase        #x03BA)
 467     (greek-iso8859-7    #x4A)   ; \e-FÊ\e-A
 468     ))
 469 (define-char
 470   '((name               . "FULLWIDTH GREEK CAPITAL LETTER KAPPA")
 471     (->ucs              . #x039A)
 472     (general-category   letter uppercase) ; Normative Category
 473     (bidi-category      . "L")
 474     (mirrored           . nil)
 475     (->decomposition    wide #x039A)
 476     (->lowercase
 477      ((name . "FULLWIDTH GREEK SMALL LETTER KAPPA")))
 478     (japanese-jisx0208-1978     #x26 #x2A)      ; \e$(B&*\e(B
 479     (chinese-gb2312             #x26 #x2A)      ; \e$(A&*\e(B
 480     (japanese-jisx0208          #x26 #x2A)      ; \e$(B&*\e(B
 481     (korean-ksc5601             #x25 #x4A)      ; \e$(C%J\e(B
 482     (chinese-cns11643-1         #x24 #x7E)      ; \e$(G$~\e(B
 483     ))
 484 (define-char
 485   '((name               . "GREEK CAPITAL LETTER LAMDA")
 486     (ucs                . #x039B)
 487     (general-category   letter uppercase) ; Normative Category
 488     (bidi-category      . "L")
 489     (mirrored           . nil)
 490     (->lowercase        #x03BB)
 491     (greek-iso8859-7    #x4B)   ; \e-FË\e-A
 492     ))
 493 (define-char
 494   '((name               . "FULLWIDTH GREEK CAPITAL LETTER LAMDA")
 495     (->ucs              . #x039B)
 496     (general-category   letter uppercase) ; Normative Category
 497     (bidi-category      . "L")
 498     (mirrored           . nil)
 499     (->decomposition    wide #x039B)
 500     (->lowercase
 501      ((name . "FULLWIDTH GREEK SMALL LETTER LAMDA")))
 502     (japanese-jisx0208-1978     #x26 #x2B)      ; \e$(B&+\e(B
 503     (chinese-gb2312             #x26 #x2B)      ; \e$(A&+\e(B
 504     (japanese-jisx0208          #x26 #x2B)      ; \e$(B&+\e(B
 505     (korean-ksc5601             #x25 #x4B)      ; \e$(C%K\e(B
 506     (chinese-cns11643-1         #x25 #x21)      ; \e$(G%!\e(B
 507     ))
 508 (define-char
 509   '((name               . "GREEK CAPITAL LETTER MU")
 510     (ucs                . #x039C)
 511     (general-category   letter uppercase) ; Normative Category
 512     (bidi-category      . "L")
 513     (mirrored           . nil)
 514     (->lowercase        #x03BC)
 515     (greek-iso8859-7    #x4C)   ; \e-FÌ\e-A
 516     ))
 517 (define-char
 518   '((name               . "FULLWIDTH GREEK CAPITAL LETTER MU")
 519     (->ucs              . #x039C)
 520     (general-category   letter uppercase) ; Normative Category
 521     (bidi-category      . "L")
 522     (mirrored           . nil)
 523     (->decomposition    wide #x039C)
 524     (->lowercase
 525      ((name . "FULLWIDTH GREEK SMALL LETTER MU")))
 526     (japanese-jisx0208-1978     #x26 #x2C)      ; \e$(B&,\e(B
 527     (chinese-gb2312             #x26 #x2C)      ; \e$(A&,\e(B
 528     (japanese-jisx0208          #x26 #x2C)      ; \e$(B&,\e(B
 529     (korean-ksc5601             #x25 #x4C)      ; \e$(C%L\e(B
 530     (chinese-cns11643-1         #x25 #x22)      ; \e$(G%"\e(B
 531     ))
 532 (define-char
 533   '((name               . "GREEK CAPITAL LETTER NU")
 534     (ucs                . #x039D)
 535     (general-category   letter uppercase) ; Normative Category
 536     (bidi-category      . "L")
 537     (mirrored           . nil)
 538     (->lowercase        #x03BD)
 539     (greek-iso8859-7    #x4D)   ; \e-FÍ\e-A
 540     ))
 541 (define-char
 542   '((name               . "FULLWIDTH GREEK CAPITAL LETTER NU")
 543     (->ucs              . #x039D)
 544     (general-category   letter uppercase) ; Normative Category
 545     (bidi-category      . "L")
 546     (mirrored           . nil)
 547     (->decomposition    wide #x039D)
 548     (->lowercase
 549      ((name . "FULLWIDTH GREEK SMALL LETTER NU")))
 550     (japanese-jisx0208-1978     #x26 #x2D)      ; \e$(B&-\e(B
 551     (chinese-gb2312             #x26 #x2D)      ; \e$(A&-\e(B
 552     (japanese-jisx0208          #x26 #x2D)      ; \e$(B&-\e(B
 553     (korean-ksc5601             #x25 #x4D)      ; \e$(C%M\e(B
 554     (chinese-cns11643-1         #x25 #x23)      ; \e$(G%#\e(B
 555     ))
 556 (define-char
 557   '((name               . "GREEK CAPITAL LETTER XI")
 558     (ucs                . #x039E)
 559     (general-category   letter uppercase) ; Normative Category
 560     (bidi-category      . "L")
 561     (mirrored           . nil)
 562     (->lowercase        #x03BE)
 563     (greek-iso8859-7    #x4E)   ; \e-FÎ\e-A
 564     ))
 565 (define-char
 566   '((name               . "FULLWIDTH GREEK CAPITAL LETTER XI")
 567     (->ucs              . #x039E)
 568     (general-category   letter uppercase) ; Normative Category
 569     (bidi-category      . "L")
 570     (mirrored           . nil)
 571     (->decomposition    wide #x039E)
 572     (->lowercase
 573      ((name . "FULLWIDTH GREEK SMALL LETTER XI")))
 574     (japanese-jisx0208-1978     #x26 #x2E)      ; \e$(B&.\e(B
 575     (chinese-gb2312             #x26 #x2E)      ; \e$(A&.\e(B
 576     (japanese-jisx0208          #x26 #x2E)      ; \e$(B&.\e(B
 577     (korean-ksc5601             #x25 #x4E)      ; \e$(C%N\e(B
 578     (chinese-cns11643-1         #x25 #x24)      ; \e$(G%$\e(B
 579     ))
 580 (define-char
 581   '((name               . "GREEK CAPITAL LETTER OMICRON")
 582     (ucs                . #x039F)
 583     (general-category   letter uppercase) ; Normative Category
 584     (bidi-category      . "L")
 585     (mirrored           . nil)
 586     (->lowercase        #x03BF)
 587     (greek-iso8859-7    #x4F)   ; \e-FÏ\e-A
 588     ))
 589 (define-char
 590   '((name               . "FULLWIDTH GREEK CAPITAL LETTER OMICRON")
 591     (->ucs              . #x039F)
 592     (general-category   letter uppercase) ; Normative Category
 593     (bidi-category      . "L")
 594     (mirrored           . nil)
 595     (->decomposition    wide #x039F)
 596     (->lowercase
 597      ((name . "FULLWIDTH GREEK SMALL LETTER OMICRON")))
 598     (japanese-jisx0208-1978     #x26 #x2F)      ; \e$(B&/\e(B
 599     (chinese-gb2312             #x26 #x2F)      ; \e$(A&/\e(B
 600     (japanese-jisx0208          #x26 #x2F)      ; \e$(B&/\e(B
 601     (korean-ksc5601             #x25 #x4F)      ; \e$(C%O\e(B
 602     (chinese-cns11643-1         #x25 #x25)      ; \e$(G%%\e(B
 603     ))
 604 (define-char
 605   '((name               . "GREEK CAPITAL LETTER PI")
 606     (ucs                . #x03A0)
 607     (general-category   letter uppercase) ; Normative Category
 608     (bidi-category      . "L")
 609     (mirrored           . nil)
 610     (->lowercase        #x03C0)
 611     (greek-iso8859-7    #x50)   ; \e-FÐ\e-A
 612     ))
 613 (define-char
 614   '((name               . "FULLWIDTH GREEK CAPITAL LETTER PI")
 615     (->ucs              . #x03A0)
 616     (general-category   letter uppercase) ; Normative Category
 617     (bidi-category      . "L")
 618     (mirrored           . nil)
 619     (->decomposition    wide #x03A0)
 620     (->lowercase
 621      ((name . "FULLWIDTH GREEK SMALL LETTER PI")))
 622     (japanese-jisx0208-1978     #x26 #x30)      ; \e$(B&0\e(B
 623     (chinese-gb2312             #x26 #x30)      ; \e$(A&0\e(B
 624     (japanese-jisx0208          #x26 #x30)      ; \e$(B&0\e(B
 625     (korean-ksc5601             #x25 #x50)      ; \e$(C%P\e(B
 626     (chinese-cns11643-1         #x25 #x26)      ; \e$(G%&\e(B
 627     ))
 628 (define-char
 629   '((name               . "GREEK CAPITAL LETTER RHO")
 630     (ucs                . #x03A1)
 631     (general-category   letter uppercase) ; Normative Category
 632     (bidi-category      . "L")
 633     (mirrored           . nil)
 634     (->lowercase        #x03C1)
 635     (greek-iso8859-7    #x51)   ; \e-FÑ\e-A
 636     ))
 637 (define-char
 638   '((name               . "FULLWIDTH GREEK CAPITAL LETTER RHO")
 639     (->ucs              . #x03A1)
 640     (general-category   letter uppercase) ; Normative Category
 641     (bidi-category      . "L")
 642     (mirrored           . nil)
 643     (->decomposition    wide #x03A1)
 644     (->lowercase
 645      ((name . "FULLWIDTH GREEK SMALL LETTER RHO")))
 646     (japanese-jisx0208-1978     #x26 #x31)      ; \e$(B&1\e(B
 647     (chinese-gb2312             #x26 #x31)      ; \e$(A&1\e(B
 648     (japanese-jisx0208          #x26 #x31)      ; \e$(B&1\e(B
 649     (korean-ksc5601             #x25 #x51)      ; \e$(C%Q\e(B
 650     (chinese-cns11643-1         #x25 #x27)      ; \e$(G%'\e(B
 651     ))
 652 (define-char
 653   '((name               . "GREEK CAPITAL LETTER SIGMA")
 654     (ucs                . #x03A3)
 655     (general-category   letter uppercase) ; Normative Category
 656     (bidi-category      . "L")
 657     (mirrored           . nil)
 658     (->lowercase        #x03C3)
 659     (greek-iso8859-7    #x53)   ; \e-FÓ\e-A
 660     ))
 661 (define-char
 662   '((name               . "FULLWIDTH GREEK CAPITAL LETTER SIGMA")
 663     (->ucs              . #x03A3)
 664     (general-category   letter uppercase) ; Normative Category
 665     (bidi-category      . "L")
 666     (mirrored           . nil)
 667     (->decomposition    wide #x03A3)
 668     (->lowercase
 669      ((name . "FULLWIDTH GREEK SMALL LETTER SIGMA")))
 670     (japanese-jisx0208-1978     #x26 #x32)      ; \e$(B&2\e(B
 671     (chinese-gb2312             #x26 #x32)      ; \e$(A&2\e(B
 672     (japanese-jisx0208          #x26 #x32)      ; \e$(B&2\e(B
 673     (korean-ksc5601             #x25 #x52)      ; \e$(C%R\e(B
 674     (chinese-cns11643-1         #x25 #x28)      ; \e$(G%(\e(B
 675     ))
 676 (define-char
 677   '((name               . "GREEK CAPITAL LETTER TAU")
 678     (ucs                . #x03A4)
 679     (general-category   letter uppercase) ; Normative Category
 680     (bidi-category      . "L")
 681     (mirrored           . nil)
 682     (->lowercase        #x03C4)
 683     (greek-iso8859-7    #x54)   ; \e-FÔ\e-A
 684     ))
 685 (define-char
 686   '((name               . "FULLWIDTH GREEK CAPITAL LETTER TAU")
 687     (->ucs              . #x03A4)
 688     (general-category   letter uppercase) ; Normative Category
 689     (bidi-category      . "L")
 690     (mirrored           . nil)
 691     (->decomposition    wide #x03A4)
 692     (->lowercase
 693      ((name . "FULLWIDTH GREEK SMALL LETTER TAU")))
 694     (japanese-jisx0208-1978     #x26 #x33)      ; \e$(B&3\e(B
 695     (chinese-gb2312             #x26 #x33)      ; \e$(A&3\e(B
 696     (japanese-jisx0208          #x26 #x33)      ; \e$(B&3\e(B
 697     (korean-ksc5601             #x25 #x53)      ; \e$(C%S\e(B
 698     (chinese-cns11643-1         #x25 #x29)      ; \e$(G%)\e(B
 699     ))
 700 (define-char
 701   '((name               . "GREEK CAPITAL LETTER UPSILON")
 702     (ucs                . #x03A5)
 703     (general-category   letter uppercase) ; Normative Category
 704     (bidi-category      . "L")
 705     (mirrored           . nil)
 706     (->lowercase        #x03C5)
 707     (greek-iso8859-7    #x55)   ; \e-FÕ\e-A
 708     ))
 709 (define-char
 710   '((name               . "FULLWIDTH GREEK CAPITAL LETTER UPSILON")
 711     (->ucs              . #x03A5)
 712     (general-category   letter uppercase) ; Normative Category
 713     (bidi-category      . "L")
 714     (mirrored           . nil)
 715     (->decomposition    wide #x03A5)
 716     (->lowercase
 717      ((name . "FULLWIDTH GREEK SMALL LETTER UPSILON")))
 718     (japanese-jisx0208-1978     #x26 #x34)      ; \e$(B&4\e(B
 719     (chinese-gb2312             #x26 #x34)      ; \e$(A&4\e(B
 720     (japanese-jisx0208          #x26 #x34)      ; \e$(B&4\e(B
 721     (korean-ksc5601             #x25 #x54)      ; \e$(C%T\e(B
 722     (chinese-cns11643-1         #x25 #x2A)      ; \e$(G%*\e(B
 723     ))
 724 (define-char
 725   '((name               . "GREEK CAPITAL LETTER PHI")
 726     (ucs                . #x03A6)
 727     (general-category   letter uppercase) ; Normative Category
 728     (bidi-category      . "L")
 729     (mirrored           . nil)
 730     (->lowercase        #x03C6)
 731     (greek-iso8859-7    #x56)   ; \e-FÖ\e-A
 732     ))
 733 (define-char
 734   '((name               . "FULLWIDTH GREEK CAPITAL LETTER PHI")
 735     (->ucs              . #x03A6)
 736     (general-category   letter uppercase) ; Normative Category
 737     (bidi-category      . "L")
 738     (mirrored           . nil)
 739     (->decomposition    wide #x03A6)
 740     (->lowercase
 741      ((name . "FULLWIDTH GREEK SMALL LETTER PHI")))
 742     (japanese-jisx0208-1978     #x26 #x35)      ; \e$(B&5\e(B
 743     (chinese-gb2312             #x26 #x35)      ; \e$(A&5\e(B
 744     (japanese-jisx0208          #x26 #x35)      ; \e$(B&5\e(B
 745     (korean-ksc5601             #x25 #x55)      ; \e$(C%U\e(B
 746     (chinese-cns11643-1         #x25 #x2B)      ; \e$(G%+\e(B
 747     ))
 748 (define-char
 749   '((name               . "GREEK CAPITAL LETTER CHI")
 750     (ucs                . #x03A7)
 751     (general-category   letter uppercase) ; Normative Category
 752     (bidi-category      . "L")
 753     (mirrored           . nil)
 754     (->lowercase        #x03C7)
 755     (greek-iso8859-7    #x57)   ; \e-F×\e-A
 756     ))
 757 (define-char
 758   '((name               . "FULLWIDTH GREEK CAPITAL LETTER CHI")
 759     (->ucs              . #x03A7)
 760     (general-category   letter uppercase) ; Normative Category
 761     (bidi-category      . "L")
 762     (mirrored           . nil)
 763     (->decomposition    wide #x03A7)
 764     (->lowercase
 765      ((name . "FULLWIDTH GREEK SMALL LETTER CHI")))
 766     (japanese-jisx0208-1978     #x26 #x36)      ; \e$(B&6\e(B
 767     (chinese-gb2312             #x26 #x36)      ; \e$(A&6\e(B
 768     (japanese-jisx0208          #x26 #x36)      ; \e$(B&6\e(B
 769     (korean-ksc5601             #x25 #x56)      ; \e$(C%V\e(B
 770     (chinese-cns11643-1         #x25 #x2C)      ; \e$(G%,\e(B
 771     ))
 772 (define-char
 773   '((name               . "GREEK CAPITAL LETTER PSI")
 774     (ucs                . #x03A8)
 775     (general-category   letter uppercase) ; Normative Category
 776     (bidi-category      . "L")
 777     (mirrored           . nil)
 778     (->lowercase        #x03C8)
 779     (greek-iso8859-7    #x58)   ; \e-FØ\e-A
 780     ))
 781 (define-char
 782   '((name               . "FULLWIDTH GREEK CAPITAL LETTER PSI")
 783     (->ucs              . #x03A8)
 784     (general-category   letter uppercase) ; Normative Category
 785     (bidi-category      . "L")
 786     (mirrored           . nil)
 787     (->decomposition    wide #x03A8)
 788     (->lowercase
 789      ((name . "FULLWIDTH GREEK SMALL LETTER PSI")))
 790     (japanese-jisx0208-1978     #x26 #x37)      ; \e$(B&7\e(B
 791     (chinese-gb2312             #x26 #x37)      ; \e$(A&7\e(B
 792     (japanese-jisx0208          #x26 #x37)      ; \e$(B&7\e(B
 793     (korean-ksc5601             #x25 #x57)      ; \e$(C%W\e(B
 794     (chinese-cns11643-1         #x25 #x2D)      ; \e$(G%-\e(B
 795     ))
 796 (define-char
 797   '((name               . "GREEK CAPITAL LETTER OMEGA")
 798     (ucs                . #x03A9)
 799     (general-category   letter uppercase) ; Normative Category
 800     (bidi-category      . "L")
 801     (mirrored           . nil)
 802     (->lowercase        #x03C9)
 803     (greek-iso8859-7    #x59)   ; \e-FÙ\e-A
 804     ))
 805 (define-char
 806   '((name               . "FULLWIDTH GREEK CAPITAL LETTER OMEGA")
 807     (->ucs              . #x03A9)
 808     (general-category   letter uppercase) ; Normative Category
 809     (bidi-category      . "L")
 810     (mirrored           . nil)
 811     (->decomposition    wide #x03A9)
 812     (->lowercase
 813      ((name . "FULLWIDTH GREEK SMALL LETTER OMEGA")))
 814     (japanese-jisx0208-1978     #x26 #x38)      ; \e$(B&8\e(B
 815     (chinese-gb2312             #x26 #x38)      ; \e$(A&8\e(B
 816     (japanese-jisx0208          #x26 #x38)      ; \e$(B&8\e(B
 817     (korean-ksc5601             #x25 #x58)      ; \e$(C%X\e(B
 818     (chinese-cns11643-1         #x25 #x2E)      ; \e$(G%.\e(B
 819     ))
 820 (define-char
 821   '((name               . "GREEK CAPITAL LETTER IOTA WITH DIALYTIKA")
 822     (ucs                . #x03AA)
 823     (general-category   letter uppercase) ; Normative Category
 824     (bidi-category      . "L")
 825     (mirrored           . nil)
 826     (->decomposition    #x0399 #x0308)
 827     (->lowercase        #x03CA)
 828     (greek-iso8859-7    #x5A)   ; \e-FÚ\e-A
 829     ))
 830 (define-char
 831   '((name . "FULLWIDTH GREEK CAPITAL LETTER IOTA WITH DIALYTIKA")
 832     (->ucs              . #x03AA)
 833     (general-category   letter uppercase) ; Normative Category
 834     (bidi-category      . "L")
 835     (mirrored           . nil)
 836     (->decomposition    wide #x03AA)
 837     (->lowercase
 838      ((name . "FULLWIDTH GREEK SMALL LETTER IOTA WITH DIALYTIKA")))
 839     (japanese-jisx0212  #x26 #x65)      ; \e$(D&e\e(B
 840     ))
 841 (define-char
 842   '((name               . "GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA")
 843     (ucs                . #x03AB)
 844     (general-category   letter uppercase) ; Normative Category
 845     (bidi-category      . "L")
 846     (mirrored           . nil)
 847     (->decomposition    #x03A5 #x0308)
 848     (->lowercase        #x03CB)
 849     (greek-iso8859-7    #x5B)   ; \e-FÛ\e-A
 850     ))
 851 (define-char
 852   '((name . "FULLWIDTH GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA")
 853     (->ucs              . #x03AB)
 854     (general-category   letter uppercase) ; Normative Category
 855     (bidi-category      . "L")
 856     (mirrored           . nil)
 857     (->decomposition    wide #x03AB)
 858     (->lowercase
 859      ((name . "FULLWIDTH GREEK SMALL LETTER UPSILON WITH DIALYTIKA")))
 860     (japanese-jisx0212  #x26 #x6A)      ; \e$(D&j\e(B
 861     ))
 862 (define-char
 863   '((name               . "GREEK SMALL LETTER ALPHA WITH TONOS")
 864     (ucs                . #x03AC)
 865     (general-category   letter lowercase) ; Normative Category
 866     (bidi-category      . "L")
 867     (mirrored           . nil)
 868     (->decomposition    #x03B1 #x0301)
 869     (->uppercase        #x0386)
 870     (->titlecase        #x0386)
 871     (greek-iso8859-7    #x5C)   ; \e-FÜ\e-A
 872     ))
 873 (define-char
 874   '((name               . "FULLWIDTH GREEK SMALL LETTER ALPHA WITH TONOS")
 875     (->ucs              . #x03AC)
 876     (general-category   letter lowercase) ; Normative Category
 877     (bidi-category      . "L")
 878     (mirrored           . nil)
 879     (->decomposition    wide #x03AC)
 880     (->uppercase
 881      ((name . "FULLWIDTH GREEK CAPITAL LETTER ALPHA WITH TONOS")))
 882     (->titlecase
 883      ((name . "FULLWIDTH GREEK CAPITAL LETTER ALPHA WITH TONOS")))
 884     (japanese-jisx0212  #x26 #x71)      ; \e$(D&q\e(B
 885     ))
 886 (define-char
 887   '((name               . "GREEK SMALL LETTER EPSILON WITH TONOS")
 888     (ucs                . #x03AD)
 889     (general-category   letter lowercase) ; Normative Category
 890     (bidi-category      . "L")
 891     (mirrored           . nil)
 892     (->decomposition    #x03B5 #x0301)
 893     (->uppercase        #x0388)
 894     (->titlecase        #x0388)
 895     (greek-iso8859-7    #x5D)   ; \e-FÝ\e-A
 896     ))
 897 (define-char
 898   '((name               . "FULLWIDTH GREEK SMALL LETTER EPSILON WITH TONOS")
 899     (->ucs              . #x03AD)
 900     (general-category   letter lowercase) ; Normative Category
 901     (bidi-category      . "L")
 902     (mirrored           . nil)
 903     (->decomposition    wide #x03AD)
 904     (->uppercase
 905      ((name . "FULLWIDTH GREEK CAPITAL LETTER EPSILON WITH TONOS")))
 906     (->titlecase
 907      ((name . "FULLWIDTH GREEK CAPITAL LETTER EPSILON WITH TONOS")))
 908     (japanese-jisx0212  #x26 #x72)      ; \e$(D&r\e(B
 909     ))
 910 (define-char
 911   '((name               . "GREEK SMALL LETTER ETA WITH TONOS")
 912     (ucs                . #x03AE)
 913     (general-category   letter lowercase) ; Normative Category
 914     (bidi-category      . "L")
 915     (mirrored           . nil)
 916     (->decomposition    #x03B7 #x0301)
 917     (->uppercase        #x0389)
 918     (->titlecase        #x0389)
 919     (greek-iso8859-7    #x5E)   ; \e-FÞ\e-A
 920     ))
 921 (define-char
 922   '((name               . "FULLWIDTH GREEK SMALL LETTER ETA WITH TONOS")
 923     (->ucs              . #x03AE)
 924     (general-category   letter lowercase) ; Normative Category
 925     (bidi-category      . "L")
 926     (mirrored           . nil)
 927     (->decomposition    wide #x03AE)
 928     (->uppercase
 929      ((name . "FULLWIDTH GREEK CAPITAL LETTER ETA WITH TONOS")))
 930     (->titlecase
 931      ((name . "FULLWIDTH GREEK CAPITAL LETTER ETA WITH TONOS")))
 932     (japanese-jisx0212  #x26 #x73)      ; \e$(D&s\e(B
 933     ))
 934 (define-char
 935   '((name               . "GREEK SMALL LETTER IOTA WITH TONOS")
 936     (ucs                . #x03AF)
 937     (general-category   letter lowercase) ; Normative Category
 938     (bidi-category      . "L")
 939     (mirrored           . nil)
 940     (->decomposition    #x03B9 #x0301)
 941     (->uppercase        #x038A)
 942     (->titlecase        #x038A)
 943     (greek-iso8859-7    #x5F)   ; \e-Fß\e-A
 944     ))
 945 (define-char
 946   '((name               . "FULLWIDTH GREEK SMALL LETTER IOTA WITH TONOS")
 947     (->ucs              . #x03AF)
 948     (general-category   letter lowercase) ; Normative Category
 949     (bidi-category      . "L")
 950     (mirrored           . nil)
 951     (->decomposition    wide #x03AF)
 952     (->uppercase
 953      ((name . "FULLWIDTH GREEK CAPITAL LETTER IOTA WITH TONOS")))
 954     (->titlecase
 955      ((name . "FULLWIDTH GREEK CAPITAL LETTER IOTA WITH TONOS")))
 956     (japanese-jisx0212  #x26 #x74)      ; \e$(D&t\e(B
 957     ))
 958 (define-char
 959   '((name . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS")
 960     (ucs                . #x03B0)
 961     (general-category   letter lowercase) ; Normative Category
 962     (bidi-category      . "L")
 963     (mirrored           . nil)
 964     (->decomposition    #x03CB #x0301)
 965     (greek-iso8859-7    #x60)   ; \e-Fà\e-A
 966     ))
 967 (define-char
 968   '((name . "FULLWIDTH GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS")
 969     (->ucs              . #x03B0)
 970     (general-category   letter lowercase) ; Normative Category
 971     (bidi-category      . "L")
 972     (mirrored           . nil)
 973     (->decomposition    wide #x03B0)
 974     (japanese-jisx0212  #x26 #x7B)      ; \e$(D&{\e(B
 975     ))
 976 (define-char
 977   '((name               . "GREEK SMALL LETTER ALPHA")
 978     (ucs                . #x03B1)
 979     (general-category   letter lowercase) ; Normative Category
 980     (bidi-category      . "L")
 981     (mirrored           . nil)
 982     (->uppercase        #x0391)
 983     (->titlecase        #x0391)
 984     (greek-iso8859-7    #x61)   ; \e-Fá\e-A
 985     ))
 986 (define-char
 987   '((name               . "FULLWIDTH GREEK SMALL LETTER ALPHA")
 988     (->ucs              . #x03B1)
 989     (general-category   letter lowercase) ; Normative Category
 990     (bidi-category      . "L")
 991     (mirrored           . nil)
 992     (->decomposition    wide #x03B1)
 993     (->uppercase
 994      ((name . "FULLWIDTH GREEK CAPITAL LETTER ALPHA")))
 995     (->titlecase
 996      ((name . "FULLWIDTH GREEK CAPITAL LETTER ALPHA")))
 997     (japanese-jisx0208-1978     #x26 #x41)      ; \e$(B&A\e(B
 998     (chinese-gb2312             #x26 #x41)      ; \e$(A&A\e(B
 999     (japanese-jisx0208          #x26 #x41)      ; \e$(B&A\e(B
1000     (korean-ksc5601             #x25 #x61)      ; \e$(C%a\e(B
1001     (chinese-cns11643-1         #x25 #x2F)      ; \e$(G%/\e(B
1002     ))
1003 (define-char
1004   '((name               . "GREEK SMALL LETTER BETA")
1005     (ucs                . #x03B2)
1006     (general-category   letter lowercase) ; Normative Category
1007     (bidi-category      . "L")
1008     (mirrored           . nil)
1009     (->uppercase        #x0392)
1010     (->titlecase        #x0392)
1011     (greek-iso8859-7    #x62)   ; \e-Fâ\e-A
1012     ))
1013 (define-char
1014   '((name               . "FULLWIDTH GREEK SMALL LETTER BETA")
1015     (->ucs              . #x03B2)
1016     (general-category   letter lowercase) ; Normative Category
1017     (bidi-category      . "L")
1018     (mirrored           . nil)
1019     (->decomposition    wide #x03B2)
1020     (->uppercase
1021      ((name . "FULLWIDTH GREEK CAPITAL LETTER BETA")))
1022     (->titlecase
1023      ((name . "FULLWIDTH GREEK CAPITAL LETTER BETA")))
1024     (japanese-jisx0208-1978     #x26 #x42)      ; \e$(@&B\e(B
1025     (chinese-gb2312             #x26 #x42)      ; \e$(A&B\e(B
1026     (japanese-jisx0208          #x26 #x42)      ; \e$(B&B\e(B
1027     (korean-ksc5601             #x25 #x62)      ; \e$(C%b\e(B
1028     (chinese-cns11643-1         #x25 #x30)      ; \e$(G%0\e(B
1029     ))
1030 (define-char
1031   '((name               . "GREEK SMALL LETTER GAMMA")
1032     (ucs                . #x03B3)
1033     (general-category   letter lowercase) ; Normative Category
1034     (bidi-category      . "L")
1035     (mirrored           . nil)
1036     (->uppercase        #x0393)
1037     (->titlecase        #x0393)
1038     (greek-iso8859-7    #x63)   ; \e-Fã\e-A
1039     ))
1040 (define-char
1041   '((name               . "FULLWIDTH GREEK SMALL LETTER GAMMA")
1042     (->ucs              . #x03B3)
1043     (general-category   letter lowercase) ; Normative Category
1044     (bidi-category      . "L")
1045     (mirrored           . nil)
1046     (->decomposition    wide #x03B3)
1047     (->uppercase
1048      ((name . "FULLWIDTH GREEK CAPITAL LETTER GAMMA")))
1049     (->titlecase
1050      ((name . "FULLWIDTH GREEK CAPITAL LETTER GAMMA")))
1051     (japanese-jisx0208-1978     #x26 #x43)      ; \e$(B&C\e(B
1052     (chinese-gb2312             #x26 #x43)      ; \e$(A&C\e(B
1053     (japanese-jisx0208          #x26 #x43)      ; \e$(B&C\e(B
1054     (korean-ksc5601             #x25 #x63)      ; \e$(C%c\e(B
1055     (chinese-cns11643-1         #x25 #x31)      ; \e$(G%1\e(B
1056     ))
1057 (define-char
1058   '((name               . "GREEK SMALL LETTER DELTA")
1059     (ucs                . #x03B4)
1060     (general-category   letter lowercase) ; Normative Category
1061     (bidi-category      . "L")
1062     (mirrored           . nil)
1063     (->uppercase        #x0394)
1064     (->titlecase        #x0394)
1065     (greek-iso8859-7    #x64)   ; \e-Fä\e-A
1066     ))
1067 (define-char
1068   '((name               . "FULLWIDTH GREEK SMALL LETTER DELTA")
1069     (->ucs              . #x03B4)
1070     (general-category   letter lowercase) ; Normative Category
1071     (bidi-category      . "L")
1072     (mirrored           . nil)
1073     (->decomposition    wide #x03B4)
1074     (->uppercase
1075      ((name . "FULLWIDTH GREEK CAPITAL LETTER DELTA")))
1076     (->titlecase
1077      ((name . "FULLWIDTH GREEK CAPITAL LETTER DELTA")))
1078     (japanese-jisx0208-1978     #x26 #x44)      ; \e$(B&D\e(B
1079     (chinese-gb2312             #x26 #x44)      ; \e$(A&D\e(B
1080     (japanese-jisx0208          #x26 #x44)      ; \e$(B&D\e(B
1081     (korean-ksc5601             #x25 #x64)      ; \e$(C%d\e(B
1082     (chinese-cns11643-1         #x25 #x32)      ; \e$(G%2\e(B
1083     ))
1084 (define-char
1085   '((name               . "GREEK SMALL LETTER EPSILON")
1086     (ucs                . #x03B5)
1087     (general-category   letter lowercase) ; Normative Category
1088     (bidi-category      . "L")
1089     (mirrored           . nil)
1090     (->uppercase        #x0395)
1091     (->titlecase        #x0395)
1092     (greek-iso8859-7    #x65)   ; \e-Få\e-A
1093     ))
1094 (define-char
1095   '((name               . "FULLWIDTH GREEK SMALL LETTER EPSILON")
1096     (->ucs              . #x03B5)
1097     (general-category   letter lowercase) ; Normative Category
1098     (bidi-category      . "L")
1099     (mirrored           . nil)
1100     (->decomposition    wide #x03B5)
1101     (->uppercase
1102      ((name . "FULLWIDTH GREEK CAPITAL LETTER EPSILON")))
1103     (->titlecase
1104      ((name . "FULLWIDTH GREEK CAPITAL LETTER EPSILON")))
1105     (japanese-jisx0208-1978     #x26 #x45)      ; \e$(B&E\e(B
1106     (chinese-gb2312             #x26 #x45)      ; \e$(A&E\e(B
1107     (japanese-jisx0208          #x26 #x45)      ; \e$(B&E\e(B
1108     (korean-ksc5601             #x25 #x65)      ; \e$(C%e\e(B
1109     (chinese-cns11643-1         #x25 #x33)      ; \e$(G%3\e(B
1110     ))
1111 (define-char
1112   '((name               . "GREEK SMALL LETTER ZETA")
1113     (ucs                . #x03B6)
1114     (general-category   letter lowercase) ; Normative Category
1115     (bidi-category      . "L")
1116     (mirrored           . nil)
1117     (->uppercase        #x0396)
1118     (->titlecase        #x0396)
1119     (greek-iso8859-7    #x66)   ; \e-Fæ\e-A
1120     ))
1121 (define-char
1122   '((name               . "FULLWIDTH GREEK SMALL LETTER ZETA")
1123     (->ucs              . #x03B6)
1124     (general-category   letter lowercase) ; Normative Category
1125     (bidi-category      . "L")
1126     (mirrored           . nil)
1127     (->decomposition    wide #x03B6)
1128     (->uppercase
1129      ((name . "FULLWIDTH GREEK CAPITAL LETTER ZETA")))
1130     (->titlecase
1131      ((name . "FULLWIDTH GREEK CAPITAL LETTER ZETA")))
1132     (japanese-jisx0208-1978     #x26 #x46)      ; \e$(B&F\e(B
1133     (chinese-gb2312             #x26 #x46)      ; \e$(A&F\e(B
1134     (japanese-jisx0208          #x26 #x46)      ; \e$(B&F\e(B
1135     (korean-ksc5601             #x25 #x66)      ; \e$(C%f\e(B
1136     (chinese-cns11643-1         #x25 #x34)      ; \e$(G%4\e(B
1137     ))
1138 (define-char
1139   '((name               . "GREEK SMALL LETTER ETA")
1140     (ucs                . #x03B7)
1141     (general-category   letter lowercase) ; Normative Category
1142     (bidi-category      . "L")
1143     (mirrored           . nil)
1144     (->uppercase        #x0397)
1145     (->titlecase        #x0397)
1146     (greek-iso8859-7    #x67)   ; \e-Fç\e-A
1147     ))
1148 (define-char
1149   '((name               . "FULLWIDTH GREEK SMALL LETTER ETA")
1150     (->ucs              . #x03B7)
1151     (general-category   letter lowercase) ; Normative Category
1152     (bidi-category      . "L")
1153     (mirrored           . nil)
1154     (->decomposition    wide #x03B7)
1155     (->uppercase
1156      ((name . "FULLWIDTH GREEK CAPITAL LETTER ETA")))
1157     (->titlecase
1158      ((name . "FULLWIDTH GREEK CAPITAL LETTER ETA")))
1159     (japanese-jisx0208-1978     #x26 #x47)      ; \e$(B&G\e(B
1160     (chinese-gb2312             #x26 #x47)      ; \e$(A&G\e(B
1161     (japanese-jisx0208          #x26 #x47)      ; \e$(B&G\e(B
1162     (korean-ksc5601             #x25 #x67)      ; \e$(C%g\e(B
1163     (chinese-cns11643-1         #x25 #x35)      ; \e$(G%5\e(B
1164     ))
1165 (define-char
1166   '((name               . "GREEK SMALL LETTER THETA")
1167     (ucs                . #x03B8)
1168     (general-category   letter lowercase) ; Normative Category
1169     (bidi-category      . "L")
1170     (mirrored           . nil)
1171     (->uppercase        #x0398)
1172     (->titlecase        #x0398)
1173     (greek-iso8859-7    #x68)   ; \e-Fè\e-A
1174     (ipa                #x48)   ; \e-0È\e-A
1175     ))
1176 (define-char
1177   '((name               . "FULLWIDTH GREEK SMALL LETTER THETA")
1178     (->ucs              . #x03B8)
1179     (general-category   letter lowercase) ; Normative Category
1180     (bidi-category      . "L")
1181     (mirrored           . nil)
1182     (->decomposition    wide #x03B8)
1183     (->uppercase
1184      ((name . "FULLWIDTH GREEK CAPITAL LETTER THETA")))
1185     (->titlecase
1186      ((name . "FULLWIDTH GREEK CAPITAL LETTER THETA")))
1187     (japanese-jisx0208-1978     #x26 #x48)      ; \e$(B&H\e(B
1188     (chinese-gb2312             #x26 #x48)      ; \e$(A&H\e(B
1189     (japanese-jisx0208          #x26 #x48)      ; \e$(B&H\e(B
1190     (korean-ksc5601             #x25 #x68)      ; \e$(C%h\e(B
1191     (chinese-cns11643-1         #x25 #x36)      ; \e$(G%6\e(B
1192     ))
1193 (define-char
1194   '((name               . "GREEK SMALL LETTER IOTA")
1195     (ucs                . #x03B9)
1196     (general-category   letter lowercase) ; Normative Category
1197     (bidi-category      . "L")
1198     (mirrored           . nil)
1199     (->uppercase        #x0399)
1200     (->titlecase        #x0399)
1201     (greek-iso8859-7    #x69)   ; \e-Fé\e-A
1202     ))
1203 (define-char
1204   '((name               . "FULLWIDTH GREEK SMALL LETTER IOTA")
1205     (->ucs              . #x03B9)
1206     (general-category   letter lowercase) ; Normative Category
1207     (bidi-category      . "L")
1208     (mirrored           . nil)
1209     (->decomposition    wide #x03B9)
1210     (->uppercase
1211      ((name . "FULLWIDTH GREEK CAPITAL LETTER IOTA")))
1212     (->titlecase
1213      ((name . "FULLWIDTH GREEK CAPITAL LETTER IOTA")))
1214     (japanese-jisx0208-1978     #x26 #x49)      ; \e$(B&I\e(B
1215     (chinese-gb2312             #x26 #x49)      ; \e$(A&I\e(B
1216     (japanese-jisx0208          #x26 #x49)      ; \e$(B&I\e(B
1217     (korean-ksc5601             #x25 #x69)      ; \e$(C%i\e(B
1218     (chinese-cns11643-1         #x25 #x37)      ; \e$(G%7\e(B
1219     ))
1220 (define-char
1221   '((name               . "GREEK SMALL LETTER KAPPA")
1222     (ucs                . #x03BA)
1223     (general-category   letter lowercase) ; Normative Category
1224     (bidi-category      . "L")
1225     (mirrored           . nil)
1226     (->uppercase        #x039A)
1227     (->titlecase        #x039A)
1228     (greek-iso8859-7    #x6A)   ; \e-Fê\e-A
1229     ))
1230 (define-char
1231   '((name               . "FULLWIDTH GREEK SMALL LETTER KAPPA")
1232     (->ucs              . #x03BA)
1233     (general-category   letter lowercase) ; Normative Category
1234     (bidi-category      . "L")
1235     (mirrored           . nil)
1236     (->decomposition    wide #x03BA)
1237     (->uppercase        #x039A)
1238     (->titlecase        #x039A)
1239     (japanese-jisx0208-1978     #x26 #x4A)      ; \e$(B&J\e(B
1240     (chinese-gb2312             #x26 #x4A)      ; \e$(A&J\e(B
1241     (japanese-jisx0208          #x26 #x4A)      ; \e$(B&J\e(B
1242     (korean-ksc5601             #x25 #x6A)      ; \e$(C%j\e(B
1243     (chinese-cns11643-1         #x25 #x38)      ; \e$(G%8\e(B
1244     ))
1245 (define-char
1246   '((name               . "GREEK SMALL LETTER LAMDA")
1247     (ucs                . #x03BB)
1248     (general-category   letter lowercase) ; Normative Category
1249     (bidi-category      . "L")
1250     (mirrored           . nil)
1251     (->uppercase        #x039B)
1252     (->titlecase        #x039B)
1253     (greek-iso8859-7    #x6B)   ; \e-Fë\e-A
1254     ))
1255 (define-char
1256   '((name               . "FULLWIDTH GREEK SMALL LETTER LAMDA")
1257     (->ucs              . #x03BB)
1258     (general-category   letter lowercase) ; Normative Category
1259     (bidi-category      . "L")
1260     (mirrored           . nil)
1261     (->decomposition    wide #x03BB)
1262     (->uppercase
1263      ((name . "FULLWIDTH GREEK CAPITAL LETTER LAMDA")))
1264     (->titlecase
1265      ((name . "FULLWIDTH GREEK CAPITAL LETTER LAMDA")))
1266     (japanese-jisx0208-1978     #x26 #x4B)      ; \e$(B&K\e(B
1267     (chinese-gb2312             #x26 #x4B)      ; \e$(A&K\e(B
1268     (japanese-jisx0208          #x26 #x4B)      ; \e$(B&K\e(B
1269     (korean-ksc5601             #x25 #x6B)      ; \e$(C%k\e(B
1270     (chinese-cns11643-1         #x25 #x39)      ; \e$(G%9\e(B
1271     ))
1272 (define-char
1273   '((name               . "GREEK SMALL LETTER MU")
1274     (ucs                . #x03BC)
1275     (general-category   letter lowercase) ; Normative Category
1276     (bidi-category      . "L")
1277     (mirrored           . nil)
1278     (->uppercase        #x039C)
1279     (->titlecase        #x039C)
1280     (greek-iso8859-7    #x6C)   ; \e-Fì\e-A
1281     ))
1282 (define-char
1283   '((name               . "FULLWIDTH GREEK SMALL LETTER MU")
1284     (->ucs              . #x03BC)
1285     (general-category   letter lowercase) ; Normative Category
1286     (bidi-category      . "L")
1287     (mirrored           . nil)
1288     (->decomposition    wide #x03BC)
1289     (->uppercase
1290      ((name . "FULLWIDTH GREEK CAPITAL LETTER MU")))
1291     (->titlecase
1292      ((name . "FULLWIDTH GREEK CAPITAL LETTER MU")))
1293     (japanese-jisx0208-1978     #x26 #x4C)      ; \e$(B&L\e(B
1294     (chinese-gb2312             #x26 #x4C)      ; \e$(A&L\e(B
1295     (japanese-jisx0208          #x26 #x4C)      ; \e$(B&L\e(B
1296     (korean-ksc5601             #x25 #x6C)      ; \e$(C%l\e(B
1297     (chinese-cns11643-1         #x25 #x3A)      ; \e$(G%:\e(B
1298     ))
1299 (define-char
1300   '((name               . "GREEK SMALL LETTER NU")
1301     (ucs                . #x03BD)
1302     (general-category   letter lowercase) ; Normative Category
1303     (bidi-category      . "L")
1304     (mirrored           . nil)
1305     (->uppercase        #x039D)
1306     (->titlecase        #x039D)
1307     (greek-iso8859-7    #x6D)   ; \e-Fí\e-A
1308     ))
1309 (define-char
1310   '((name               . "FULLWIDTH GREEK SMALL LETTER NU")
1311     (->ucs              . #x03BD)
1312     (general-category   letter lowercase) ; Normative Category
1313     (bidi-category      . "L")
1314     (mirrored           . nil)
1315     (->decomposition    wide #x03BD)
1316     (->uppercase
1317      ((name . "FULLWIDTH GREEK CAPITAL LETTER NU")))
1318     (->titlecase
1319      ((name . "FULLWIDTH GREEK CAPITAL LETTER NU")))
1320     (japanese-jisx0208-1978     #x26 #x4D)      ; \e$(B&M\e(B
1321     (chinese-gb2312             #x26 #x4D)      ; \e$(A&M\e(B
1322     (japanese-jisx0208          #x26 #x4D)      ; \e$(B&M\e(B
1323     (korean-ksc5601             #x25 #x6D)      ; \e$(C%m\e(B
1324     (chinese-cns11643-1         #x25 #x3B)      ; \e$(G%;\e(B
1325     ))
1326 (define-char
1327   '((name               . "GREEK SMALL LETTER XI")
1328     (ucs                . #x03BE)
1329     (general-category   letter lowercase) ; Normative Category
1330     (bidi-category      . "L")
1331     (mirrored           . nil)
1332     (->uppercase        #x039E)
1333     (->titlecase        #x039E)
1334     (greek-iso8859-7    #x6E)   ; \e-Fî\e-A
1335     ))
1336 (define-char
1337   '((name               . "FULLWIDTH GREEK SMALL LETTER XI")
1338     (->ucs              . #x03BE)
1339     (general-category   letter lowercase) ; Normative Category
1340     (bidi-category      . "L")
1341     (mirrored           . nil)
1342     (->decomposition    wide #x03BE)
1343     (->uppercase
1344      ((name . "FULLWIDTH GREEK CAPITAL LETTER XI")))
1345     (->titlecase
1346      ((name . "FULLWIDTH GREEK CAPITAL LETTER XI")))
1347     (japanese-jisx0208-1978     #x26 #x4E)      ; \e$(B&N\e(B
1348     (chinese-gb2312             #x26 #x4E)      ; \e$(A&N\e(B
1349     (japanese-jisx0208          #x26 #x4E)      ; \e$(B&N\e(B
1350     (korean-ksc5601             #x25 #x6E)      ; \e$(C%n\e(B
1351     (chinese-cns11643-1         #x25 #x3C)      ; \e$(G%<\e(B
1352     ))
1353 (define-char
1354   '((name               . "GREEK SMALL LETTER OMICRON")
1355     (ucs                . #x03BF)
1356     (general-category   letter lowercase) ; Normative Category
1357     (bidi-category      . "L")
1358     (mirrored           . nil)
1359     (->uppercase        #x039F)
1360     (->titlecase        #x039F)
1361     (greek-iso8859-7    #x6F)   ; \e-Fï\e-A
1362     ))
1363 (define-char
1364   '((name               . "FULLWIDTH GREEK SMALL LETTER OMICRON")
1365     (->ucs              . #x03BF)
1366     (general-category   letter lowercase) ; Normative Category
1367     (bidi-category      . "L")
1368     (mirrored           . nil)
1369     (->decomposition    wide #x03BF)
1370     (->uppercase
1371      ((name . "FULLWIDTH GREEK CAPITAL LETTER OMICRON")))
1372     (->titlecase
1373      ((name . "FULLWIDTH GREEK CAPITAL LETTER OMICRON")))
1374     (japanese-jisx0208-1978     #x26 #x4F)      ; \e$(B&O\e(B
1375     (chinese-gb2312             #x26 #x4F)      ; \e$(A&O\e(B
1376     (japanese-jisx0208          #x26 #x4F)      ; \e$(B&O\e(B
1377     (korean-ksc5601             #x25 #x6F)      ; \e$(C%o\e(B
1378     (chinese-cns11643-1         #x25 #x3D)      ; \e$(G%=\e(B
1379     ))
1380 (define-char
1381   '((name               . "GREEK SMALL LETTER PI")
1382     (ucs                . #x03C0)
1383     (general-category   letter lowercase) ; Normative Category
1384     (bidi-category      . "L")
1385     (mirrored           . nil)
1386     (->uppercase        #x03A0)
1387     (->titlecase        #x03A0)
1388     (greek-iso8859-7    #x70)   ; \e-Fð\e-A
1389     ))
1390 (define-char
1391   '((name               . "FULLWIDTH GREEK SMALL LETTER PI")
1392     (->ucs              . #x03C0)
1393     (general-category   letter lowercase) ; Normative Category
1394     (bidi-category      . "L")
1395     (mirrored           . nil)
1396     (->decomposition    wide #x03C0)
1397     (->uppercase
1398      ((name . "FULLWIDTH GREEK CAPITAL LETTER PI")))
1399     (->titlecase
1400      ((name . "FULLWIDTH GREEK CAPITAL LETTER PI")))
1401     (japanese-jisx0208-1978     #x26 #x50)      ; \e$(B&P\e(B
1402     (chinese-gb2312             #x26 #x50)      ; \e$(A&P\e(B
1403     (japanese-jisx0208          #x26 #x50)      ; \e$(B&P\e(B
1404     (korean-ksc5601             #x25 #x70)      ; \e$(C%p\e(B
1405     (chinese-cns11643-1         #x25 #x3E)      ; \e$(G%>\e(B
1406     ))
1407 (define-char
1408   '((name               . "GREEK SMALL LETTER RHO")
1409     (ucs                . #x03C1)
1410     (general-category   letter lowercase) ; Normative Category
1411     (bidi-category      . "L")
1412     (mirrored           . nil)
1413     (->uppercase        #x03A1)
1414     (->titlecase        #x03A1)
1415     (greek-iso8859-7    #x71)   ; \e-Fñ\e-A
1416     ))
1417 (define-char
1418   '((name               . "FULLWIDTH GREEK SMALL LETTER RHO")
1419     (->ucs              . #x03C1)
1420     (general-category   letter lowercase) ; Normative Category
1421     (bidi-category      . "L")
1422     (mirrored           . nil)
1423     (->decomposition    wide #x03C1)
1424     (->uppercase
1425      ((name . "FULLWIDTH GREEK CAPITAL LETTER RHO")))
1426     (->titlecase
1427      ((name . "FULLWIDTH GREEK CAPITAL LETTER RHO")))
1428     (japanese-jisx0208-1978     #x26 #x51)      ; \e$(B&Q\e(B
1429     (chinese-gb2312             #x26 #x51)      ; \e$(A&Q\e(B
1430     (japanese-jisx0208          #x26 #x51)      ; \e$(B&Q\e(B
1431     (korean-ksc5601             #x25 #x71)      ; \e$(C%q\e(B
1432     (chinese-cns11643-1         #x25 #x3F)      ; \e$(G%?\e(B
1433     ))
1434 (define-char
1435   '((name               . "GREEK SMALL LETTER FINAL SIGMA")
1436     (ucs                . #x03C2)
1437     (general-category   letter lowercase) ; Normative Category
1438     (bidi-category      . "L")
1439     (mirrored           . nil)
1440     (->uppercase        #x03A3)
1441     (->titlecase        #x03A3)
1442     (greek-iso8859-7    #x72)   ; \e-Fò\e-A
1443     ))
1444 (define-char
1445   '((name               . "FULLWIDTH GREEK SMALL LETTER FINAL SIGMA")
1446     (->ucs              . #x03C2)
1447     (general-category   letter lowercase) ; Normative Category
1448     (bidi-category      . "L")
1449     (mirrored           . nil)
1450     (->decomposition    wide #x03C2)
1451     (->uppercase
1452      ((name . "FULLWIDTH GREEK CAPITAL LETTER FINAL SIGMA")))
1453     (->titlecase
1454      ((name . "FULLWIDTH GREEK CAPITAL LETTER FINAL SIGMA")))
1455     (japanese-jisx0212  #x26 #x78)      ; \e$(D&x\e(B
1456     ))
1457 (define-char
1458   '((name               . "GREEK SMALL LETTER SIGMA")
1459     (ucs                . #x03C3)
1460     (general-category   letter lowercase) ; Normative Category
1461     (bidi-category      . "L")
1462     (mirrored           . nil)
1463     (->uppercase        #x03A3)
1464     (->titlecase        #x03A3)
1465     (greek-iso8859-7    #x73)   ; \e-Fó\e-A
1466     ))
1467 (define-char
1468   '((name               . "FULLWIDTH GREEK SMALL LETTER SIGMA")
1469     (->ucs              . #x03C3)
1470     (general-category   letter lowercase) ; Normative Category
1471     (bidi-category      . "L")
1472     (mirrored           . nil)
1473     (->decomposition    wide #x03C3)
1474     (->uppercase
1475      ((name . "FULLWIDTH GREEK CAPITAL LETTER SIGMA")))
1476     (->titlecase
1477      ((name . "FULLWIDTH GREEK CAPITAL LETTER SIGMA")))
1478     (japanese-jisx0208-1978     #x26 #x52)      ; \e$(B&R\e(B
1479     (chinese-gb2312             #x26 #x52)      ; \e$(A&R\e(B
1480     (japanese-jisx0208          #x26 #x52)      ; \e$(B&R\e(B
1481     (korean-ksc5601             #x25 #x72)      ; \e$(C%r\e(B
1482     (chinese-cns11643-1         #x25 #x40)      ; \e$(G%@\e(B
1483     ))
1484 (define-char
1485   '((name               . "GREEK SMALL LETTER TAU")
1486     (ucs                . #x03C4)
1487     (general-category   letter lowercase) ; Normative Category
1488     (bidi-category      . "L")
1489     (mirrored           . nil)
1490     (->uppercase        #x03A4)
1491     (->titlecase        #x03A4)
1492     (greek-iso8859-7    #x74)   ; \e-Fô\e-A
1493     ))
1494 (define-char
1495   '((name               . "FULLWIDTH GREEK SMALL LETTER TAU")
1496     (->ucs              . #x03C4)
1497     (general-category   letter lowercase) ; Normative Category
1498     (bidi-category      . "L")
1499     (mirrored           . nil)
1500     (->decomposition    wide #x03C4)
1501     (->uppercase
1502      ((name . "FULLWIDTH GREEK CAPITAL LETTER TAU")))
1503     (->titlecase
1504      ((name . "FULLWIDTH GREEK CAPITAL LETTER TAU")))
1505     (japanese-jisx0208-1978     #x26 #x53)      ; \e$(B&S\e(B
1506     (chinese-gb2312             #x26 #x53)      ; \e$(A&S\e(B
1507     (japanese-jisx0208          #x26 #x53)      ; \e$(B&S\e(B
1508     (korean-ksc5601             #x25 #x73)      ; \e$(C%s\e(B
1509     (chinese-cns11643-1         #x25 #x41)      ; \e$(G%A\e(B
1510     ))
1511 (define-char
1512   '((name               . "GREEK SMALL LETTER UPSILON")
1513     (ucs                . #x03C5)
1514     (general-category   letter lowercase) ; Normative Category
1515     (bidi-category      . "L")
1516     (mirrored           . nil)
1517     (->uppercase        #x03A5)
1518     (->titlecase        #x03A5)
1519     (greek-iso8859-7    #x75)   ; \e-Fõ\e-A
1520     ))
1521 (define-char
1522   '((name               . "FULLWIDTH GREEK SMALL LETTER UPSILON")
1523     (->ucs              . #x03C5)
1524     (general-category   letter lowercase) ; Normative Category
1525     (bidi-category      . "L")
1526     (mirrored           . nil)
1527     (->decomposition    wide #x03C5)
1528     (->uppercase
1529      ((name . "FULLWIDTH GREEK CAPITAL LETTER UPSILON")))
1530     (->titlecase
1531      ((name . "FULLWIDTH GREEK CAPITAL LETTER UPSILON")))
1532     (japanese-jisx0208-1978     #x26 #x54)      ; \e$(B&T\e(B
1533     (chinese-gb2312             #x26 #x54)      ; \e$(A&T\e(B
1534     (japanese-jisx0208          #x26 #x54)      ; \e$(B&T\e(B
1535     (korean-ksc5601             #x25 #x74)      ; \e$(C%t\e(B
1536     (chinese-cns11643-1         #x25 #x42)      ; \e$(G%B\e(B
1537     ))
1538 (define-char
1539   '((name               . "GREEK SMALL LETTER PHI")
1540     (ucs                . #x03C6)
1541     (general-category   letter lowercase) ; Normative Category
1542     (bidi-category      . "L")
1543     (mirrored           . nil)
1544     (->uppercase        #x03A6)
1545     (->titlecase        #x03A6)
1546     (greek-iso8859-7    #x76)   ; \e-Fö\e-A
1547     ))
1548 (define-char
1549   '((name               . "FULLWIDTH GREEK SMALL LETTER PHI")
1550     (->ucs              . #x03C6)
1551     (general-category   letter lowercase) ; Normative Category
1552     (bidi-category      . "L")
1553     (mirrored           . nil)
1554     (->decomposition    wide #x03C6)
1555     (->uppercase
1556      ((name . "FULLWIDTH GREEK CAPITAL LETTER PHI")))
1557     (->titlecase
1558      ((name . "FULLWIDTH GREEK CAPITAL LETTER PHI")))
1559     (japanese-jisx0208-1978     #x26 #x55)      ; \e$(B&U\e(B
1560     (chinese-gb2312             #x26 #x55)      ; \e$(A&U\e(B
1561     (japanese-jisx0208          #x26 #x55)      ; \e$(B&U\e(B
1562     (korean-ksc5601             #x25 #x75)      ; \e$(C%u\e(B
1563     (chinese-cns11643-1         #x25 #x43)      ; \e$(G%C\e(B
1564     ))
1565 (define-char
1566   '((name               . "GREEK SMALL LETTER CHI")
1567     (ucs                . #x03C7)
1568     (general-category   letter lowercase) ; Normative Category
1569     (bidi-category      . "L")
1570     (mirrored           . nil)
1571     (->uppercase        #x03A7)
1572     (->titlecase        #x03A7)
1573     (greek-iso8859-7    #x77)   ; \e-F÷\e-A
1574     ))
1575 (define-char
1576   '((name               . "FULLWIDTH GREEK SMALL LETTER CHI")
1577     (->ucs              . #x03C7)
1578     (general-category   letter lowercase) ; Normative Category
1579     (bidi-category      . "L")
1580     (mirrored           . nil)
1581     (->decomposition    wide #x03C7)
1582     (->uppercase
1583      ((name . "FULLWIDTH GREEK CAPITAL LETTER CHI")))
1584     (->titlecase
1585      ((name . "FULLWIDTH GREEK CAPITAL LETTER CHI")))
1586     (japanese-jisx0208-1978     #x26 #x56)      ; \e$(B&V\e(B
1587     (chinese-gb2312             #x26 #x56)      ; \e$(A&V\e(B
1588     (japanese-jisx0208          #x26 #x56)      ; \e$(B&V\e(B
1589     (korean-ksc5601             #x25 #x76)      ; \e$(C%v\e(B
1590     (chinese-cns11643-1         #x25 #x44)      ; \e$(G%D\e(B
1591     ))
1592 (define-char
1593   '((name               . "GREEK SMALL LETTER PSI")
1594     (ucs                . #x03C8)
1595     (general-category   letter lowercase) ; Normative Category
1596     (bidi-category      . "L")
1597     (mirrored           . nil)
1598     (->uppercase        #x03A8)
1599     (->titlecase        #x03A8)
1600     (greek-iso8859-7    #x78)   ; \e-Fø\e-A
1601     ))
1602 (define-char
1603   '((name               . "FULLWIDTH GREEK SMALL LETTER PSI")
1604     (->ucs              . #x03C8)
1605     (general-category   letter lowercase) ; Normative Category
1606     (bidi-category      . "L")
1607     (mirrored           . nil)
1608     (->decomposition    wide #x03C8)
1609     (->uppercase
1610      ((name . "FULLWIDTH GREEK CAPITAL LETTER PSI")))
1611     (->titlecase
1612      ((name . "FULLWIDTH GREEK CAPITAL LETTER PSI")))
1613     (japanese-jisx0208-1978     #x26 #x57)      ; \e$(B&W\e(B
1614     (chinese-gb2312             #x26 #x57)      ; \e$(A&W\e(B
1615     (japanese-jisx0208          #x26 #x57)      ; \e$(B&W\e(B
1616     (korean-ksc5601             #x25 #x77)      ; \e$(C%w\e(B
1617     (chinese-cns11643-1         #x25 #x45)      ; \e$(G%E\e(B
1618     ))
1619 (define-char
1620   '((name               . "GREEK SMALL LETTER OMEGA")
1621     (ucs                . #x03C9)
1622     (general-category   letter lowercase) ; Normative Category
1623     (bidi-category      . "L")
1624     (mirrored           . nil)
1625     (->uppercase        #x03A9)
1626     (->titlecase        #x03A9)
1627     (greek-iso8859-7    #x79)   ; \e-Fù\e-A
1628     ))
1629 (define-char
1630   '((name               . "FULLWIDTH GREEK SMALL LETTER OMEGA")
1631     (->ucs              . #x03C9)
1632     (general-category   letter lowercase) ; Normative Category
1633     (bidi-category      . "L")
1634     (mirrored           . nil)
1635     (->decomposition    wide #x03C9)
1636     (->uppercase
1637      ((name . "FULLWIDTH GREEK CAPITAL LETTER OMEGA")))
1638     (->titlecase
1639      ((name . "FULLWIDTH GREEK CAPITAL LETTER OMEGA")))
1640     (japanese-jisx0208-1978     #x26 #x58)      ; \e$(B&X\e(B
1641     (chinese-gb2312             #x26 #x58)      ; \e$(A&X\e(B
1642     (japanese-jisx0208          #x26 #x58)      ; \e$(B&X\e(B
1643     (korean-ksc5601             #x25 #x78)      ; \e$(C%x\e(B
1644     (chinese-cns11643-1         #x25 #x46)      ; \e$(G%F\e(B
1645     ))
1646 (define-char
1647   '((name               . "GREEK SMALL LETTER IOTA WITH DIALYTIKA")
1648     (ucs                . #x03CA)
1649     (general-category   letter lowercase) ; Normative Category
1650     (bidi-category      . "L")
1651     (mirrored           . nil)
1652     (->decomposition    #x03B9 #x0308)
1653     (->uppercase        #x03AA)
1654     (->titlecase        #x03AA)
1655     (greek-iso8859-7    #x7A)   ; \e-Fú\e-A
1656     ))
1657 (define-char
1658   '((name . "FULLWIDTH GREEK SMALL LETTER IOTA WITH DIALYTIKA")
1659     (->ucs              . #x03CA)
1660     (general-category   letter lowercase) ; Normative Category
1661     (bidi-category      . "L")
1662     (mirrored           . nil)
1663     (->decomposition    wide #x03CA)
1664     (->uppercase
1665      ((name . "FULLWIDTH GREEK CAPITAL LETTER IOTA WITH DIALYTIKA")))
1666     (->titlecase
1667      ((name . "FULLWIDTH GREEK CAPITAL LETTER IOTA WITH DIALYTIKA")))
1668     (japanese-jisx0212  #x26 #x75)      ; \e$(D&u\e(B
1669     ))
1670 (define-char
1671   '((name               . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA")
1672     (ucs                . #x03CB)
1673     (general-category   letter lowercase) ; Normative Category
1674     (bidi-category      . "L")
1675     (mirrored           . nil)
1676     (->decomposition    #x03C5 #x0308)
1677     (->uppercase        #x03AB)
1678     (->titlecase        #x03AB)
1679     (greek-iso8859-7    #x7B)   ; \e-Fû\e-A
1680     ))
1681 (define-char
1682   '((name . "FULLWIDTH GREEK SMALL LETTER UPSILON WITH DIALYTIKA")
1683     (->ucs              . #x03CB)
1684     (general-category   letter lowercase) ; Normative Category
1685     (bidi-category      . "L")
1686     (mirrored           . nil)
1687     (->decomposition    wide #x03CB)
1688     (->uppercase
1689      ((name . "FULLWIDTH GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA")))
1690     (->titlecase
1691      ((name . "FULLWIDTH GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA")))
1692     (japanese-jisx0212  #x26 #x7A)      ; \e$(D&z\e(B
1693     ))
1694 (define-char
1695   '((name               . "GREEK SMALL LETTER OMICRON WITH TONOS")
1696     (ucs                . #x03CC)
1697     (general-category   letter lowercase) ; Normative Category
1698     (bidi-category      . "L")
1699     (mirrored           . nil)
1700     (->decomposition    #x03BF #x0301)
1701     (->uppercase        #x038C)
1702     (->titlecase        #x038C)
1703     (greek-iso8859-7    #x7C)   ; \e-Fü\e-A
1704     ))
1705 (define-char
1706   '((name               . "FULLWIDTH GREEK SMALL LETTER OMICRON WITH TONOS")
1707     (->ucs              . #x03CC)
1708     (general-category   letter lowercase) ; Normative Category
1709     (bidi-category      . "L")
1710     (mirrored           . nil)
1711     (->decomposition    wide #x03CC)
1712     (->uppercase
1713      ((name . "FULLWIDTH GREEK CAPITAL LETTER OMICRON WITH TONOS")))
1714     (->titlecase
1715      ((name . "FULLWIDTH GREEK CAPITAL LETTER OMICRON WITH TONOS")))
1716     (japanese-jisx0212  #x26 #x77)      ; \e$(D&w\e(B
1717     ))
1718 (define-char
1719   '((name               . "GREEK SMALL LETTER UPSILON WITH TONOS")
1720     (ucs                . #x03CD)
1721     (general-category   letter lowercase) ; Normative Category
1722     (bidi-category      . "L")
1723     (mirrored           . nil)
1724     (->decomposition    #x03C5 #x0301)
1725     (->uppercase        #x038E)
1726     (->titlecase        #x038E)
1727     (greek-iso8859-7    #x7D)   ; \e-Fý\e-A
1728     ))
1729 (define-char
1730   '((name               . "FULLWIDTH GREEK SMALL LETTER UPSILON WITH TONOS")
1731     (->ucs              . #x03CD)
1732     (general-category   letter lowercase) ; Normative Category
1733     (bidi-category      . "L")
1734     (mirrored           . nil)
1735     (->decomposition    wide #x03CD)
1736     (->uppercase
1737      ((name . "FULLWIDTH GREEK CAPITAL LETTER UPSILON WITH TONOS")))
1738     (->titlecase
1739      ((name . "FULLWIDTH GREEK CAPITAL LETTER UPSILON WITH TONOS")))
1740     (japanese-jisx0212  #x26 #x79)      ; \e$(D&y\e(B
1741     ))
1742 (define-char
1743   '((name               . "GREEK SMALL LETTER OMEGA WITH TONOS")
1744     (ucs                . #x03CE)
1745     (general-category   letter lowercase) ; Normative Category
1746     (bidi-category      . "L")
1747     (mirrored           . nil)
1748     (->decomposition    #x03C9 #x0301)
1749     (->uppercase        #x038F)
1750     (->titlecase        #x038F)
1751     (greek-iso8859-7    #x7E)   ; \e-Fþ\e-A
1752     ))
1753 (define-char
1754   '((name               . "FULLWIDTH GREEK SMALL LETTER OMEGA WITH TONOS")
1755     (->ucs              . #x03CE)
1756     (general-category   letter lowercase) ; Normative Category
1757     (bidi-category      . "L")
1758     (mirrored           . nil)
1759     (->decomposition    wide #x03CE)
1760     (->uppercase
1761      ((name . "FULLWIDTH GREEK CAPITAL LETTER OMEGA WITH TONOS")))
1762     (->titlecase
1763      ((name . "FULLWIDTH GREEK CAPITAL LETTER OMEGA WITH TONOS")))
1764     (japanese-jisx0212  #x26 #x7C)      ; \e$(D&|\e(B
1765     ))
1766 (define-char
1767   '((name               . "GREEK BETA SYMBOL")
1768     (ucs                . #x03D0)
1769     (general-category   letter lowercase) ; Normative Category
1770     (bidi-category      . "L")
1771     (mirrored           . nil)
1772     (->decomposition    compat #x03B2)
1773     (->uppercase        #x0392)
1774     (->titlecase        #x0392)
1775     ))
1776 (define-char
1777   '((name               . "GREEK THETA SYMBOL")
1778     (ucs                . #x03D1)
1779     (general-category   letter lowercase) ; Normative Category
1780     (bidi-category      . "L")
1781     (mirrored           . nil)
1782     (->decomposition    compat #x03B8)
1783     (->uppercase        #x0398)
1784     (->titlecase        #x0398)
1785     ))
1786 (define-char
1787   '((name               . "GREEK UPSILON WITH HOOK SYMBOL")
1788     (ucs                . #x03D2)
1789     (general-category   letter uppercase) ; Normative Category
1790     (bidi-category      . "L")
1791     (mirrored           . nil)
1792     (->decomposition    compat #x03A5)
1793     ))
1794 (define-char
1795   '((name               . "GREEK UPSILON WITH ACUTE AND HOOK SYMBOL")
1796     (ucs                . #x03D3)
1797     (general-category   letter uppercase) ; Normative Category
1798     (bidi-category      . "L")
1799     (mirrored           . nil)
1800     (->decomposition    #x03D2 #x0301)
1801     ))
1802 (define-char
1803   '((name               . "GREEK UPSILON WITH DIAERESIS AND HOOK SYMBOL")
1804     (ucs                . #x03D4)
1805     (general-category   letter uppercase) ; Normative Category
1806     (bidi-category      . "L")
1807     (mirrored           . nil)
1808     (->decomposition    #x03D2 #x0308)
1809     ))
1810 (define-char
1811   '((name               . "GREEK PHI SYMBOL")
1812     (ucs                . #x03D5)
1813     (general-category   letter lowercase) ; Normative Category
1814     (bidi-category      . "L")
1815     (mirrored           . nil)
1816     (->decomposition    compat #x03C6)
1817     (->uppercase        #x03A6)
1818     (->titlecase        #x03A6)
1819     ))
1820 (define-char
1821   '((name               . "GREEK PI SYMBOL")
1822     (ucs                . #x03D6)
1823     (general-category   letter lowercase) ; Normative Category
1824     (bidi-category      . "L")
1825     (mirrored           . nil)
1826     (->decomposition    compat #x03C0)
1827     (->uppercase        #x03A0)
1828     (->titlecase        #x03A0)
1829     ))
1830 (define-char
1831   '((name               . "GREEK KAI SYMBOL")
1832     (ucs                . #x03D7)
1833     (general-category   letter lowercase) ; Normative Category
1834     (bidi-category      . "L")
1835     (mirrored           . nil)
1836     ))
1837 (define-char
1838   '((name               . "GREEK LETTER STIGMA")
1839     (ucs                . #x03DA)
1840     (general-category   letter uppercase) ; Normative Category
1841     (bidi-category      . "L")
1842     (mirrored           . nil)
1843     (->lowercase        #x03DB)
1844     ))
1845 (define-char
1846   '((name               . "GREEK SMALL LETTER STIGMA")
1847     (ucs                . #x03DB)
1848     (general-category   letter lowercase) ; Normative Category
1849     (bidi-category      . "L")
1850     (mirrored           . nil)
1851     (->uppercase        #x03DA)
1852     (->titlecase        #x03DA)
1853     ))
1854 (define-char
1855   '((name               . "GREEK LETTER DIGAMMA")
1856     (ucs                . #x03DC)
1857     (general-category   letter uppercase) ; Normative Category
1858     (bidi-category      . "L")
1859     (mirrored           . nil)
1860     (->lowercase        #x03DD)
1861     ))
1862 (define-char
1863   '((name               . "GREEK SMALL LETTER DIGAMMA")
1864     (ucs                . #x03DD)
1865     (general-category   letter lowercase) ; Normative Category
1866     (bidi-category      . "L")
1867     (mirrored           . nil)
1868     (->uppercase        #x03DC)
1869     (->titlecase        #x03DC)
1870     ))
1871 (define-char
1872   '((name               . "GREEK LETTER KOPPA")
1873     (ucs                . #x03DE)
1874     (general-category   letter uppercase) ; Normative Category
1875     (bidi-category      . "L")
1876     (mirrored           . nil)
1877     (->lowercase        #x03DF)
1878     ))
1879 (define-char
1880   '((name               . "GREEK SMALL LETTER KOPPA")
1881     (ucs                . #x03DF)
1882     (general-category   letter lowercase) ; Normative Category
1883     (bidi-category      . "L")
1884     (mirrored           . nil)
1885     (->uppercase        #x03DE)
1886     (->titlecase        #x03DE)
1887     ))
1888 (define-char
1889   '((name               . "GREEK LETTER SAMPI")
1890     (ucs                . #x03E0)
1891     (general-category   letter uppercase) ; Normative Category
1892     (bidi-category      . "L")
1893     (mirrored           . nil)
1894     (->lowercase        #x03E1)
1895     ))
1896 (define-char
1897   '((name               . "GREEK SMALL LETTER SAMPI")
1898     (ucs                . #x03E1)
1899     (general-category   letter lowercase) ; Normative Category
1900     (bidi-category      . "L")
1901     (mirrored           . nil)
1902     (->uppercase        #x03E0)
1903     (->titlecase        #x03E0)
1904     ))
1905 (define-char
1906   '((name               . "COPTIC CAPITAL LETTER SHEI")
1907     (ucs                . #x03E2)
1908     (general-category   letter uppercase) ; Normative Category
1909     (bidi-category      . "L")
1910     (mirrored           . nil)
1911     (->lowercase        #x03E3)
1912     ))
1913 (define-char
1914   '((name               . "COPTIC SMALL LETTER SHEI")
1915     (ucs                . #x03E3)
1916     (general-category   letter lowercase) ; Normative Category
1917     (bidi-category      . "L")
1918     (mirrored           . nil)
1919     (->uppercase        #x03E2)
1920     (->titlecase        #x03E2)
1921     ))
1922 (define-char
1923   '((name               . "COPTIC CAPITAL LETTER FEI")
1924     (ucs                . #x03E4)
1925     (general-category   letter uppercase) ; Normative Category
1926     (bidi-category      . "L")
1927     (mirrored           . nil)
1928     (->lowercase        #x03E5)
1929     ))
1930 (define-char
1931   '((name               . "COPTIC SMALL LETTER FEI")
1932     (ucs                . #x03E5)
1933     (general-category   letter lowercase) ; Normative Category
1934     (bidi-category      . "L")
1935     (mirrored           . nil)
1936     (->uppercase        #x03E4)
1937     (->titlecase        #x03E4)
1938     ))
1939 (define-char
1940   '((name               . "COPTIC CAPITAL LETTER KHEI")
1941     (ucs                . #x03E6)
1942     (general-category   letter uppercase) ; Normative Category
1943     (bidi-category      . "L")
1944     (mirrored           . nil)
1945     (->lowercase        #x03E7)
1946     ))
1947 (define-char
1948   '((name               . "COPTIC SMALL LETTER KHEI")
1949     (ucs                . #x03E7)
1950     (general-category   letter lowercase) ; Normative Category
1951     (bidi-category      . "L")
1952     (mirrored           . nil)
1953     (->uppercase        #x03E6)
1954     (->titlecase        #x03E6)
1955     ))
1956 (define-char
1957   '((name               . "COPTIC CAPITAL LETTER HORI")
1958     (ucs                . #x03E8)
1959     (general-category   letter uppercase) ; Normative Category
1960     (bidi-category      . "L")
1961     (mirrored           . nil)
1962     (->lowercase        #x03E9)
1963     ))
1964 (define-char
1965   '((name               . "COPTIC SMALL LETTER HORI")
1966     (ucs                . #x03E9)
1967     (general-category   letter lowercase) ; Normative Category
1968     (bidi-category      . "L")
1969     (mirrored           . nil)
1970     (->uppercase        #x03E8)
1971     (->titlecase        #x03E8)
1972     ))
1973 (define-char
1974   '((name               . "COPTIC CAPITAL LETTER GANGIA")
1975     (ucs                . #x03EA)
1976     (general-category   letter uppercase) ; Normative Category
1977     (bidi-category      . "L")
1978     (mirrored           . nil)
1979     (->lowercase        #x03EB)
1980     ))
1981 (define-char
1982   '((name               . "COPTIC SMALL LETTER GANGIA")
1983     (ucs                . #x03EB)
1984     (general-category   letter lowercase) ; Normative Category
1985     (bidi-category      . "L")
1986     (mirrored           . nil)
1987     (->uppercase        #x03EA)
1988     (->titlecase        #x03EA)
1989     ))
1990 (define-char
1991   '((name               . "COPTIC CAPITAL LETTER SHIMA")
1992     (ucs                . #x03EC)
1993     (general-category   letter uppercase) ; Normative Category
1994     (bidi-category      . "L")
1995     (mirrored           . nil)
1996     (->lowercase        #x03ED)
1997     ))
1998 (define-char
1999   '((name               . "COPTIC SMALL LETTER SHIMA")
2000     (ucs                . #x03ED)
2001     (general-category   letter lowercase) ; Normative Category
2002     (bidi-category      . "L")
2003     (mirrored           . nil)
2004     (->uppercase        #x03EC)
2005     (->titlecase        #x03EC)
2006     ))
2007 (define-char
2008   '((name               . "COPTIC CAPITAL LETTER DEI")
2009     (ucs                . #x03EE)
2010     (general-category   letter uppercase) ; Normative Category
2011     (bidi-category      . "L")
2012     (mirrored           . nil)
2013     (->lowercase        #x03EF)
2014     ))
2015 (define-char
2016   '((name               . "COPTIC SMALL LETTER DEI")
2017     (ucs                . #x03EF)
2018     (general-category   letter lowercase) ; Normative Category
2019     (bidi-category      . "L")
2020     (mirrored           . nil)
2021     (->uppercase        #x03EE)
2022     (->titlecase        #x03EE)
2023     ))
2024 (define-char
2025   '((name               . "GREEK KAPPA SYMBOL")
2026     (ucs                . #x03F0)
2027     (general-category   letter lowercase) ; Normative Category
2028     (bidi-category      . "L")
2029     (mirrored           . nil)
2030     (->decomposition    compat #x03BA)
2031     (->uppercase        #x039A)
2032     (->titlecase        #x039A)
2033     ))
2034 (define-char
2035   '((name               . "GREEK RHO SYMBOL")
2036     (ucs                . #x03F1)
2037     (general-category   letter lowercase) ; Normative Category
2038     (bidi-category      . "L")
2039     (mirrored           . nil)
2040     (->decomposition    compat #x03C1)
2041     (->uppercase        #x03A1)
2042     (->titlecase        #x03A1)
2043     ))
2044 (define-char
2045   '((name               . "GREEK LUNATE SIGMA SYMBOL")
2046     (ucs                . #x03F2)
2047     (general-category   letter lowercase) ; Normative Category
2048     (bidi-category      . "L")
2049     (mirrored           . nil)
2050     (->decomposition    compat #x03C2)
2051     (->uppercase        #x03A3)
2052     (->titlecase        #x03A3)
2053     ))
2054 (define-char
2055   '((name               . "GREEK LETTER YOT")
2056     (ucs                . #x03F3)
2057     (general-category   letter lowercase) ; Normative Category
2058     (bidi-category      . "L")
2059     (mirrored           . nil)
2060     ))