From 52511678df00cd20056ca9a913a3ba6f3cdb2e21 Mon Sep 17 00:00:00 2001 From: tomo Date: Tue, 24 Jul 2001 06:02:48 +0000 Subject: [PATCH] (U+****): Add `->fullwidth'. (fullwidth *): Use `=>ucs' instead of `->ucs'; add `<-fullwidth'. - Use ``character-reference'' style [alist] instead of UCS code-point [hex integer] as the format of `->lowercase' and `->uppercase'. - Omit `->titlecase' if the value of it has the same value of `->uppercase'. --- lisp/utf-2000/u00370-Greek.el | 1809 +++++++++++++++++++++++++++++++---------- 1 file changed, 1371 insertions(+), 438 deletions(-) diff --git a/lisp/utf-2000/u00370-Greek.el b/lisp/utf-2000/u00370-Greek.el index 5057ef9..51709ed 100644 --- a/lisp/utf-2000/u00370-Greek.el +++ b/lisp/utf-2000/u00370-Greek.el @@ -5,7 +5,7 @@ (mirrored . nil) (iso-10646-comment . "Dexia keraia") (->decomposition #x02B9) - (ucs . #x374) ; Í´ + (ucs . #x0374) ; Í´ )) (define-char '((name . "GREEK LOWER NUMERAL SIGN") @@ -13,7 +13,7 @@ (bidi-category . "ON") (mirrored . nil) (iso-10646-comment . "Aristeri keraia") - (ucs . #x375) ; ͵ + (ucs . #x0375) ; ͵ )) (define-char '((name . "GREEK YPOGEGRAMMENI") @@ -21,7 +21,7 @@ (bidi-category . "L") (mirrored . nil) (->decomposition compat #x0020 #x0345) - (ucs . #x37A) ; ͺ + (ucs . #x037A) ; ͺ )) (define-char '((name . "GREEK QUESTION MARK") @@ -30,7 +30,7 @@ (mirrored . nil) (iso-10646-comment . "Erotimatiko") (->decomposition #x003B) - (ucs . #x37E) ; ; + (ucs . #x037E) ; ; )) (define-char '((name . "GREEK TONOS") @@ -38,16 +38,24 @@ (bidi-category . "ON") (mirrored . nil) (->decomposition compat #x0020 #x0301) + (->fullwidth + ((name . "fullwidth greek tonos") + (japanese-jisx0212 . #x2238) ; ø»Š¦… + )) (greek-iso8859-7 . #xB4) ; øº’»´ - (ucs . #x384) ; ΄ + (ucs . #x0384) ; ΄ )) (define-char - '((name . "FULLWIDTH GREEK TONOS") - (->ucs . #x0384) ; ΄ + '((name . "fullwidth greek tonos") + (=>ucs . #x0384) ; ΄ (general-category symbol modifier) ; Informative Category (bidi-category . "ON") (mirrored . nil) (->decomposition wide #x0384) + (<-fullwidth + ((name . "GREEK TONOS") + (ucs . #x0384) ; ΄ + )) (japanese-jisx0212 . #x2238) ; ø»Š¦… )) (define-char @@ -56,16 +64,24 @@ (bidi-category . "ON") (mirrored . nil) (->decomposition #x00A8 #x0301) + (->fullwidth + ((name . "fullwidth greek dialytika tonos") + (japanese-jisx0212 . #x2239) ; ø»Š¦† + )) (greek-iso8859-7 . #xB5) ; øº’»µ - (ucs . #x385) ; ΅ + (ucs . #x0385) ; ΅ )) (define-char - '((name . "FULLWIDTH GREEK DIALYTIKA TONOS") - (->ucs . #x0385) ; ΅ + '((name . "fullwidth greek dialytika tonos") + (=>ucs . #x0385) ; ΅ (general-category symbol modifier) ; Informative Category (bidi-category . "ON") (mirrored . nil) (->decomposition wide #x0385) + (<-fullwidth + ((name . "GREEK DIALYTIKA TONOS") + (ucs . #x0385) ; ΅ + )) (japanese-jisx0212 . #x2239) ; ø»Š¦† )) (define-char @@ -74,19 +90,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x0391 #x0301) - (->lowercase #x03AC) + (->fullwidth + ((name . "fullwidth greek capital letter alpha with tonos") + (japanese-jisx0212 . #x2661) ; ø»Š¬¦ + )) + (->lowercase + ((name . "GREEK SMALL LETTER ALPHA WITH TONOS") + (ucs . #x03AC) ; ά + )) (greek-iso8859-7 . #xB6) ; øº’»¶ - (ucs . #x386) ; Ά + (ucs . #x0386) ; Ά )) (define-char - '((name . "FULLWIDTH GREEK CAPITAL LETTER ALPHA WITH TONOS") - (->ucs . #x0386) ; Ά + '((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) ; Ά + )) (japanese-jisx0212 . #x2661) ; ø»Š¬¦ )) (define-char @@ -95,7 +122,7 @@ (bidi-category . "ON") (mirrored . nil) (->decomposition #x00B7) - (ucs . #x387) ; · + (ucs . #x0387) ; · )) (define-char '((name . "GREEK CAPITAL LETTER EPSILON WITH TONOS") @@ -103,19 +130,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x0395 #x0301) - (->lowercase #x03AD) + (->fullwidth + ((name . "fullwidth greek capital letter epsilon with tonos") + (japanese-jisx0212 . #x2662) ; ø»Š¬§ + )) + (->lowercase + ((name . "GREEK SMALL LETTER EPSILON WITH TONOS") + (ucs . #x03AD) ; έ + )) (greek-iso8859-7 . #xB8) ; øº’»¸ - (ucs . #x388) ; Έ + (ucs . #x0388) ; Έ )) (define-char - '((name . "FULLWIDTH GREEK CAPITAL LETTER EPSILON WITH TONOS") - (->ucs . #x0388) ; Έ + '((name . "fullwidth greek capital letter epsilon with tonos") + (=>ucs . #x0388) ; Έ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (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) ; Έ + )) (japanese-jisx0212 . #x2662) ; ø»Š¬§ )) (define-char @@ -124,19 +162,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x0397 #x0301) - (->lowercase #x03AE) + (->fullwidth + ((name . "fullwidth greek capital letter eta with tonos") + (japanese-jisx0212 . #x2663) ; ø»Š¬¨ + )) + (->lowercase + ((name . "GREEK SMALL LETTER ETA WITH TONOS") + (ucs . #x03AE) ; ή + )) (greek-iso8859-7 . #xB9) ; øº’»¹ - (ucs . #x389) ; Ή + (ucs . #x0389) ; Ή )) (define-char - '((name . "FULLWIDTH GREEK CAPITAL LETTER ETA WITH TONOS") - (->ucs . #x0389) ; Ή + '((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) ; Ή + )) (japanese-jisx0212 . #x2663) ; ø»Š¬¨ )) (define-char @@ -145,19 +194,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x0399 #x0301) - (->lowercase #x03AF) + (->fullwidth + ((name . "fullwidth greek capital letter iota with tonos") + (japanese-jisx0212 . #x2664) ; ø»Š¬© + )) + (->lowercase + ((name . "GREEK SMALL LETTER IOTA WITH TONOS") + (ucs . #x03AF) ; ί + )) (greek-iso8859-7 . #xBA) ; øº’»º - (ucs . #x38A) ; Ί + (ucs . #x038A) ; Ί )) (define-char - '((name . "FULLWIDTH GREEK CAPITAL LETTER IOTA WITH TONOS") - (->ucs . #x038A) ; Ί + '((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) ; Ί + )) (japanese-jisx0212 . #x2664) ; ø»Š¬© )) (define-char @@ -166,19 +226,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x039F #x0301) - (->lowercase #x03CC) + (->fullwidth + ((name . "fullwidth greek capital letter omicron with tonos") + (japanese-jisx0212 . #x2667) ; ø»Š¬¬ + )) + (->lowercase + ((name . "GREEK SMALL LETTER OMICRON WITH TONOS") + (ucs . #x03CC) ; ό + )) (greek-iso8859-7 . #xBC) ; øº’»¼ - (ucs . #x38C) ; Ό + (ucs . #x038C) ; Ό )) (define-char - '((name . "FULLWIDTH GREEK CAPITAL LETTER OMICRON WITH TONOS") - (->ucs . #x038C) ; Ό + '((name . "fullwidth greek capital letter omicron with tonos") + (=>ucs . #x038C) ; Ό (general-category letter uppercase) ; Normative Category (bidi-category . "L") (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) ; Ό + )) (japanese-jisx0212 . #x2667) ; ø»Š¬¬ )) (define-char @@ -187,19 +258,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03A5 #x0301) - (->lowercase #x03CD) + (->fullwidth + ((name . "fullwidth greek capital letter upsilon with tonos") + (japanese-jisx0212 . #x2669) ; ø»Š¬® + )) + (->lowercase + ((name . "GREEK SMALL LETTER UPSILON WITH TONOS") + (ucs . #x03CD) ; ύ + )) (greek-iso8859-7 . #xBE) ; øº’»¾ - (ucs . #x38E) ; Ύ + (ucs . #x038E) ; Ύ )) (define-char - '((name . "FULLWIDTH GREEK CAPITAL LETTER UPSILON WITH TONOS") - (->ucs . #x038E) ; Ύ + '((name . "fullwidth greek capital letter upsilon with tonos") + (=>ucs . #x038E) ; Ύ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (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) ; Ύ + )) (japanese-jisx0212 . #x2669) ; ø»Š¬® )) (define-char @@ -208,19 +290,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03A9 #x0301) - (->lowercase #x03CE) + (->fullwidth + ((name . "fullwidth greek capital letter omega with tonos") + (japanese-jisx0212 . #x266C) ; ø»Š¬± + )) + (->lowercase + ((name . "GREEK SMALL LETTER OMEGA WITH TONOS") + (ucs . #x03CE) ; ώ + )) (greek-iso8859-7 . #xBF) ; øº’»¿ - (ucs . #x38F) ; Ώ + (ucs . #x038F) ; Ώ )) (define-char - '((name . "FULLWIDTH GREEK CAPITAL LETTER OMEGA WITH TONOS") - (->ucs . #x038F) ; Ώ + '((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) ; Ώ + )) (japanese-jisx0212 . #x266C) ; ø»Š¬± )) (define-char @@ -229,16 +322,24 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03CA #x0301) + (->fullwidth + ((name . "fullwidth greek small letter iota with dialytika and tonos") + (japanese-jisx0212 . #x2676) ; ø»Š¬» + )) (greek-iso8859-7 . #xC0) ; øº’¼€ - (ucs . #x390) ; ΐ + (ucs . #x0390) ; ΐ )) (define-char - '((name . "FULLWIDTH GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS") - (->ucs . #x0390) ; ΐ + '((name . "fullwidth greek small letter iota with dialytika and tonos") + (=>ucs . #x0390) ; ΐ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x0390) + (<-fullwidth + ((name . "GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS") + (ucs . #x0390) ; ΐ + )) (japanese-jisx0212 . #x2676) ; ø»Š¬» )) (define-char @@ -246,19 +347,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03B1) + (->fullwidth + ((name . "fullwidth greek capital letter alpha") + (japanese-jisx0208-1978 . #x2621) ; ø»‚ƒ– + (chinese-gb2312 . #x2621) ; ø»„š + (japanese-jisx0208 . #x2621) ; ø»†—ž + (korean-ksc5601 . #x2541) ; ø»ˆ ¤ + (chinese-cns11643-1 . #x2475) ; ø»‘ˆŠ + )) + (->lowercase + ((name . "GREEK SMALL LETTER ALPHA") + (ucs . #x03B1) ; α + )) (greek-iso8859-7 . #xC1) ; øº’¼ - (ucs . #x391) ; Α + (ucs . #x0391) ; Α )) (define-char '((name . "fullwidth greek capital letter alpha") - (->ucs . #x0391) ; Α + (=>ucs . #x0391) ; Α (general-category letter uppercase) ; Normative Category (bidi-category . "L") (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) ; Α + )) (japanese-jisx0208-1978 . #x2621) ; ø»‚ƒ– (chinese-gb2312 . #x2621) ; ø»„š (japanese-jisx0208 . #x2621) ; ø»†—ž @@ -272,19 +388,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03B2) + (->fullwidth + ((name . "fullwidth greek capital letter beta") + (japanese-jisx0208-1978 . #x2622) ; ø»‚ƒ— + (chinese-gb2312 . #x2622) ; ø»„› + (japanese-jisx0208 . #x2622) ; ø»†—Ÿ + (korean-ksc5601 . #x2542) ; ø»ˆ ¥ + (chinese-cns11643-1 . #x2476) ; ø»‘ˆ‹ + )) + (->lowercase + ((name . "GREEK SMALL LETTER BETA") + (ucs . #x03B2) ; β + )) (greek-iso8859-7 . #xC2) ; øº’¼‚ - (ucs . #x392) ; Β + (ucs . #x0392) ; Β )) (define-char '((name . "fullwidth greek capital letter beta") - (->ucs . #x0392) ; Β + (=>ucs . #x0392) ; Β (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x0392) (->lowercase ((name . "fullwidth greek small letter beta"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER BETA") + (ucs . #x0392) ; Β + )) (japanese-jisx0208-1978 . #x2622) ; ø»‚ƒ— (chinese-gb2312 . #x2622) ; ø»„› (japanese-jisx0208 . #x2622) ; ø»†—Ÿ @@ -298,19 +429,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03B3) + (->fullwidth + ((name . "fullwidth greek capital letter gamma") + (japanese-jisx0208-1978 . #x2623) ; ø»‚ƒ˜ + (chinese-gb2312 . #x2623) ; ø»„œ + (japanese-jisx0208 . #x2623) ; ø»†—  + (korean-ksc5601 . #x2543) ; ø»ˆ ¦ + (chinese-cns11643-1 . #x2477) ; ø»‘ˆŒ + )) + (->lowercase + ((name . "GREEK SMALL LETTER GAMMA") + (ucs . #x03B3) ; γ + )) (greek-iso8859-7 . #xC3) ; øº’¼ƒ - (ucs . #x393) ; Γ + (ucs . #x0393) ; Γ )) (define-char '((name . "fullwidth greek capital letter gamma") - (->ucs . #x0393) ; Γ + (=>ucs . #x0393) ; Γ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x0393) (->lowercase ((name . "fullwidth greek small letter gamma"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER GAMMA") + (ucs . #x0393) ; Γ + )) (japanese-jisx0208-1978 . #x2623) ; ø»‚ƒ˜ (chinese-gb2312 . #x2623) ; ø»„œ (japanese-jisx0208 . #x2623) ; ø»†—  @@ -324,19 +470,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03B4) + (->fullwidth + ((name . "fullwidth greek capital letter delta") + (japanese-jisx0208-1978 . #x2624) ; ø»‚ƒ™ + (chinese-gb2312 . #x2624) ; ø»„ + (japanese-jisx0208 . #x2624) ; ø»†—¡ + (korean-ksc5601 . #x2544) ; ø»ˆ § + (chinese-cns11643-1 . #x2478) ; ø»‘ˆ + )) + (->lowercase + ((name . "GREEK SMALL LETTER DELTA") + (ucs . #x03B4) ; δ + )) (greek-iso8859-7 . #xC4) ; øº’¼„ - (ucs . #x394) ; Δ + (ucs . #x0394) ; Δ )) (define-char '((name . "fullwidth greek capital letter delta") - (->ucs . #x0394) ; Δ + (=>ucs . #x0394) ; Δ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x0394) (->lowercase ((name . "fullwidth greek small letter delta"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER DELTA") + (ucs . #x0394) ; Δ + )) (japanese-jisx0208-1978 . #x2624) ; ø»‚ƒ™ (chinese-gb2312 . #x2624) ; ø»„ (japanese-jisx0208 . #x2624) ; ø»†—¡ @@ -350,19 +511,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03B5) + (->fullwidth + ((name . "fullwidth greek capital letter epsilon") + (japanese-jisx0208-1978 . #x2625) ; ø»‚ƒš + (chinese-gb2312 . #x2625) ; ø»„ž + (japanese-jisx0208 . #x2625) ; ø»†—¢ + (korean-ksc5601 . #x2545) ; ø»ˆ ¨ + (chinese-cns11643-1 . #x2479) ; ø»‘ˆŽ + )) + (->lowercase + ((name . "GREEK SMALL LETTER EPSILON") + (ucs . #x03B5) ; ε + )) (greek-iso8859-7 . #xC5) ; øº’¼… - (ucs . #x395) ; Ε + (ucs . #x0395) ; Ε )) (define-char '((name . "fullwidth greek capital letter epsilon") - (->ucs . #x0395) ; Ε + (=>ucs . #x0395) ; Ε (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x0395) (->lowercase ((name . "fullwidth greek small letter epsilon"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER EPSILON") + (ucs . #x0395) ; Ε + )) (japanese-jisx0208-1978 . #x2625) ; ø»‚ƒš (chinese-gb2312 . #x2625) ; ø»„ž (japanese-jisx0208 . #x2625) ; ø»†—¢ @@ -376,19 +552,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03B6) + (->fullwidth + ((name . "fullwidth greek capital letter zeta") + (japanese-jisx0208-1978 . #x2626) ; ø»‚ƒ› + (chinese-gb2312 . #x2626) ; ø»„Ÿ + (japanese-jisx0208 . #x2626) ; ø»†—£ + (korean-ksc5601 . #x2546) ; ø»ˆ © + (chinese-cns11643-1 . #x247A) ; ø»‘ˆ + )) + (->lowercase + ((name . "GREEK SMALL LETTER ZETA") + (ucs . #x03B6) ; ζ + )) (greek-iso8859-7 . #xC6) ; øº’¼† - (ucs . #x396) ; Ζ + (ucs . #x0396) ; Ζ )) (define-char '((name . "fullwidth greek capital letter zeta") - (->ucs . #x0396) ; Ζ + (=>ucs . #x0396) ; Ζ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x0396) (->lowercase ((name . "fullwidth greek small letter zeta"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER ZETA") + (ucs . #x0396) ; Ζ + )) (japanese-jisx0208-1978 . #x2626) ; ø»‚ƒ› (chinese-gb2312 . #x2626) ; ø»„Ÿ (japanese-jisx0208 . #x2626) ; ø»†—£ @@ -402,19 +593,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03B7) + (->fullwidth + ((name . "fullwidth greek capital letter eta") + (japanese-jisx0208-1978 . #x2627) ; ø»‚ƒœ + (chinese-gb2312 . #x2627) ; ø»„  + (japanese-jisx0208 . #x2627) ; ø»†—¤ + (korean-ksc5601 . #x2547) ; ø»ˆ ª + (chinese-cns11643-1 . #x247B) ; ø»‘ˆ + )) + (->lowercase + ((name . "GREEK SMALL LETTER ETA") + (ucs . #x03B7) ; η + )) (greek-iso8859-7 . #xC7) ; øº’¼‡ - (ucs . #x397) ; Η + (ucs . #x0397) ; Η )) (define-char '((name . "fullwidth greek capital letter eta") - (->ucs . #x0397) ; Η + (=>ucs . #x0397) ; Η (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x0397) (->lowercase ((name . "fullwidth greek small letter eta"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER ETA") + (ucs . #x0397) ; Η + )) (japanese-jisx0208-1978 . #x2627) ; ø»‚ƒœ (chinese-gb2312 . #x2627) ; ø»„  (japanese-jisx0208 . #x2627) ; ø»†—¤ @@ -428,19 +634,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03B8) + (->fullwidth + ((name . "fullwidth greek capital letter theta") + (japanese-jisx0208-1978 . #x2628) ; ø»‚ƒ + (chinese-gb2312 . #x2628) ; ø»„¡ + (japanese-jisx0208 . #x2628) ; ø»†—¥ + (korean-ksc5601 . #x2548) ; ø»ˆ « + (chinese-cns11643-1 . #x247C) ; ø»‘ˆ‘ + )) + (->lowercase + ((name . "GREEK SMALL LETTER THETA") + (ucs . #x03B8) ; θ + )) (greek-iso8859-7 . #xC8) ; øº’¼ˆ - (ucs . #x398) ; Θ + (ucs . #x0398) ; Θ )) (define-char '((name . "fullwidth greek capital letter theta") - (->ucs . #x0398) ; Θ + (=>ucs . #x0398) ; Θ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x0398) (->lowercase ((name . "fullwidth greek small letter theta"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER THETA") + (ucs . #x0398) ; Θ + )) (japanese-jisx0208-1978 . #x2628) ; ø»‚ƒ (chinese-gb2312 . #x2628) ; ø»„¡ (japanese-jisx0208 . #x2628) ; ø»†—¥ @@ -454,19 +675,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03B9) + (->fullwidth + ((name . "fullwidth greek capital letter iota") + (japanese-jisx0208-1978 . #x2629) ; ø»‚ƒž + (chinese-gb2312 . #x2629) ; ø»„¢ + (japanese-jisx0208 . #x2629) ; ø»†—¦ + (korean-ksc5601 . #x2549) ; ø»ˆ ¬ + (chinese-cns11643-1 . #x247D) ; ø»‘ˆ’ + )) + (->lowercase + ((name . "GREEK SMALL LETTER IOTA") + (ucs . #x03B9) ; ι + )) (greek-iso8859-7 . #xC9) ; øº’¼‰ - (ucs . #x399) ; Ι + (ucs . #x0399) ; Ι )) (define-char '((name . "fullwidth greek capital letter iota") - (->ucs . #x0399) ; Ι + (=>ucs . #x0399) ; Ι (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x0399) (->lowercase ((name . "fullwidth greek small letter iota"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER IOTA") + (ucs . #x0399) ; Ι + )) (japanese-jisx0208-1978 . #x2629) ; ø»‚ƒž (chinese-gb2312 . #x2629) ; ø»„¢ (japanese-jisx0208 . #x2629) ; ø»†—¦ @@ -480,19 +716,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03BA) + (->fullwidth + ((name . "fullwidth greek capital letter kappa") + (japanese-jisx0208-1978 . #x262A) ; ø»‚ƒŸ + (chinese-gb2312 . #x262A) ; ø»„£ + (japanese-jisx0208 . #x262A) ; ø»†—§ + (korean-ksc5601 . #x254A) ; ø»ˆ ­ + (chinese-cns11643-1 . #x247E) ; ø»‘ˆ“ + )) + (->lowercase + ((name . "GREEK SMALL LETTER KAPPA") + (ucs . #x03BA) ; κ + )) (greek-iso8859-7 . #xCA) ; øº’¼Š - (ucs . #x39A) ; Κ + (ucs . #x039A) ; Κ )) (define-char '((name . "fullwidth greek capital letter kappa") - (->ucs . #x039A) ; Κ + (=>ucs . #x039A) ; Κ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x039A) (->lowercase ((name . "fullwidth greek small letter kappa"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER KAPPA") + (ucs . #x039A) ; Κ + )) (japanese-jisx0208-1978 . #x262A) ; ø»‚ƒŸ (chinese-gb2312 . #x262A) ; ø»„£ (japanese-jisx0208 . #x262A) ; ø»†—§ @@ -506,19 +757,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03BB) + (->fullwidth + ((name . "fullwidth greek capital letter lamda") + (japanese-jisx0208-1978 . #x262B) ; ø»‚ƒ  + (chinese-gb2312 . #x262B) ; ø»„¤ + (japanese-jisx0208 . #x262B) ; ø»†—¨ + (korean-ksc5601 . #x254B) ; ø»ˆ ® + (chinese-cns11643-1 . #x2521) ; ø»‘ˆ” + )) + (->lowercase + ((name . "GREEK SMALL LETTER LAMDA") + (ucs . #x03BB) ; λ + )) (greek-iso8859-7 . #xCB) ; øº’¼‹ - (ucs . #x39B) ; Λ + (ucs . #x039B) ; Λ )) (define-char '((name . "fullwidth greek capital letter lamda") - (->ucs . #x039B) ; Λ + (=>ucs . #x039B) ; Λ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x039B) (->lowercase ((name . "fullwidth greek small letter lamda"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER LAMDA") + (ucs . #x039B) ; Λ + )) (japanese-jisx0208-1978 . #x262B) ; ø»‚ƒ  (chinese-gb2312 . #x262B) ; ø»„¤ (japanese-jisx0208 . #x262B) ; ø»†—¨ @@ -532,19 +798,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03BC) + (->fullwidth + ((name . "fullwidth greek capital letter mu") + (japanese-jisx0208-1978 . #x262C) ; ø»‚ƒ¡ + (chinese-gb2312 . #x262C) ; ø»„¥ + (japanese-jisx0208 . #x262C) ; ø»†—© + (korean-ksc5601 . #x254C) ; ø»ˆ ¯ + (chinese-cns11643-1 . #x2522) ; ø»‘ˆ• + )) + (->lowercase + ((name . "GREEK SMALL LETTER MU") + (ucs . #x03BC) ; μ + )) (greek-iso8859-7 . #xCC) ; øº’¼Œ - (ucs . #x39C) ; Μ + (ucs . #x039C) ; Μ )) (define-char '((name . "fullwidth greek capital letter mu") - (->ucs . #x039C) ; Μ + (=>ucs . #x039C) ; Μ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x039C) (->lowercase ((name . "fullwidth greek small letter mu"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER MU") + (ucs . #x039C) ; Μ + )) (japanese-jisx0208-1978 . #x262C) ; ø»‚ƒ¡ (chinese-gb2312 . #x262C) ; ø»„¥ (japanese-jisx0208 . #x262C) ; ø»†—© @@ -558,19 +839,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03BD) + (->fullwidth + ((name . "fullwidth greek capital letter nu") + (japanese-jisx0208-1978 . #x262D) ; ø»‚ƒ¢ + (chinese-gb2312 . #x262D) ; ø»„¦ + (japanese-jisx0208 . #x262D) ; ø»†—ª + (korean-ksc5601 . #x254D) ; ø»ˆ ° + (chinese-cns11643-1 . #x2523) ; ø»‘ˆ– + )) + (->lowercase + ((name . "GREEK SMALL LETTER NU") + (ucs . #x03BD) ; ν + )) (greek-iso8859-7 . #xCD) ; øº’¼ - (ucs . #x39D) ; Ν + (ucs . #x039D) ; Ν )) (define-char '((name . "fullwidth greek capital letter nu") - (->ucs . #x039D) ; Ν + (=>ucs . #x039D) ; Ν (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x039D) (->lowercase ((name . "fullwidth greek small letter nu"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER NU") + (ucs . #x039D) ; Ν + )) (japanese-jisx0208-1978 . #x262D) ; ø»‚ƒ¢ (chinese-gb2312 . #x262D) ; ø»„¦ (japanese-jisx0208 . #x262D) ; ø»†—ª @@ -584,19 +880,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03BE) + (->fullwidth + ((name . "fullwidth greek capital letter xi") + (japanese-jisx0208-1978 . #x262E) ; ø»‚ƒ£ + (chinese-gb2312 . #x262E) ; ø»„§ + (japanese-jisx0208 . #x262E) ; ø»†—« + (korean-ksc5601 . #x254E) ; ø»ˆ ± + (chinese-cns11643-1 . #x2524) ; ø»‘ˆ— + )) + (->lowercase + ((name . "GREEK SMALL LETTER XI") + (ucs . #x03BE) ; ξ + )) (greek-iso8859-7 . #xCE) ; øº’¼Ž - (ucs . #x39E) ; Ξ + (ucs . #x039E) ; Ξ )) (define-char '((name . "fullwidth greek capital letter xi") - (->ucs . #x039E) ; Ξ + (=>ucs . #x039E) ; Ξ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x039E) (->lowercase ((name . "fullwidth greek small letter xi"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER XI") + (ucs . #x039E) ; Ξ + )) (japanese-jisx0208-1978 . #x262E) ; ø»‚ƒ£ (chinese-gb2312 . #x262E) ; ø»„§ (japanese-jisx0208 . #x262E) ; ø»†—« @@ -610,19 +921,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03BF) + (->fullwidth + ((name . "fullwidth greek capital letter omicron") + (japanese-jisx0208-1978 . #x262F) ; ø»‚ƒ¤ + (chinese-gb2312 . #x262F) ; ø»„¨ + (japanese-jisx0208 . #x262F) ; ø»†—¬ + (korean-ksc5601 . #x254F) ; ø»ˆ ² + (chinese-cns11643-1 . #x2525) ; ø»‘ˆ˜ + )) + (->lowercase + ((name . "GREEK SMALL LETTER OMICRON") + (ucs . #x03BF) ; ο + )) (greek-iso8859-7 . #xCF) ; øº’¼ - (ucs . #x39F) ; Ο + (ucs . #x039F) ; Ο )) (define-char '((name . "fullwidth greek capital letter omicron") - (->ucs . #x039F) ; Ο + (=>ucs . #x039F) ; Ο (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x039F) (->lowercase ((name . "fullwidth greek small letter omicron"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER OMICRON") + (ucs . #x039F) ; Ο + )) (japanese-jisx0208-1978 . #x262F) ; ø»‚ƒ¤ (chinese-gb2312 . #x262F) ; ø»„¨ (japanese-jisx0208 . #x262F) ; ø»†—¬ @@ -636,19 +962,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03C0) + (->fullwidth + ((name . "fullwidth greek capital letter pi") + (japanese-jisx0208-1978 . #x2630) ; ø»‚ƒ¥ + (chinese-gb2312 . #x2630) ; ø»„© + (japanese-jisx0208 . #x2630) ; ø»†—­ + (korean-ksc5601 . #x2550) ; ø»ˆ ³ + (chinese-cns11643-1 . #x2526) ; ø»‘ˆ™ + )) + (->lowercase + ((name . "GREEK SMALL LETTER PI") + (ucs . #x03C0) ; π + )) (greek-iso8859-7 . #xD0) ; øº’¼ - (ucs . #x3A0) ; Π + (ucs . #x03A0) ; Π )) (define-char '((name . "fullwidth greek capital letter pi") - (->ucs . #x03A0) ; Π + (=>ucs . #x03A0) ; Π (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03A0) (->lowercase ((name . "fullwidth greek small letter pi"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER PI") + (ucs . #x03A0) ; Π + )) (japanese-jisx0208-1978 . #x2630) ; ø»‚ƒ¥ (chinese-gb2312 . #x2630) ; ø»„© (japanese-jisx0208 . #x2630) ; ø»†—­ @@ -662,19 +1003,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03C1) + (->fullwidth + ((name . "fullwidth greek capital letter rho") + (japanese-jisx0208-1978 . #x2631) ; ø»‚ƒ¦ + (chinese-gb2312 . #x2631) ; ø»„ª + (japanese-jisx0208 . #x2631) ; ø»†—® + (korean-ksc5601 . #x2551) ; ø»ˆ ´ + (chinese-cns11643-1 . #x2527) ; ø»‘ˆš + )) + (->lowercase + ((name . "GREEK SMALL LETTER RHO") + (ucs . #x03C1) ; ρ + )) (greek-iso8859-7 . #xD1) ; øº’¼‘ - (ucs . #x3A1) ; Ρ + (ucs . #x03A1) ; Ρ )) (define-char '((name . "fullwidth greek capital letter rho") - (->ucs . #x03A1) ; Ρ + (=>ucs . #x03A1) ; Ρ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03A1) (->lowercase ((name . "fullwidth greek small letter rho"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER RHO") + (ucs . #x03A1) ; Ρ + )) (japanese-jisx0208-1978 . #x2631) ; ø»‚ƒ¦ (chinese-gb2312 . #x2631) ; ø»„ª (japanese-jisx0208 . #x2631) ; ø»†—® @@ -688,19 +1044,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03C3) + (->fullwidth + ((name . "fullwidth greek capital letter sigma") + (japanese-jisx0208-1978 . #x2632) ; ø»‚ƒ§ + (chinese-gb2312 . #x2632) ; ø»„« + (japanese-jisx0208 . #x2632) ; ø»†—¯ + (korean-ksc5601 . #x2552) ; ø»ˆ µ + (chinese-cns11643-1 . #x2528) ; ø»‘ˆ› + )) + (->lowercase + ((name . "GREEK SMALL LETTER SIGMA") + (ucs . #x03C3) ; σ + )) (greek-iso8859-7 . #xD3) ; øº’¼“ - (ucs . #x3A3) ; Σ + (ucs . #x03A3) ; Σ )) (define-char '((name . "fullwidth greek capital letter sigma") - (->ucs . #x03A3) ; Σ + (=>ucs . #x03A3) ; Σ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03A3) (->lowercase ((name . "fullwidth greek small letter sigma"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER SIGMA") + (ucs . #x03A3) ; Σ + )) (japanese-jisx0208-1978 . #x2632) ; ø»‚ƒ§ (chinese-gb2312 . #x2632) ; ø»„« (japanese-jisx0208 . #x2632) ; ø»†—¯ @@ -714,19 +1085,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03C4) + (->fullwidth + ((name . "fullwidth greek capital letter tau") + (japanese-jisx0208-1978 . #x2633) ; ø»‚ƒ¨ + (chinese-gb2312 . #x2633) ; ø»„¬ + (japanese-jisx0208 . #x2633) ; ø»†—° + (korean-ksc5601 . #x2553) ; ø»ˆ ¶ + (chinese-cns11643-1 . #x2529) ; ø»‘ˆœ + )) + (->lowercase + ((name . "GREEK SMALL LETTER TAU") + (ucs . #x03C4) ; τ + )) (greek-iso8859-7 . #xD4) ; øº’¼” - (ucs . #x3A4) ; Τ + (ucs . #x03A4) ; Τ )) (define-char '((name . "fullwidth greek capital letter tau") - (->ucs . #x03A4) ; Τ + (=>ucs . #x03A4) ; Τ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03A4) (->lowercase ((name . "fullwidth greek small letter tau"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER TAU") + (ucs . #x03A4) ; Τ + )) (japanese-jisx0208-1978 . #x2633) ; ø»‚ƒ¨ (chinese-gb2312 . #x2633) ; ø»„¬ (japanese-jisx0208 . #x2633) ; ø»†—° @@ -740,19 +1126,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03C5) + (->fullwidth + ((name . "fullwidth greek capital letter upsilon") + (japanese-jisx0208-1978 . #x2634) ; ø»‚ƒ© + (chinese-gb2312 . #x2634) ; ø»„­ + (japanese-jisx0208 . #x2634) ; ø»†—± + (korean-ksc5601 . #x2554) ; ø»ˆ · + (chinese-cns11643-1 . #x252A) ; ø»‘ˆ + )) + (->lowercase + ((name . "GREEK SMALL LETTER UPSILON") + (ucs . #x03C5) ; υ + )) (greek-iso8859-7 . #xD5) ; øº’¼• - (ucs . #x3A5) ; Î¥ + (ucs . #x03A5) ; Î¥ )) (define-char '((name . "fullwidth greek capital letter upsilon") - (->ucs . #x03A5) ; Î¥ + (=>ucs . #x03A5) ; Î¥ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03A5) (->lowercase ((name . "fullwidth greek small letter upsilon"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER UPSILON") + (ucs . #x03A5) ; Î¥ + )) (japanese-jisx0208-1978 . #x2634) ; ø»‚ƒ© (chinese-gb2312 . #x2634) ; ø»„­ (japanese-jisx0208 . #x2634) ; ø»†—± @@ -766,19 +1167,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03C6) + (->fullwidth + ((name . "fullwidth greek capital letter phi") + (japanese-jisx0208-1978 . #x2635) ; ø»‚ƒª + (chinese-gb2312 . #x2635) ; ø»„® + (japanese-jisx0208 . #x2635) ; ø»†—² + (korean-ksc5601 . #x2555) ; ø»ˆ ¸ + (chinese-cns11643-1 . #x252B) ; ø»‘ˆž + )) + (->lowercase + ((name . "GREEK SMALL LETTER PHI") + (ucs . #x03C6) ; φ + )) (greek-iso8859-7 . #xD6) ; øº’¼– - (ucs . #x3A6) ; Φ + (ucs . #x03A6) ; Φ )) (define-char '((name . "fullwidth greek capital letter phi") - (->ucs . #x03A6) ; Φ + (=>ucs . #x03A6) ; Φ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03A6) (->lowercase ((name . "fullwidth greek small letter phi"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER PHI") + (ucs . #x03A6) ; Φ + )) (japanese-jisx0208-1978 . #x2635) ; ø»‚ƒª (chinese-gb2312 . #x2635) ; ø»„® (japanese-jisx0208 . #x2635) ; ø»†—² @@ -792,19 +1208,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03C7) + (->fullwidth + ((name . "fullwidth greek capital letter chi") + (japanese-jisx0208-1978 . #x2636) ; ø»‚ƒ« + (chinese-gb2312 . #x2636) ; ø»„¯ + (japanese-jisx0208 . #x2636) ; ø»†—³ + (korean-ksc5601 . #x2556) ; ø»ˆ ¹ + (chinese-cns11643-1 . #x252C) ; ø»‘ˆŸ + )) + (->lowercase + ((name . "GREEK SMALL LETTER CHI") + (ucs . #x03C7) ; χ + )) (greek-iso8859-7 . #xD7) ; øº’¼— - (ucs . #x3A7) ; Χ + (ucs . #x03A7) ; Χ )) (define-char '((name . "fullwidth greek capital letter chi") - (->ucs . #x03A7) ; Χ + (=>ucs . #x03A7) ; Χ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03A7) (->lowercase ((name . "fullwidth greek small letter chi"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER CHI") + (ucs . #x03A7) ; Χ + )) (japanese-jisx0208-1978 . #x2636) ; ø»‚ƒ« (chinese-gb2312 . #x2636) ; ø»„¯ (japanese-jisx0208 . #x2636) ; ø»†—³ @@ -818,19 +1249,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03C8) + (->fullwidth + ((name . "fullwidth greek capital letter psi") + (japanese-jisx0208-1978 . #x2637) ; ø»‚ƒ¬ + (chinese-gb2312 . #x2637) ; ø»„° + (japanese-jisx0208 . #x2637) ; ø»†—´ + (korean-ksc5601 . #x2557) ; ø»ˆ º + (chinese-cns11643-1 . #x252D) ; ø»‘ˆ  + )) + (->lowercase + ((name . "GREEK SMALL LETTER PSI") + (ucs . #x03C8) ; ψ + )) (greek-iso8859-7 . #xD8) ; øº’¼˜ - (ucs . #x3A8) ; Ψ + (ucs . #x03A8) ; Ψ )) (define-char '((name . "fullwidth greek capital letter psi") - (->ucs . #x03A8) ; Ψ + (=>ucs . #x03A8) ; Ψ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03A8) (->lowercase ((name . "fullwidth greek small letter psi"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER PSI") + (ucs . #x03A8) ; Ψ + )) (japanese-jisx0208-1978 . #x2637) ; ø»‚ƒ¬ (chinese-gb2312 . #x2637) ; ø»„° (japanese-jisx0208 . #x2637) ; ø»†—´ @@ -844,19 +1290,34 @@ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03C9) + (->fullwidth + ((name . "fullwidth greek capital letter omega") + (japanese-jisx0208-1978 . #x2638) ; ø»‚ƒ­ + (chinese-gb2312 . #x2638) ; ø»„± + (japanese-jisx0208 . #x2638) ; ø»†—µ + (korean-ksc5601 . #x2558) ; ø»ˆ » + (chinese-cns11643-1 . #x252E) ; ø»‘ˆ¡ + )) + (->lowercase + ((name . "GREEK SMALL LETTER OMEGA") + (ucs . #x03C9) ; ω + )) (greek-iso8859-7 . #xD9) ; øº’¼™ - (ucs . #x3A9) ; Ω + (ucs . #x03A9) ; Ω )) (define-char '((name . "fullwidth greek capital letter omega") - (->ucs . #x03A9) ; Ω + (=>ucs . #x03A9) ; Ω (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03A9) (->lowercase ((name . "fullwidth greek small letter omega"))) + (<-fullwidth + ((name . "GREEK CAPITAL LETTER OMEGA") + (ucs . #x03A9) ; Ω + )) (japanese-jisx0208-1978 . #x2638) ; ø»‚ƒ­ (chinese-gb2312 . #x2638) ; ø»„± (japanese-jisx0208 . #x2638) ; ø»†—µ @@ -871,19 +1332,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x0399 #x0308) - (->lowercase #x03CA) + (->fullwidth + ((name . "fullwidth greek capital letter iota with dialytika") + (japanese-jisx0212 . #x2665) ; ø»Š¬ª + )) + (->lowercase + ((name . "GREEK SMALL LETTER IOTA WITH DIALYTIKA") + (ucs . #x03CA) ; ϊ + )) (greek-iso8859-7 . #xDA) ; øº’¼š - (ucs . #x3AA) ; Ϊ + (ucs . #x03AA) ; Ϊ )) (define-char - '((name . "FULLWIDTH GREEK CAPITAL LETTER IOTA WITH DIALYTIKA") - (->ucs . #x03AA) ; Ϊ + '((name . "fullwidth greek capital letter iota with dialytika") + (=>ucs . #x03AA) ; Ϊ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (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) ; Ϊ + )) (japanese-jisx0212 . #x2665) ; ø»Š¬ª )) (define-char @@ -892,19 +1364,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03A5 #x0308) - (->lowercase #x03CB) + (->fullwidth + ((name . "fullwidth greek capital letter upsilon with dialytika") + (japanese-jisx0212 . #x266A) ; ø»Š¬¯ + )) + (->lowercase + ((name . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA") + (ucs . #x03CB) ; ϋ + )) (greek-iso8859-7 . #xDB) ; øº’¼› - (ucs . #x3AB) ; Ϋ + (ucs . #x03AB) ; Ϋ )) (define-char - '((name . "FULLWIDTH GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA") - (->ucs . #x03AB) ; Ϋ + '((name . "fullwidth greek capital letter upsilon with dialytika") + (=>ucs . #x03AB) ; Ϋ (general-category letter uppercase) ; Normative Category (bidi-category . "L") (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") + (ucs . #x03AB) ; Ϋ + )) (japanese-jisx0212 . #x266A) ; ø»Š¬¯ )) (define-char @@ -913,22 +1396,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03B1 #x0301) - (->uppercase #x0386) - (->titlecase #x0386) + (->fullwidth + ((name . "fullwidth greek small letter alpha with tonos") + (japanese-jisx0212 . #x2671) ; ø»Š¬¶ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER ALPHA WITH TONOS") + (ucs . #x0386) ; Ά + )) (greek-iso8859-7 . #xDC) ; øº’¼œ - (ucs . #x3AC) ; ά + (ucs . #x03AC) ; ά )) (define-char - '((name . "FULLWIDTH GREEK SMALL LETTER ALPHA WITH TONOS") - (->ucs . #x03AC) ; ά + '((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"))) - (->titlecase - ((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) ; ά + )) (japanese-jisx0212 . #x2671) ; ø»Š¬¶ )) (define-char @@ -937,22 +1428,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03B5 #x0301) - (->uppercase #x0388) - (->titlecase #x0388) + (->fullwidth + ((name . "fullwidth greek small letter epsilon with tonos") + (japanese-jisx0212 . #x2672) ; ø»Š¬· + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER EPSILON WITH TONOS") + (ucs . #x0388) ; Έ + )) (greek-iso8859-7 . #xDD) ; øº’¼ - (ucs . #x3AD) ; έ + (ucs . #x03AD) ; έ )) (define-char - '((name . "FULLWIDTH GREEK SMALL LETTER EPSILON WITH TONOS") - (->ucs . #x03AD) ; έ + '((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"))) - (->titlecase - ((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) ; έ + )) (japanese-jisx0212 . #x2672) ; ø»Š¬· )) (define-char @@ -961,22 +1460,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03B7 #x0301) - (->uppercase #x0389) - (->titlecase #x0389) + (->fullwidth + ((name . "fullwidth greek small letter eta with tonos") + (japanese-jisx0212 . #x2673) ; ø»Š¬¸ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER ETA WITH TONOS") + (ucs . #x0389) ; Ή + )) (greek-iso8859-7 . #xDE) ; øº’¼ž - (ucs . #x3AE) ; ή + (ucs . #x03AE) ; ή )) (define-char - '((name . "FULLWIDTH GREEK SMALL LETTER ETA WITH TONOS") - (->ucs . #x03AE) ; ή + '((name . "fullwidth greek small letter eta with tonos") + (=>ucs . #x03AE) ; ή (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03AE) (->uppercase - ((name . "FULLWIDTH GREEK CAPITAL LETTER ETA WITH TONOS"))) - (->titlecase - ((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) ; ή + )) (japanese-jisx0212 . #x2673) ; ø»Š¬¸ )) (define-char @@ -985,22 +1492,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03B9 #x0301) - (->uppercase #x038A) - (->titlecase #x038A) + (->fullwidth + ((name . "fullwidth greek small letter iota with tonos") + (japanese-jisx0212 . #x2674) ; ø»Š¬¹ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER IOTA WITH TONOS") + (ucs . #x038A) ; Ί + )) (greek-iso8859-7 . #xDF) ; øº’¼Ÿ - (ucs . #x3AF) ; ί + (ucs . #x03AF) ; ί )) (define-char - '((name . "FULLWIDTH GREEK SMALL LETTER IOTA WITH TONOS") - (->ucs . #x03AF) ; ί + '((name . "fullwidth greek small letter iota with tonos") + (=>ucs . #x03AF) ; ί (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03AF) (->uppercase - ((name . "FULLWIDTH GREEK CAPITAL LETTER IOTA WITH TONOS"))) - (->titlecase - ((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) ; ί + )) (japanese-jisx0212 . #x2674) ; ø»Š¬¹ )) (define-char @@ -1009,16 +1524,24 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03CB #x0301) + (->fullwidth + ((name . "fullwidth greek small letter upsilon with dialytika and tonos") + (japanese-jisx0212 . #x267B) ; ø»Š­€ + )) (greek-iso8859-7 . #xE0) ; øº’¼  - (ucs . #x3B0) ; ΰ + (ucs . #x03B0) ; ΰ )) (define-char - '((name . "FULLWIDTH GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS") - (->ucs . #x03B0) ; ΰ + '((name . "fullwidth greek small letter upsilon with dialytika and tonos") + (=>ucs . #x03B0) ; ΰ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03B0) + (<-fullwidth + ((name . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS") + (ucs . #x03B0) ; ΰ + )) (japanese-jisx0212 . #x267B) ; ø»Š­€ )) (define-char @@ -1026,22 +1549,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x0391) - (->titlecase #x0391) + (->fullwidth + ((name . "fullwidth greek small letter alpha") + (japanese-jisx0208-1978 . #x2641) ; ø»‚ƒ¶ + (chinese-gb2312 . #x2641) ; ø»„º + (japanese-jisx0208 . #x2641) ; ø»†—¾ + (korean-ksc5601 . #x2561) ; ø»ˆ¡„ + (chinese-cns11643-1 . #x252F) ; ø»‘ˆ¢ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER ALPHA") + (ucs . #x0391) ; Α + )) (greek-iso8859-7 . #xE1) ; øº’¼¡ - (ucs . #x3B1) ; α + (ucs . #x03B1) ; α )) (define-char '((name . "fullwidth greek small letter alpha") - (->ucs . #x03B1) ; α + (=>ucs . #x03B1) ; α (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03B1) (->uppercase ((name . "fullwidth greek capital letter alpha"))) - (->titlecase - ((name . "fullwidth greek capital letter alpha"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER ALPHA") + (ucs . #x03B1) ; α + )) (japanese-jisx0208-1978 . #x2641) ; ø»‚ƒ¶ (chinese-gb2312 . #x2641) ; ø»„º (japanese-jisx0208 . #x2641) ; ø»†—¾ @@ -1055,22 +1590,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x0392) - (->titlecase #x0392) + (->fullwidth + ((name . "fullwidth greek small letter beta") + (japanese-jisx0208-1978 . #x2642) ; ø»‚ƒ· + (chinese-gb2312 . #x2642) ; ø»„» + (japanese-jisx0208 . #x2642) ; ø»†—¿ + (korean-ksc5601 . #x2562) ; ø»ˆ¡… + (chinese-cns11643-1 . #x2530) ; ø»‘ˆ£ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER BETA") + (ucs . #x0392) ; Β + )) (greek-iso8859-7 . #xE2) ; øº’¼¢ - (ucs . #x3B2) ; β + (ucs . #x03B2) ; β )) (define-char '((name . "fullwidth greek small letter beta") - (->ucs . #x03B2) ; β + (=>ucs . #x03B2) ; β (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03B2) (->uppercase ((name . "fullwidth greek capital letter beta"))) - (->titlecase - ((name . "fullwidth greek capital letter beta"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER BETA") + (ucs . #x03B2) ; β + )) (japanese-jisx0208-1978 . #x2642) ; ø»‚ƒ· (chinese-gb2312 . #x2642) ; ø»„» (japanese-jisx0208 . #x2642) ; ø»†—¿ @@ -1084,22 +1631,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x0393) - (->titlecase #x0393) + (->fullwidth + ((name . "fullwidth greek small letter gamma") + (japanese-jisx0208-1978 . #x2643) ; ø»‚ƒ¸ + (chinese-gb2312 . #x2643) ; ø»„¼ + (japanese-jisx0208 . #x2643) ; ø»†˜€ + (korean-ksc5601 . #x2563) ; ø»ˆ¡† + (chinese-cns11643-1 . #x2531) ; ø»‘ˆ¤ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER GAMMA") + (ucs . #x0393) ; Γ + )) (greek-iso8859-7 . #xE3) ; øº’¼£ - (ucs . #x3B3) ; γ + (ucs . #x03B3) ; γ )) (define-char '((name . "fullwidth greek small letter gamma") - (->ucs . #x03B3) ; γ + (=>ucs . #x03B3) ; γ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03B3) (->uppercase ((name . "fullwidth greek capital letter gamma"))) - (->titlecase - ((name . "fullwidth greek capital letter gamma"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER GAMMA") + (ucs . #x03B3) ; γ + )) (japanese-jisx0208-1978 . #x2643) ; ø»‚ƒ¸ (chinese-gb2312 . #x2643) ; ø»„¼ (japanese-jisx0208 . #x2643) ; ø»†˜€ @@ -1113,22 +1672,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x0394) - (->titlecase #x0394) + (->fullwidth + ((name . "fullwidth greek small letter delta") + (japanese-jisx0208-1978 . #x2644) ; ø»‚ƒ¹ + (chinese-gb2312 . #x2644) ; ø»„½ + (japanese-jisx0208 . #x2644) ; ø»†˜ + (korean-ksc5601 . #x2564) ; ø»ˆ¡‡ + (chinese-cns11643-1 . #x2532) ; ø»‘ˆ¥ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER DELTA") + (ucs . #x0394) ; Δ + )) (greek-iso8859-7 . #xE4) ; øº’¼¤ - (ucs . #x3B4) ; δ + (ucs . #x03B4) ; δ )) (define-char '((name . "fullwidth greek small letter delta") - (->ucs . #x03B4) ; δ + (=>ucs . #x03B4) ; δ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03B4) (->uppercase ((name . "fullwidth greek capital letter delta"))) - (->titlecase - ((name . "fullwidth greek capital letter delta"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER DELTA") + (ucs . #x03B4) ; δ + )) (japanese-jisx0208-1978 . #x2644) ; ø»‚ƒ¹ (chinese-gb2312 . #x2644) ; ø»„½ (japanese-jisx0208 . #x2644) ; ø»†˜ @@ -1142,22 +1713,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x0395) - (->titlecase #x0395) + (->fullwidth + ((name . "fullwidth greek small letter epsilon") + (japanese-jisx0208-1978 . #x2645) ; ø»‚ƒº + (chinese-gb2312 . #x2645) ; ø»„¾ + (japanese-jisx0208 . #x2645) ; ø»†˜‚ + (korean-ksc5601 . #x2565) ; ø»ˆ¡ˆ + (chinese-cns11643-1 . #x2533) ; ø»‘ˆ¦ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER EPSILON") + (ucs . #x0395) ; Ε + )) (greek-iso8859-7 . #xE5) ; øº’¼¥ - (ucs . #x3B5) ; ε + (ucs . #x03B5) ; ε )) (define-char '((name . "fullwidth greek small letter epsilon") - (->ucs . #x03B5) ; ε + (=>ucs . #x03B5) ; ε (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03B5) (->uppercase ((name . "fullwidth greek capital letter epsilon"))) - (->titlecase - ((name . "fullwidth greek capital letter epsilon"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER EPSILON") + (ucs . #x03B5) ; ε + )) (japanese-jisx0208-1978 . #x2645) ; ø»‚ƒº (chinese-gb2312 . #x2645) ; ø»„¾ (japanese-jisx0208 . #x2645) ; ø»†˜‚ @@ -1171,22 +1754,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x0396) - (->titlecase #x0396) + (->fullwidth + ((name . "fullwidth greek small letter zeta") + (japanese-jisx0208-1978 . #x2646) ; ø»‚ƒ» + (chinese-gb2312 . #x2646) ; ø»„¿ + (japanese-jisx0208 . #x2646) ; ø»†˜ƒ + (korean-ksc5601 . #x2566) ; ø»ˆ¡‰ + (chinese-cns11643-1 . #x2534) ; ø»‘ˆ§ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER ZETA") + (ucs . #x0396) ; Ζ + )) (greek-iso8859-7 . #xE6) ; øº’¼¦ - (ucs . #x3B6) ; ζ + (ucs . #x03B6) ; ζ )) (define-char '((name . "fullwidth greek small letter zeta") - (->ucs . #x03B6) ; ζ + (=>ucs . #x03B6) ; ζ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03B6) (->uppercase ((name . "fullwidth greek capital letter zeta"))) - (->titlecase - ((name . "fullwidth greek capital letter zeta"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER ZETA") + (ucs . #x03B6) ; ζ + )) (japanese-jisx0208-1978 . #x2646) ; ø»‚ƒ» (chinese-gb2312 . #x2646) ; ø»„¿ (japanese-jisx0208 . #x2646) ; ø»†˜ƒ @@ -1200,22 +1795,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x0397) - (->titlecase #x0397) + (->fullwidth + ((name . "fullwidth greek small letter eta") + (japanese-jisx0208-1978 . #x2647) ; ø»‚ƒ¼ + (chinese-gb2312 . #x2647) ; ø»„Ž€ + (japanese-jisx0208 . #x2647) ; ø»†˜„ + (korean-ksc5601 . #x2567) ; ø»ˆ¡Š + (chinese-cns11643-1 . #x2535) ; ø»‘ˆ¨ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER ETA") + (ucs . #x0397) ; Η + )) (greek-iso8859-7 . #xE7) ; øº’¼§ - (ucs . #x3B7) ; η + (ucs . #x03B7) ; η )) (define-char '((name . "fullwidth greek small letter eta") - (->ucs . #x03B7) ; η + (=>ucs . #x03B7) ; η (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03B7) (->uppercase ((name . "fullwidth greek capital letter eta"))) - (->titlecase - ((name . "fullwidth greek capital letter eta"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER ETA") + (ucs . #x03B7) ; η + )) (japanese-jisx0208-1978 . #x2647) ; ø»‚ƒ¼ (chinese-gb2312 . #x2647) ; ø»„Ž€ (japanese-jisx0208 . #x2647) ; ø»†˜„ @@ -1229,23 +1836,35 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x0398) - (->titlecase #x0398) + (->fullwidth + ((name . "fullwidth greek small letter theta") + (japanese-jisx0208-1978 . #x2648) ; ø»‚ƒ½ + (chinese-gb2312 . #x2648) ; ø»„Ž + (japanese-jisx0208 . #x2648) ; ø»†˜… + (korean-ksc5601 . #x2568) ; ø»ˆ¡‹ + (chinese-cns11643-1 . #x2536) ; ø»‘ˆ© + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER THETA") + (ucs . #x0398) ; Θ + )) (greek-iso8859-7 . #xE8) ; øº’¼¨ (ipa . #xC8) ; øº’›ˆ - (ucs . #x3B8) ; θ + (ucs . #x03B8) ; θ )) (define-char '((name . "fullwidth greek small letter theta") - (->ucs . #x03B8) ; θ + (=>ucs . #x03B8) ; θ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03B8) (->uppercase ((name . "fullwidth greek capital letter theta"))) - (->titlecase - ((name . "fullwidth greek capital letter theta"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER THETA") + (ucs . #x03B8) ; θ + )) (japanese-jisx0208-1978 . #x2648) ; ø»‚ƒ½ (chinese-gb2312 . #x2648) ; ø»„Ž (japanese-jisx0208 . #x2648) ; ø»†˜… @@ -1259,22 +1878,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x0399) - (->titlecase #x0399) + (->fullwidth + ((name . "fullwidth greek small letter iota") + (japanese-jisx0208-1978 . #x2649) ; ø»‚ƒ¾ + (chinese-gb2312 . #x2649) ; ø»„Ž‚ + (japanese-jisx0208 . #x2649) ; ø»†˜† + (korean-ksc5601 . #x2569) ; ø»ˆ¡Œ + (chinese-cns11643-1 . #x2537) ; ø»‘ˆª + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER IOTA") + (ucs . #x0399) ; Ι + )) (greek-iso8859-7 . #xE9) ; øº’¼© - (ucs . #x3B9) ; ι + (ucs . #x03B9) ; ι )) (define-char '((name . "fullwidth greek small letter iota") - (->ucs . #x03B9) ; ι + (=>ucs . #x03B9) ; ι (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03B9) (->uppercase ((name . "fullwidth greek capital letter iota"))) - (->titlecase - ((name . "fullwidth greek capital letter iota"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER IOTA") + (ucs . #x03B9) ; ι + )) (japanese-jisx0208-1978 . #x2649) ; ø»‚ƒ¾ (chinese-gb2312 . #x2649) ; ø»„Ž‚ (japanese-jisx0208 . #x2649) ; ø»†˜† @@ -1288,20 +1919,36 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x039A) - (->titlecase #x039A) + (->fullwidth + ((name . "fullwidth greek small letter kappa") + (japanese-jisx0208-1978 . #x264A) ; ø»‚ƒ¿ + (chinese-gb2312 . #x264A) ; ø»„Žƒ + (japanese-jisx0208 . #x264A) ; ø»†˜‡ + (korean-ksc5601 . #x256A) ; ø»ˆ¡ + (chinese-cns11643-1 . #x2538) ; ø»‘ˆ« + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER KAPPA") + (ucs . #x039A) ; Κ + )) (greek-iso8859-7 . #xEA) ; øº’¼ª - (ucs . #x3BA) ; κ + (ucs . #x03BA) ; κ )) (define-char '((name . "fullwidth greek small letter kappa") - (->ucs . #x03BA) ; κ + (=>ucs . #x03BA) ; κ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03BA) - (->uppercase #x039A) - (->titlecase #x039A) + (->uppercase + ((name . "GREEK CAPITAL LETTER KAPPA") + (ucs . #x039A) ; Κ + )) + (<-fullwidth + ((name . "GREEK SMALL LETTER KAPPA") + (ucs . #x03BA) ; κ + )) (japanese-jisx0208-1978 . #x264A) ; ø»‚ƒ¿ (chinese-gb2312 . #x264A) ; ø»„Žƒ (japanese-jisx0208 . #x264A) ; ø»†˜‡ @@ -1315,22 +1962,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x039B) - (->titlecase #x039B) + (->fullwidth + ((name . "fullwidth greek small letter lamda") + (japanese-jisx0208-1978 . #x264B) ; ø»‚„€ + (chinese-gb2312 . #x264B) ; ø»„Ž„ + (japanese-jisx0208 . #x264B) ; ø»†˜ˆ + (korean-ksc5601 . #x256B) ; ø»ˆ¡Ž + (chinese-cns11643-1 . #x2539) ; ø»‘ˆ¬ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER LAMDA") + (ucs . #x039B) ; Λ + )) (greek-iso8859-7 . #xEB) ; øº’¼« - (ucs . #x3BB) ; λ + (ucs . #x03BB) ; λ )) (define-char '((name . "fullwidth greek small letter lamda") - (->ucs . #x03BB) ; λ + (=>ucs . #x03BB) ; λ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03BB) (->uppercase ((name . "fullwidth greek capital letter lamda"))) - (->titlecase - ((name . "fullwidth greek capital letter lamda"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER LAMDA") + (ucs . #x03BB) ; λ + )) (japanese-jisx0208-1978 . #x264B) ; ø»‚„€ (chinese-gb2312 . #x264B) ; ø»„Ž„ (japanese-jisx0208 . #x264B) ; ø»†˜ˆ @@ -1344,22 +2003,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x039C) - (->titlecase #x039C) + (->fullwidth + ((name . "fullwidth greek small letter mu") + (japanese-jisx0208-1978 . #x264C) ; ø»‚„ + (chinese-gb2312 . #x264C) ; ø»„Ž… + (japanese-jisx0208 . #x264C) ; ø»†˜‰ + (korean-ksc5601 . #x256C) ; ø»ˆ¡ + (chinese-cns11643-1 . #x253A) ; ø»‘ˆ­ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER MU") + (ucs . #x039C) ; Μ + )) (greek-iso8859-7 . #xEC) ; øº’¼¬ - (ucs . #x3BC) ; μ + (ucs . #x03BC) ; μ )) (define-char '((name . "fullwidth greek small letter mu") - (->ucs . #x03BC) ; μ + (=>ucs . #x03BC) ; μ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03BC) (->uppercase ((name . "fullwidth greek capital letter mu"))) - (->titlecase - ((name . "fullwidth greek capital letter mu"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER MU") + (ucs . #x03BC) ; μ + )) (japanese-jisx0208-1978 . #x264C) ; ø»‚„ (chinese-gb2312 . #x264C) ; ø»„Ž… (japanese-jisx0208 . #x264C) ; ø»†˜‰ @@ -1373,22 +2044,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x039D) - (->titlecase #x039D) + (->fullwidth + ((name . "fullwidth greek small letter nu") + (japanese-jisx0208-1978 . #x264D) ; ø»‚„‚ + (chinese-gb2312 . #x264D) ; ø»„Ž† + (japanese-jisx0208 . #x264D) ; ø»†˜Š + (korean-ksc5601 . #x256D) ; ø»ˆ¡ + (chinese-cns11643-1 . #x253B) ; ø»‘ˆ® + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER NU") + (ucs . #x039D) ; Ν + )) (greek-iso8859-7 . #xED) ; øº’¼­ - (ucs . #x3BD) ; ν + (ucs . #x03BD) ; ν )) (define-char '((name . "fullwidth greek small letter nu") - (->ucs . #x03BD) ; ν + (=>ucs . #x03BD) ; ν (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03BD) (->uppercase ((name . "fullwidth greek capital letter nu"))) - (->titlecase - ((name . "fullwidth greek capital letter nu"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER NU") + (ucs . #x03BD) ; ν + )) (japanese-jisx0208-1978 . #x264D) ; ø»‚„‚ (chinese-gb2312 . #x264D) ; ø»„Ž† (japanese-jisx0208 . #x264D) ; ø»†˜Š @@ -1402,22 +2085,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x039E) - (->titlecase #x039E) + (->fullwidth + ((name . "fullwidth greek small letter xi") + (japanese-jisx0208-1978 . #x264E) ; ø»‚„ƒ + (chinese-gb2312 . #x264E) ; ø»„Ž‡ + (japanese-jisx0208 . #x264E) ; ø»†˜‹ + (korean-ksc5601 . #x256E) ; ø»ˆ¡‘ + (chinese-cns11643-1 . #x253C) ; ø»‘ˆ¯ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER XI") + (ucs . #x039E) ; Ξ + )) (greek-iso8859-7 . #xEE) ; øº’¼® - (ucs . #x3BE) ; ξ + (ucs . #x03BE) ; ξ )) (define-char '((name . "fullwidth greek small letter xi") - (->ucs . #x03BE) ; ξ + (=>ucs . #x03BE) ; ξ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03BE) (->uppercase ((name . "fullwidth greek capital letter xi"))) - (->titlecase - ((name . "fullwidth greek capital letter xi"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER XI") + (ucs . #x03BE) ; ξ + )) (japanese-jisx0208-1978 . #x264E) ; ø»‚„ƒ (chinese-gb2312 . #x264E) ; ø»„Ž‡ (japanese-jisx0208 . #x264E) ; ø»†˜‹ @@ -1431,22 +2126,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x039F) - (->titlecase #x039F) + (->fullwidth + ((name . "fullwidth greek small letter omicron") + (japanese-jisx0208-1978 . #x264F) ; ø»‚„„ + (chinese-gb2312 . #x264F) ; ø»„Žˆ + (japanese-jisx0208 . #x264F) ; ø»†˜Œ + (korean-ksc5601 . #x256F) ; ø»ˆ¡’ + (chinese-cns11643-1 . #x253D) ; ø»‘ˆ° + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER OMICRON") + (ucs . #x039F) ; Ο + )) (greek-iso8859-7 . #xEF) ; øº’¼¯ - (ucs . #x3BF) ; ο + (ucs . #x03BF) ; ο )) (define-char '((name . "fullwidth greek small letter omicron") - (->ucs . #x03BF) ; ο + (=>ucs . #x03BF) ; ο (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03BF) (->uppercase ((name . "fullwidth greek capital letter omicron"))) - (->titlecase - ((name . "fullwidth greek capital letter omicron"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER OMICRON") + (ucs . #x03BF) ; ο + )) (japanese-jisx0208-1978 . #x264F) ; ø»‚„„ (chinese-gb2312 . #x264F) ; ø»„Žˆ (japanese-jisx0208 . #x264F) ; ø»†˜Œ @@ -1460,22 +2167,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03A0) - (->titlecase #x03A0) + (->fullwidth + ((name . "fullwidth greek small letter pi") + (japanese-jisx0208-1978 . #x2650) ; ø»‚„… + (chinese-gb2312 . #x2650) ; ø»„Ž‰ + (japanese-jisx0208 . #x2650) ; ø»†˜ + (korean-ksc5601 . #x2570) ; ø»ˆ¡“ + (chinese-cns11643-1 . #x253E) ; ø»‘ˆ± + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER PI") + (ucs . #x03A0) ; Π + )) (greek-iso8859-7 . #xF0) ; øº’¼° - (ucs . #x3C0) ; π + (ucs . #x03C0) ; π )) (define-char '((name . "fullwidth greek small letter pi") - (->ucs . #x03C0) ; π + (=>ucs . #x03C0) ; π (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03C0) (->uppercase ((name . "fullwidth greek capital letter pi"))) - (->titlecase - ((name . "fullwidth greek capital letter pi"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER PI") + (ucs . #x03C0) ; π + )) (japanese-jisx0208-1978 . #x2650) ; ø»‚„… (chinese-gb2312 . #x2650) ; ø»„Ž‰ (japanese-jisx0208 . #x2650) ; ø»†˜ @@ -1489,22 +2208,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03A1) - (->titlecase #x03A1) + (->fullwidth + ((name . "fullwidth greek small letter rho") + (japanese-jisx0208-1978 . #x2651) ; ø»‚„† + (chinese-gb2312 . #x2651) ; ø»„ŽŠ + (japanese-jisx0208 . #x2651) ; ø»†˜Ž + (korean-ksc5601 . #x2571) ; ø»ˆ¡” + (chinese-cns11643-1 . #x253F) ; ø»‘ˆ² + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER RHO") + (ucs . #x03A1) ; Ρ + )) (greek-iso8859-7 . #xF1) ; øº’¼± - (ucs . #x3C1) ; ρ + (ucs . #x03C1) ; ρ )) (define-char '((name . "fullwidth greek small letter rho") - (->ucs . #x03C1) ; ρ + (=>ucs . #x03C1) ; ρ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03C1) (->uppercase ((name . "fullwidth greek capital letter rho"))) - (->titlecase - ((name . "fullwidth greek capital letter rho"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER RHO") + (ucs . #x03C1) ; ρ + )) (japanese-jisx0208-1978 . #x2651) ; ø»‚„† (chinese-gb2312 . #x2651) ; ø»„ŽŠ (japanese-jisx0208 . #x2651) ; ø»†˜Ž @@ -1518,22 +2249,31 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03A3) - (->titlecase #x03A3) + (->fullwidth + ((name . "fullwidth greek small letter final sigma") + (japanese-jisx0212 . #x2678) ; ø»Š¬½ + (japanese-jisx0213-1 . #x2659) ; ø»¢›Š + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER SIGMA") + (ucs . #x03A3) ; Σ + )) (greek-iso8859-7 . #xF2) ; øº’¼² - (ucs . #x3C2) ; ς + (ucs . #x03C2) ; ς )) (define-char '((name . "fullwidth greek small letter final sigma") - (->ucs . #x03C2) ; ς + (=>ucs . #x03C2) ; ς (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03C2) (->uppercase ((name . "fullwidth greek capital letter final sigma"))) - (->titlecase - ((name . "fullwidth greek capital letter final sigma"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER FINAL SIGMA") + (ucs . #x03C2) ; ς + )) (japanese-jisx0212 . #x2678) ; ø»Š¬½ (japanese-jisx0213-1 . #x2659) ; ø»¢›Š )) @@ -1542,22 +2282,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03A3) - (->titlecase #x03A3) + (->fullwidth + ((name . "fullwidth greek small letter sigma") + (japanese-jisx0208-1978 . #x2652) ; ø»‚„‡ + (chinese-gb2312 . #x2652) ; ø»„Ž‹ + (japanese-jisx0208 . #x2652) ; ø»†˜ + (korean-ksc5601 . #x2572) ; ø»ˆ¡• + (chinese-cns11643-1 . #x2540) ; ø»‘ˆ³ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER SIGMA") + (ucs . #x03A3) ; Σ + )) (greek-iso8859-7 . #xF3) ; øº’¼³ - (ucs . #x3C3) ; σ + (ucs . #x03C3) ; σ )) (define-char '((name . "fullwidth greek small letter sigma") - (->ucs . #x03C3) ; σ + (=>ucs . #x03C3) ; σ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03C3) (->uppercase ((name . "fullwidth greek capital letter sigma"))) - (->titlecase - ((name . "fullwidth greek capital letter sigma"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER SIGMA") + (ucs . #x03C3) ; σ + )) (japanese-jisx0208-1978 . #x2652) ; ø»‚„‡ (chinese-gb2312 . #x2652) ; ø»„Ž‹ (japanese-jisx0208 . #x2652) ; ø»†˜ @@ -1571,22 +2323,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03A4) - (->titlecase #x03A4) + (->fullwidth + ((name . "fullwidth greek small letter tau") + (japanese-jisx0208-1978 . #x2653) ; ø»‚„ˆ + (chinese-gb2312 . #x2653) ; ø»„ŽŒ + (japanese-jisx0208 . #x2653) ; ø»†˜ + (korean-ksc5601 . #x2573) ; ø»ˆ¡– + (chinese-cns11643-1 . #x2541) ; ø»‘ˆ´ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER TAU") + (ucs . #x03A4) ; Τ + )) (greek-iso8859-7 . #xF4) ; øº’¼´ - (ucs . #x3C4) ; τ + (ucs . #x03C4) ; τ )) (define-char '((name . "fullwidth greek small letter tau") - (->ucs . #x03C4) ; τ + (=>ucs . #x03C4) ; τ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03C4) (->uppercase ((name . "fullwidth greek capital letter tau"))) - (->titlecase - ((name . "fullwidth greek capital letter tau"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER TAU") + (ucs . #x03C4) ; τ + )) (japanese-jisx0208-1978 . #x2653) ; ø»‚„ˆ (chinese-gb2312 . #x2653) ; ø»„ŽŒ (japanese-jisx0208 . #x2653) ; ø»†˜ @@ -1600,22 +2364,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03A5) - (->titlecase #x03A5) + (->fullwidth + ((name . "fullwidth greek small letter upsilon") + (japanese-jisx0208-1978 . #x2654) ; ø»‚„‰ + (chinese-gb2312 . #x2654) ; ø»„Ž + (japanese-jisx0208 . #x2654) ; ø»†˜‘ + (korean-ksc5601 . #x2574) ; ø»ˆ¡— + (chinese-cns11643-1 . #x2542) ; ø»‘ˆµ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER UPSILON") + (ucs . #x03A5) ; Î¥ + )) (greek-iso8859-7 . #xF5) ; øº’¼µ - (ucs . #x3C5) ; υ + (ucs . #x03C5) ; υ )) (define-char '((name . "fullwidth greek small letter upsilon") - (->ucs . #x03C5) ; υ + (=>ucs . #x03C5) ; υ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03C5) (->uppercase ((name . "fullwidth greek capital letter upsilon"))) - (->titlecase - ((name . "fullwidth greek capital letter upsilon"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER UPSILON") + (ucs . #x03C5) ; υ + )) (japanese-jisx0208-1978 . #x2654) ; ø»‚„‰ (chinese-gb2312 . #x2654) ; ø»„Ž (japanese-jisx0208 . #x2654) ; ø»†˜‘ @@ -1629,22 +2405,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03A6) - (->titlecase #x03A6) + (->fullwidth + ((name . "fullwidth greek small letter phi") + (japanese-jisx0208-1978 . #x2655) ; ø»‚„Š + (chinese-gb2312 . #x2655) ; ø»„ŽŽ + (japanese-jisx0208 . #x2655) ; ø»†˜’ + (korean-ksc5601 . #x2575) ; ø»ˆ¡˜ + (chinese-cns11643-1 . #x2543) ; ø»‘ˆ¶ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER PHI") + (ucs . #x03A6) ; Φ + )) (greek-iso8859-7 . #xF6) ; øº’¼¶ - (ucs . #x3C6) ; φ + (ucs . #x03C6) ; φ )) (define-char '((name . "fullwidth greek small letter phi") - (->ucs . #x03C6) ; φ + (=>ucs . #x03C6) ; φ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03C6) (->uppercase ((name . "fullwidth greek capital letter phi"))) - (->titlecase - ((name . "fullwidth greek capital letter phi"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER PHI") + (ucs . #x03C6) ; φ + )) (japanese-jisx0208-1978 . #x2655) ; ø»‚„Š (chinese-gb2312 . #x2655) ; ø»„ŽŽ (japanese-jisx0208 . #x2655) ; ø»†˜’ @@ -1658,22 +2446,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03A7) - (->titlecase #x03A7) + (->fullwidth + ((name . "fullwidth greek small letter chi") + (japanese-jisx0208-1978 . #x2656) ; ø»‚„‹ + (chinese-gb2312 . #x2656) ; ø»„Ž + (japanese-jisx0208 . #x2656) ; ø»†˜“ + (korean-ksc5601 . #x2576) ; ø»ˆ¡™ + (chinese-cns11643-1 . #x2544) ; ø»‘ˆ· + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER CHI") + (ucs . #x03A7) ; Χ + )) (greek-iso8859-7 . #xF7) ; øº’¼· - (ucs . #x3C7) ; χ + (ucs . #x03C7) ; χ )) (define-char '((name . "fullwidth greek small letter chi") - (->ucs . #x03C7) ; χ + (=>ucs . #x03C7) ; χ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03C7) (->uppercase ((name . "fullwidth greek capital letter chi"))) - (->titlecase - ((name . "fullwidth greek capital letter chi"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER CHI") + (ucs . #x03C7) ; χ + )) (japanese-jisx0208-1978 . #x2656) ; ø»‚„‹ (chinese-gb2312 . #x2656) ; ø»„Ž (japanese-jisx0208 . #x2656) ; ø»†˜“ @@ -1687,22 +2487,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03A8) - (->titlecase #x03A8) + (->fullwidth + ((name . "fullwidth greek small letter psi") + (japanese-jisx0208-1978 . #x2657) ; ø»‚„Œ + (chinese-gb2312 . #x2657) ; ø»„Ž + (japanese-jisx0208 . #x2657) ; ø»†˜” + (korean-ksc5601 . #x2577) ; ø»ˆ¡š + (chinese-cns11643-1 . #x2545) ; ø»‘ˆ¸ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER PSI") + (ucs . #x03A8) ; Ψ + )) (greek-iso8859-7 . #xF8) ; øº’¼¸ - (ucs . #x3C8) ; ψ + (ucs . #x03C8) ; ψ )) (define-char '((name . "fullwidth greek small letter psi") - (->ucs . #x03C8) ; ψ + (=>ucs . #x03C8) ; ψ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03C8) (->uppercase ((name . "fullwidth greek capital letter psi"))) - (->titlecase - ((name . "fullwidth greek capital letter psi"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER PSI") + (ucs . #x03C8) ; ψ + )) (japanese-jisx0208-1978 . #x2657) ; ø»‚„Œ (chinese-gb2312 . #x2657) ; ø»„Ž (japanese-jisx0208 . #x2657) ; ø»†˜” @@ -1716,22 +2528,34 @@ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03A9) - (->titlecase #x03A9) + (->fullwidth + ((name . "fullwidth greek small letter omega") + (japanese-jisx0208-1978 . #x2658) ; ø»‚„ + (chinese-gb2312 . #x2658) ; ø»„Ž‘ + (japanese-jisx0208 . #x2658) ; ø»†˜• + (korean-ksc5601 . #x2578) ; ø»ˆ¡› + (chinese-cns11643-1 . #x2546) ; ø»‘ˆ¹ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER OMEGA") + (ucs . #x03A9) ; Ω + )) (greek-iso8859-7 . #xF9) ; øº’¼¹ - (ucs . #x3C9) ; ω + (ucs . #x03C9) ; ω )) (define-char '((name . "fullwidth greek small letter omega") - (->ucs . #x03C9) ; ω + (=>ucs . #x03C9) ; ω (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03C9) (->uppercase ((name . "fullwidth greek capital letter omega"))) - (->titlecase - ((name . "fullwidth greek capital letter omega"))) + (<-fullwidth + ((name . "GREEK SMALL LETTER OMEGA") + (ucs . #x03C9) ; ω + )) (japanese-jisx0208-1978 . #x2658) ; ø»‚„ (chinese-gb2312 . #x2658) ; ø»„Ž‘ (japanese-jisx0208 . #x2658) ; ø»†˜• @@ -1746,22 +2570,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03B9 #x0308) - (->uppercase #x03AA) - (->titlecase #x03AA) + (->fullwidth + ((name . "fullwidth greek small letter iota with dialytika") + (japanese-jisx0212 . #x2675) ; ø»Š¬º + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER IOTA WITH DIALYTIKA") + (ucs . #x03AA) ; Ϊ + )) (greek-iso8859-7 . #xFA) ; øº’¼º - (ucs . #x3CA) ; ϊ + (ucs . #x03CA) ; ϊ )) (define-char - '((name . "FULLWIDTH GREEK SMALL LETTER IOTA WITH DIALYTIKA") - (->ucs . #x03CA) ; ϊ + '((name . "fullwidth greek small letter iota with dialytika") + (=>ucs . #x03CA) ; ϊ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03CA) (->uppercase - ((name . "FULLWIDTH GREEK CAPITAL LETTER IOTA WITH DIALYTIKA"))) - (->titlecase - ((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 . #x2675) ; ø»Š¬º )) (define-char @@ -1770,22 +2602,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03C5 #x0308) - (->uppercase #x03AB) - (->titlecase #x03AB) + (->fullwidth + ((name . "fullwidth greek small letter upsilon with dialytika") + (japanese-jisx0212 . #x267A) ; ø»Š¬¿ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA") + (ucs . #x03AB) ; Ϋ + )) (greek-iso8859-7 . #xFB) ; øº’¼» - (ucs . #x3CB) ; ϋ + (ucs . #x03CB) ; ϋ )) (define-char - '((name . "FULLWIDTH GREEK SMALL LETTER UPSILON WITH DIALYTIKA") - (->ucs . #x03CB) ; ϋ + '((name . "fullwidth greek small letter upsilon with dialytika") + (=>ucs . #x03CB) ; ϋ (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) (->decomposition wide #x03CB) (->uppercase - ((name . "FULLWIDTH GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA"))) - (->titlecase - ((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) ; ϋ + )) (japanese-jisx0212 . #x267A) ; ø»Š¬¿ )) (define-char @@ -1794,22 +2634,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03BF #x0301) - (->uppercase #x038C) - (->titlecase #x038C) + (->fullwidth + ((name . "fullwidth greek small letter omicron with tonos") + (japanese-jisx0212 . #x2677) ; ø»Š¬¼ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER OMICRON WITH TONOS") + (ucs . #x038C) ; Ό + )) (greek-iso8859-7 . #xFC) ; øº’¼¼ - (ucs . #x3CC) ; ό + (ucs . #x03CC) ; ό )) (define-char - '((name . "FULLWIDTH GREEK SMALL LETTER OMICRON WITH TONOS") - (->ucs . #x03CC) ; ό + '((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"))) - (->titlecase - ((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) ; ό + )) (japanese-jisx0212 . #x2677) ; ø»Š¬¼ )) (define-char @@ -1818,22 +2666,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03C5 #x0301) - (->uppercase #x038E) - (->titlecase #x038E) + (->fullwidth + ((name . "fullwidth greek small letter upsilon with tonos") + (japanese-jisx0212 . #x2679) ; ø»Š¬¾ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER UPSILON WITH TONOS") + (ucs . #x038E) ; Ύ + )) (greek-iso8859-7 . #xFD) ; øº’¼½ - (ucs . #x3CD) ; ύ + (ucs . #x03CD) ; ύ )) (define-char - '((name . "FULLWIDTH GREEK SMALL LETTER UPSILON WITH TONOS") - (->ucs . #x03CD) ; ύ + '((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"))) - (->titlecase - ((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) ; ύ + )) (japanese-jisx0212 . #x2679) ; ø»Š¬¾ )) (define-char @@ -1842,22 +2698,30 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03C9 #x0301) - (->uppercase #x038F) - (->titlecase #x038F) + (->fullwidth + ((name . "fullwidth greek small letter omega with tonos") + (japanese-jisx0212 . #x267C) ; ø»Š­ + )) + (->uppercase + ((name . "GREEK CAPITAL LETTER OMEGA WITH TONOS") + (ucs . #x038F) ; Ώ + )) (greek-iso8859-7 . #xFE) ; øº’¼¾ - (ucs . #x3CE) ; ώ + (ucs . #x03CE) ; ώ )) (define-char - '((name . "FULLWIDTH GREEK SMALL LETTER OMEGA WITH TONOS") - (->ucs . #x03CE) ; ώ + '((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"))) - (->titlecase - ((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) ; ώ + )) (japanese-jisx0212 . #x267C) ; ø»Š­ )) (define-char @@ -1866,9 +2730,11 @@ (bidi-category . "L") (mirrored . nil) (->decomposition compat #x03B2) - (->uppercase #x0392) - (->titlecase #x0392) - (ucs . #x3D0) ; ϐ + (->uppercase + ((name . "GREEK CAPITAL LETTER BETA") + (ucs . #x0392) ; Β + )) + (ucs . #x03D0) ; ϐ )) (define-char '((name . "GREEK THETA SYMBOL") @@ -1876,9 +2742,11 @@ (bidi-category . "L") (mirrored . nil) (->decomposition compat #x03B8) - (->uppercase #x0398) - (->titlecase #x0398) - (ucs . #x3D1) ; ϑ + (->uppercase + ((name . "GREEK CAPITAL LETTER THETA") + (ucs . #x0398) ; Θ + )) + (ucs . #x03D1) ; ϑ )) (define-char '((name . "GREEK UPSILON WITH HOOK SYMBOL") @@ -1886,7 +2754,7 @@ (bidi-category . "L") (mirrored . nil) (->decomposition compat #x03A5) - (ucs . #x3D2) ; ϒ + (ucs . #x03D2) ; ϒ )) (define-char '((name . "GREEK UPSILON WITH ACUTE AND HOOK SYMBOL") @@ -1894,7 +2762,7 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03D2 #x0301) - (ucs . #x3D3) ; ϓ + (ucs . #x03D3) ; ϓ )) (define-char '((name . "GREEK UPSILON WITH DIAERESIS AND HOOK SYMBOL") @@ -1902,7 +2770,7 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03D2 #x0308) - (ucs . #x3D4) ; ϔ + (ucs . #x03D4) ; ϔ )) (define-char '((name . "GREEK PHI SYMBOL") @@ -1910,9 +2778,11 @@ (bidi-category . "L") (mirrored . nil) (->decomposition compat #x03C6) - (->uppercase #x03A6) - (->titlecase #x03A6) - (ucs . #x3D5) ; ϕ + (->uppercase + ((name . "GREEK CAPITAL LETTER PHI") + (ucs . #x03A6) ; Φ + )) + (ucs . #x03D5) ; ϕ )) (define-char '((name . "GREEK PI SYMBOL") @@ -1920,203 +2790,260 @@ (bidi-category . "L") (mirrored . nil) (->decomposition compat #x03C0) - (->uppercase #x03A0) - (->titlecase #x03A0) - (ucs . #x3D6) ; ϖ + (->uppercase + ((name . "GREEK CAPITAL LETTER PI") + (ucs . #x03A0) ; Π + )) + (ucs . #x03D6) ; ϖ )) (define-char '((name . "GREEK KAI SYMBOL") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (ucs . #x3D7) ; ϗ + (ucs . #x03D7) ; ϗ )) (define-char '((name . "GREEK LETTER STIGMA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03DB) - (ucs . #x3DA) ; Ϛ + (->lowercase + ((name . "GREEK SMALL LETTER STIGMA") + (ucs . #x03DB) ; ϛ + )) + (ucs . #x03DA) ; Ϛ )) (define-char '((name . "GREEK SMALL LETTER STIGMA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03DA) - (->titlecase #x03DA) - (ucs . #x3DB) ; ϛ + (->uppercase + ((name . "GREEK LETTER STIGMA") + (ucs . #x03DA) ; Ϛ + )) + (ucs . #x03DB) ; ϛ )) (define-char '((name . "GREEK LETTER DIGAMMA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03DD) - (ucs . #x3DC) ; Ϝ + (->lowercase + ((name . "GREEK SMALL LETTER DIGAMMA") + (ucs . #x03DD) ; ϝ + )) + (ucs . #x03DC) ; Ϝ )) (define-char '((name . "GREEK SMALL LETTER DIGAMMA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03DC) - (->titlecase #x03DC) - (ucs . #x3DD) ; ϝ + (->uppercase + ((name . "GREEK LETTER DIGAMMA") + (ucs . #x03DC) ; Ϝ + )) + (ucs . #x03DD) ; ϝ )) (define-char '((name . "GREEK LETTER KOPPA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03DF) - (ucs . #x3DE) ; Ϟ + (->lowercase + ((name . "GREEK SMALL LETTER KOPPA") + (ucs . #x03DF) ; ϟ + )) + (ucs . #x03DE) ; Ϟ )) (define-char '((name . "GREEK SMALL LETTER KOPPA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03DE) - (->titlecase #x03DE) - (ucs . #x3DF) ; ϟ + (->uppercase + ((name . "GREEK LETTER KOPPA") + (ucs . #x03DE) ; Ϟ + )) + (ucs . #x03DF) ; ϟ )) (define-char '((name . "GREEK LETTER SAMPI") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03E1) - (ucs . #x3E0) ; Ï  + (->lowercase + ((name . "GREEK SMALL LETTER SAMPI") + (ucs . #x03E1) ; Ï¡ + )) + (ucs . #x03E0) ; Ï  )) (define-char '((name . "GREEK SMALL LETTER SAMPI") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03E0) - (->titlecase #x03E0) - (ucs . #x3E1) ; Ï¡ + (->uppercase + ((name . "GREEK LETTER SAMPI") + (ucs . #x03E0) ; Ï  + )) + (ucs . #x03E1) ; Ï¡ )) (define-char '((name . "COPTIC CAPITAL LETTER SHEI") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03E3) - (ucs . #x3E2) ; Ï¢ + (->lowercase + ((name . "COPTIC SMALL LETTER SHEI") + (ucs . #x03E3) ; Ï£ + )) + (ucs . #x03E2) ; Ï¢ )) (define-char '((name . "COPTIC SMALL LETTER SHEI") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03E2) - (->titlecase #x03E2) - (ucs . #x3E3) ; Ï£ + (->uppercase + ((name . "COPTIC CAPITAL LETTER SHEI") + (ucs . #x03E2) ; Ï¢ + )) + (ucs . #x03E3) ; Ï£ )) (define-char '((name . "COPTIC CAPITAL LETTER FEI") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03E5) - (ucs . #x3E4) ; Ϥ + (->lowercase + ((name . "COPTIC SMALL LETTER FEI") + (ucs . #x03E5) ; Ï¥ + )) + (ucs . #x03E4) ; Ϥ )) (define-char '((name . "COPTIC SMALL LETTER FEI") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03E4) - (->titlecase #x03E4) - (ucs . #x3E5) ; Ï¥ + (->uppercase + ((name . "COPTIC CAPITAL LETTER FEI") + (ucs . #x03E4) ; Ϥ + )) + (ucs . #x03E5) ; Ï¥ )) (define-char '((name . "COPTIC CAPITAL LETTER KHEI") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03E7) - (ucs . #x3E6) ; Ϧ + (->lowercase + ((name . "COPTIC SMALL LETTER KHEI") + (ucs . #x03E7) ; ϧ + )) + (ucs . #x03E6) ; Ϧ )) (define-char '((name . "COPTIC SMALL LETTER KHEI") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03E6) - (->titlecase #x03E6) - (ucs . #x3E7) ; ϧ + (->uppercase + ((name . "COPTIC CAPITAL LETTER KHEI") + (ucs . #x03E6) ; Ϧ + )) + (ucs . #x03E7) ; ϧ )) (define-char '((name . "COPTIC CAPITAL LETTER HORI") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03E9) - (ucs . #x3E8) ; Ϩ + (->lowercase + ((name . "COPTIC SMALL LETTER HORI") + (ucs . #x03E9) ; Ï© + )) + (ucs . #x03E8) ; Ϩ )) (define-char '((name . "COPTIC SMALL LETTER HORI") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03E8) - (->titlecase #x03E8) - (ucs . #x3E9) ; Ï© + (->uppercase + ((name . "COPTIC CAPITAL LETTER HORI") + (ucs . #x03E8) ; Ϩ + )) + (ucs . #x03E9) ; Ï© )) (define-char '((name . "COPTIC CAPITAL LETTER GANGIA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03EB) - (ucs . #x3EA) ; Ϫ + (->lowercase + ((name . "COPTIC SMALL LETTER GANGIA") + (ucs . #x03EB) ; Ï« + )) + (ucs . #x03EA) ; Ϫ )) (define-char '((name . "COPTIC SMALL LETTER GANGIA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03EA) - (->titlecase #x03EA) - (ucs . #x3EB) ; Ï« + (->uppercase + ((name . "COPTIC CAPITAL LETTER GANGIA") + (ucs . #x03EA) ; Ϫ + )) + (ucs . #x03EB) ; Ï« )) (define-char '((name . "COPTIC CAPITAL LETTER SHIMA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03ED) - (ucs . #x3EC) ; Ϭ + (->lowercase + ((name . "COPTIC SMALL LETTER SHIMA") + (ucs . #x03ED) ; Ï­ + )) + (ucs . #x03EC) ; Ϭ )) (define-char '((name . "COPTIC SMALL LETTER SHIMA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03EC) - (->titlecase #x03EC) - (ucs . #x3ED) ; Ï­ + (->uppercase + ((name . "COPTIC CAPITAL LETTER SHIMA") + (ucs . #x03EC) ; Ϭ + )) + (ucs . #x03ED) ; Ï­ )) (define-char '((name . "COPTIC CAPITAL LETTER DEI") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->lowercase #x03EF) - (ucs . #x3EE) ; Ï® + (->lowercase + ((name . "COPTIC SMALL LETTER DEI") + (ucs . #x03EF) ; ϯ + )) + (ucs . #x03EE) ; Ï® )) (define-char '((name . "COPTIC SMALL LETTER DEI") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->uppercase #x03EE) - (->titlecase #x03EE) - (ucs . #x3EF) ; ϯ + (->uppercase + ((name . "COPTIC CAPITAL LETTER DEI") + (ucs . #x03EE) ; Ï® + )) + (ucs . #x03EF) ; ϯ )) (define-char '((name . "GREEK KAPPA SYMBOL") @@ -2124,9 +3051,11 @@ (bidi-category . "L") (mirrored . nil) (->decomposition compat #x03BA) - (->uppercase #x039A) - (->titlecase #x039A) - (ucs . #x3F0) ; Ï° + (->uppercase + ((name . "GREEK CAPITAL LETTER KAPPA") + (ucs . #x039A) ; Κ + )) + (ucs . #x03F0) ; Ï° )) (define-char '((name . "GREEK RHO SYMBOL") @@ -2134,9 +3063,11 @@ (bidi-category . "L") (mirrored . nil) (->decomposition compat #x03C1) - (->uppercase #x03A1) - (->titlecase #x03A1) - (ucs . #x3F1) ; ϱ + (->uppercase + ((name . "GREEK CAPITAL LETTER RHO") + (ucs . #x03A1) ; Ρ + )) + (ucs . #x03F1) ; ϱ )) (define-char '((name . "GREEK LUNATE SIGMA SYMBOL") @@ -2144,14 +3075,16 @@ (bidi-category . "L") (mirrored . nil) (->decomposition compat #x03C2) - (->uppercase #x03A3) - (->titlecase #x03A3) - (ucs . #x3F2) ; ϲ + (->uppercase + ((name . "GREEK CAPITAL LETTER SIGMA") + (ucs . #x03A3) ; Σ + )) + (ucs . #x03F2) ; ϲ )) (define-char '((name . "GREEK LETTER YOT") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (ucs . #x3F3) ; ϳ + (ucs . #x03F3) ; ϳ )) -- 1.7.10.4