From: tomo Date: Tue, 9 Nov 2004 07:37:17 +0000 (+0000) Subject: In each *fullwidth* variant: X-Git-Tag: r21-4-15-u2km-0_21-32-a~2^2~63 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=362d1505b339e6f53b6e08c909913be1eae4ac44;p=chise%2Fxemacs-chise.git- In each *fullwidth* variant: - Use `<-denotational' instead of `=>ucs'. - Omit features defined in the mother. - Use `=ucs@jis/fw' instead of `=ucs@jis' in principle. In each ucs character: - Omit `->fullwidth' for non-UCS objects. --- diff --git a/lisp/utf-2000/u00370-Greek.el b/lisp/utf-2000/u00370-Greek.el index dac15a1..b03aa19 100644 --- a/lisp/utf-2000/u00370-Greek.el +++ b/lisp/utf-2000/u00370-Greek.el @@ -39,27 +39,20 @@ (bidi-category . "ON") (mirrored . nil) (->decomposition compat #x0020 #x0301) - (->fullwidth - ((name . "fullwidth greek tonos") - (=jis-x0212 . #x2238) ; &JSP-2238; [02-24] - (=ucs@jis . #x0384) ; &JSP-2238; - )) (=ucs . #x0384) ; ΄ (greek-iso8859-7 . #xB4) ; &I-GREEK-34; )) (define-char - '((name . "fullwidth greek tonos") - (=>ucs . #x0384) ; ΄ - (general-category symbol modifier) ; Informative Category - (bidi-category . "ON") - (mirrored . nil) - (->decomposition wide #x0384) + '((<-denotational + ((name . "GREEK TONOS") + (=ucs . #x0384) ; ΄ + )) (<-fullwidth ((name . "GREEK TONOS") (=ucs . #x0384) ; ΄ )) (=jis-x0212 . #x2238) ; &JSP-2238; [02-24] - (=ucs@jis . #x0384) ; &JSP-2238; + (=ucs@jis/fw . #x0384) ; &JSP-2238; )) (define-char '((name . "GREEK DIALYTIKA TONOS") @@ -67,27 +60,20 @@ (bidi-category . "ON") (mirrored . nil) (->decomposition #x00A8 #x0301) - (->fullwidth - ((name . "fullwidth greek dialytika tonos") - (=jis-x0212 . #x2239) ; &JSP-2239; [02-25] - (=ucs@jis . #x0385) ; &JSP-2239; - )) (=ucs . #x0385) ; ΅ (greek-iso8859-7 . #xB5) ; &I-GREEK-35; )) (define-char - '((name . "fullwidth greek dialytika tonos") - (=>ucs . #x0385) ; ΅ - (general-category symbol modifier) ; Informative Category - (bidi-category . "ON") - (mirrored . nil) - (->decomposition wide #x0385) + '((<-denotational + ((name . "GREEK DIALYTIKA TONOS") + (=ucs . #x0385) ; ΅ + )) (<-fullwidth ((name . "GREEK DIALYTIKA TONOS") (=ucs . #x0385) ; ΅ )) (=jis-x0212 . #x2239) ; &JSP-2239; [02-25] - (=ucs@jis . #x0385) ; &JSP-2239; + (=ucs@jis/fw . #x0385) ; &JSP-2239; )) (define-char '((name . "GREEK CAPITAL LETTER ALPHA WITH TONOS") @@ -95,11 +81,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x0391 #x0301) - (->fullwidth - ((name . "fullwidth greek capital letter alpha with tonos") - (=jis-x0212 . #x2661) ; &JSP-2661; [06-65] - (=ucs@jis . #x0386) ; &JSP-2661; - )) (->lowercase ((name . "GREEK SMALL LETTER ALPHA WITH TONOS") (=ucs . #x03AC) ; ά @@ -108,21 +89,19 @@ (greek-iso8859-7 . #xB6) ; &I-GREEK-36; )) (define-char - '((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") + '((->lowercase + ((=jis-x0212 . #x2671) ; &JSP-2671; [06-81] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER ALPHA WITH TONOS") + (=ucs . #x0386) ; Ά )) (<-fullwidth ((name . "GREEK CAPITAL LETTER ALPHA WITH TONOS") (=ucs . #x0386) ; Ά )) (=jis-x0212 . #x2661) ; &JSP-2661; [06-65] - (=ucs@jis . #x0386) ; &JSP-2661; + (=ucs@jis/fw . #x0386) ; &JSP-2661; )) (define-char '((name . "GREEK ANO TELEIA") @@ -138,11 +117,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x0395 #x0301) - (->fullwidth - ((name . "fullwidth greek capital letter epsilon with tonos") - (=jis-x0212 . #x2662) ; &JSP-2662; [06-66] - (=ucs@jis . #x0388) ; &JSP-2662; - )) (->lowercase ((name . "GREEK SMALL LETTER EPSILON WITH TONOS") (=ucs . #x03AD) ; έ @@ -151,21 +125,19 @@ (greek-iso8859-7 . #xB8) ; &I-GREEK-38; )) (define-char - '((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") + '((->lowercase + ((=jis-x0212 . #x2672) ; &JSP-2672; [06-82] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER EPSILON WITH TONOS") + (=ucs . #x0388) ; Έ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER EPSILON WITH TONOS") (=ucs . #x0388) ; Έ )) (=jis-x0212 . #x2662) ; &JSP-2662; [06-66] - (=ucs@jis . #x0388) ; &JSP-2662; + (=ucs@jis/fw . #x0388) ; &JSP-2662; )) (define-char '((name . "GREEK CAPITAL LETTER ETA WITH TONOS") @@ -173,11 +145,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x0397 #x0301) - (->fullwidth - ((name . "fullwidth greek capital letter eta with tonos") - (=jis-x0212 . #x2663) ; &JSP-2663; [06-67] - (=ucs@jis . #x0389) ; &JSP-2663; - )) (->lowercase ((name . "GREEK SMALL LETTER ETA WITH TONOS") (=ucs . #x03AE) ; ή @@ -186,21 +153,19 @@ (greek-iso8859-7 . #xB9) ; &I-GREEK-39; )) (define-char - '((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") + '((->lowercase + ((=jis-x0212 . #x2673) ; &JSP-2673; [06-83] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER ETA WITH TONOS") + (=ucs . #x0389) ; Ή )) (<-fullwidth ((name . "GREEK CAPITAL LETTER ETA WITH TONOS") (=ucs . #x0389) ; Ή )) (=jis-x0212 . #x2663) ; &JSP-2663; [06-67] - (=ucs@jis . #x0389) ; &JSP-2663; + (=ucs@jis/fw . #x0389) ; &JSP-2663; )) (define-char '((name . "GREEK CAPITAL LETTER IOTA WITH TONOS") @@ -208,11 +173,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x0399 #x0301) - (->fullwidth - ((name . "fullwidth greek capital letter iota with tonos") - (=jis-x0212 . #x2664) ; &JSP-2664; [06-68] - (=ucs@jis . #x038A) ; &JSP-2664; - )) (->lowercase ((name . "GREEK SMALL LETTER IOTA WITH TONOS") (=ucs . #x03AF) ; ί @@ -221,21 +181,19 @@ (greek-iso8859-7 . #xBA) ; &I-GREEK-3A; )) (define-char - '((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") + '((->lowercase + ((=jis-x0212 . #x2674) ; &JSP-2674; [06-84] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER IOTA WITH TONOS") + (=ucs . #x038A) ; Ί )) (<-fullwidth ((name . "GREEK CAPITAL LETTER IOTA WITH TONOS") (=ucs . #x038A) ; Ί )) (=jis-x0212 . #x2664) ; &JSP-2664; [06-68] - (=ucs@jis . #x038A) ; &JSP-2664; + (=ucs@jis/fw . #x038A) ; &JSP-2664; )) (define-char '((name . "GREEK CAPITAL LETTER OMICRON WITH TONOS") @@ -243,11 +201,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x039F #x0301) - (->fullwidth - ((name . "fullwidth greek capital letter omicron with tonos") - (=jis-x0212 . #x2667) ; &JSP-2667; [06-71] - (=ucs@jis . #x038C) ; &JSP-2667; - )) (->lowercase ((name . "GREEK SMALL LETTER OMICRON WITH TONOS") (=ucs . #x03CC) ; ό @@ -256,21 +209,19 @@ (greek-iso8859-7 . #xBC) ; &I-GREEK-3C; )) (define-char - '((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") + '((->lowercase + ((=jis-x0212 . #x2677) ; &JSP-2677; [06-87] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER OMICRON WITH TONOS") + (=ucs . #x038C) ; Ό )) (<-fullwidth ((name . "GREEK CAPITAL LETTER OMICRON WITH TONOS") (=ucs . #x038C) ; Ό )) (=jis-x0212 . #x2667) ; &JSP-2667; [06-71] - (=ucs@jis . #x038C) ; &JSP-2667; + (=ucs@jis/fw . #x038C) ; &JSP-2667; )) (define-char '((name . "GREEK CAPITAL LETTER UPSILON WITH TONOS") @@ -278,11 +229,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03A5 #x0301) - (->fullwidth - ((name . "fullwidth greek capital letter upsilon with tonos") - (=jis-x0212 . #x2669) ; &JSP-2669; [06-73] - (=ucs@jis . #x038E) ; &JSP-2669; - )) (->lowercase ((name . "GREEK SMALL LETTER UPSILON WITH TONOS") (=ucs . #x03CD) ; ύ @@ -291,21 +237,19 @@ (greek-iso8859-7 . #xBE) ; &I-GREEK-3E; )) (define-char - '((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") + '((->lowercase + ((=jis-x0212 . #x2679) ; &JSP-2679; [06-89] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER UPSILON WITH TONOS") + (=ucs . #x038E) ; Ύ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER UPSILON WITH TONOS") (=ucs . #x038E) ; Ύ )) (=jis-x0212 . #x2669) ; &JSP-2669; [06-73] - (=ucs@jis . #x038E) ; &JSP-2669; + (=ucs@jis/fw . #x038E) ; &JSP-2669; )) (define-char '((name . "GREEK CAPITAL LETTER OMEGA WITH TONOS") @@ -313,11 +257,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03A9 #x0301) - (->fullwidth - ((name . "fullwidth greek capital letter omega with tonos") - (=jis-x0212 . #x266C) ; &JSP-266C; [06-76] - (=ucs@jis . #x038F) ; &JSP-266C; - )) (->lowercase ((name . "GREEK SMALL LETTER OMEGA WITH TONOS") (=ucs . #x03CE) ; ώ @@ -326,21 +265,19 @@ (greek-iso8859-7 . #xBF) ; &I-GREEK-3F; )) (define-char - '((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") + '((->lowercase + ((=jis-x0212 . #x267C) ; &JSP-267C; [06-92] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER OMEGA WITH TONOS") + (=ucs . #x038F) ; Ώ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER OMEGA WITH TONOS") (=ucs . #x038F) ; Ώ )) (=jis-x0212 . #x266C) ; &JSP-266C; [06-76] - (=ucs@jis . #x038F) ; &JSP-266C; + (=ucs@jis/fw . #x038F) ; &JSP-266C; )) (define-char '((name . "GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS") @@ -348,40 +285,26 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03CA #x0301) - (->fullwidth - ((name . "fullwidth greek small letter iota with dialytika and tonos") - (=jis-x0212 . #x2676) ; &JSP-2676; [06-86] - (=ucs@jis . #x0390) ; &JSP-2676; - )) (=ucs . #x0390) ; ΐ (greek-iso8859-7 . #xC0) ; &I-GREEK-40; )) (define-char - '((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) + '((<-denotational + ((name . "GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS") + (=ucs . #x0390) ; ΐ + )) (<-fullwidth ((name . "GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS") (=ucs . #x0390) ; ΐ )) (=jis-x0212 . #x2676) ; &JSP-2676; [06-86] - (=ucs@jis . #x0390) ; &JSP-2676; + (=ucs@jis/fw . #x0390) ; &JSP-2676; )) (define-char '((name . "GREEK CAPITAL LETTER ALPHA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter alpha") - (=jis-x0208 . #x2621) ; &J90-2621; [06-01] - (=gb2312 . #x2621) ; &I-G0-2621; [06-01] - (=ks-x1001 . #x2541) ; &I-K0-2541; [05-33] - (=cns11643-1 . #x2475) ; &I-C1-2475; [04-85] - )) (->lowercase ((name . "GREEK SMALL LETTER ALPHA") (=ucs . #x03B1) ; α @@ -390,14 +313,15 @@ (greek-iso8859-7 . #xC1) ; &I-GREEK-41; )) (define-char - '((name . "fullwidth greek capital letter alpha") - (=>ucs . #x0391) ; Α - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x0391) - (->lowercase - ((name . "fullwidth greek small letter alpha") + '((->lowercase + ((=jis-x0208 . #x2641) ; &J90-2641; [06-33] + (=gb2312 . #x2641) ; &I-G0-2641; [06-33] + (=ks-x1001 . #x2561) ; &I-K0-2561; [05-65] + (=cns11643-1 . #x252F) ; &I-C1-252F; [05-15] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER ALPHA") + (=ucs . #x0391) ; Α )) (<-fullwidth ((name . "GREEK CAPITAL LETTER ALPHA") @@ -408,20 +332,13 @@ (=ks-x1001 . #x2541) ; &I-K0-2541; [05-33] (=cns11643-1 . #x2475) ; &I-C1-2475; [04-85] (=big5 . #xA344) ; &I-B-A344; - (=ucs@jis . #x0391) ; &J90-2621; + (=ucs@jis/fw . #x0391) ; &J90-2621; )) (define-char '((name . "GREEK CAPITAL LETTER BETA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter beta") - (=jis-x0208 . #x2622) ; &J90-2622; [06-02] - (=gb2312 . #x2622) ; &I-G0-2622; [06-02] - (=ks-x1001 . #x2542) ; &I-K0-2542; [05-34] - (=cns11643-1 . #x2476) ; &I-C1-2476; [04-86] - )) (->lowercase ((name . "GREEK SMALL LETTER BETA") (=ucs . #x03B2) ; β @@ -430,14 +347,15 @@ (greek-iso8859-7 . #xC2) ; &I-GREEK-42; )) (define-char - '((name . "fullwidth greek capital letter beta") - (=>ucs . #x0392) ; Β - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x0392) - (->lowercase - ((name . "fullwidth greek small letter beta") + '((->lowercase + ((=jis-x0208 . #x2642) ; &J90-2642; [06-34] + (=gb2312 . #x2642) ; &I-G0-2642; [06-34] + (=ks-x1001 . #x2562) ; &I-K0-2562; [05-66] + (=cns11643-1 . #x2530) ; &I-C1-2530; [05-16] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER BETA") + (=ucs . #x0392) ; Β )) (<-fullwidth ((name . "GREEK CAPITAL LETTER BETA") @@ -448,20 +366,13 @@ (=ks-x1001 . #x2542) ; &I-K0-2542; [05-34] (=cns11643-1 . #x2476) ; &I-C1-2476; [04-86] (=big5 . #xA345) ; &I-B-A345; - (=ucs@jis . #x0392) ; &J90-2622; + (=ucs@jis/fw . #x0392) ; &J90-2622; )) (define-char '((name . "GREEK CAPITAL LETTER GAMMA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter gamma") - (=jis-x0208 . #x2623) ; &J90-2623; [06-03] - (=gb2312 . #x2623) ; &I-G0-2623; [06-03] - (=ks-x1001 . #x2543) ; &I-K0-2543; [05-35] - (=cns11643-1 . #x2477) ; &I-C1-2477; [04-87] - )) (->lowercase ((name . "GREEK SMALL LETTER GAMMA") (=ucs . #x03B3) ; γ @@ -470,14 +381,15 @@ (greek-iso8859-7 . #xC3) ; &I-GREEK-43; )) (define-char - '((name . "fullwidth greek capital letter gamma") - (=>ucs . #x0393) ; Γ - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x0393) - (->lowercase - ((name . "fullwidth greek small letter gamma") + '((->lowercase + ((=jis-x0208 . #x2643) ; &J90-2643; [06-35] + (=gb2312 . #x2643) ; &I-G0-2643; [06-35] + (=ks-x1001 . #x2563) ; &I-K0-2563; [05-67] + (=cns11643-1 . #x2531) ; &I-C1-2531; [05-17] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER GAMMA") + (=ucs . #x0393) ; Γ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER GAMMA") @@ -488,20 +400,13 @@ (=ks-x1001 . #x2543) ; &I-K0-2543; [05-35] (=cns11643-1 . #x2477) ; &I-C1-2477; [04-87] (=big5 . #xA346) ; &I-B-A346; - (=ucs@jis . #x0393) ; &J90-2623; + (=ucs@jis/fw . #x0393) ; &J90-2623; )) (define-char '((name . "GREEK CAPITAL LETTER DELTA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter delta") - (=jis-x0208 . #x2624) ; &J90-2624; [06-04] - (=gb2312 . #x2624) ; &I-G0-2624; [06-04] - (=ks-x1001 . #x2544) ; &I-K0-2544; [05-36] - (=cns11643-1 . #x2478) ; &I-C1-2478; [04-88] - )) (->lowercase ((name . "GREEK SMALL LETTER DELTA") (=ucs . #x03B4) ; δ @@ -510,14 +415,15 @@ (greek-iso8859-7 . #xC4) ; &I-GREEK-44; )) (define-char - '((name . "fullwidth greek capital letter delta") - (=>ucs . #x0394) ; Δ - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x0394) - (->lowercase - ((name . "fullwidth greek small letter delta") + '((->lowercase + ((=jis-x0208 . #x2644) ; &J90-2644; [06-36] + (=gb2312 . #x2644) ; &I-G0-2644; [06-36] + (=ks-x1001 . #x2564) ; &I-K0-2564; [05-68] + (=cns11643-1 . #x2532) ; &I-C1-2532; [05-18] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER DELTA") + (=ucs . #x0394) ; Δ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER DELTA") @@ -528,20 +434,13 @@ (=ks-x1001 . #x2544) ; &I-K0-2544; [05-36] (=cns11643-1 . #x2478) ; &I-C1-2478; [04-88] (=big5 . #xA347) ; &I-B-A347; - (=ucs@jis . #x0394) ; &J90-2624; + (=ucs@jis/fw . #x0394) ; &J90-2624; )) (define-char '((name . "GREEK CAPITAL LETTER EPSILON") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter epsilon") - (=jis-x0208 . #x2625) ; &J90-2625; [06-05] - (=gb2312 . #x2625) ; &I-G0-2625; [06-05] - (=ks-x1001 . #x2545) ; &I-K0-2545; [05-37] - (=cns11643-1 . #x2479) ; &I-C1-2479; [04-89] - )) (->lowercase ((name . "GREEK SMALL LETTER EPSILON") (=ucs . #x03B5) ; ε @@ -550,14 +449,15 @@ (greek-iso8859-7 . #xC5) ; &I-GREEK-45; )) (define-char - '((name . "fullwidth greek capital letter epsilon") - (=>ucs . #x0395) ; Ε - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x0395) - (->lowercase - ((name . "fullwidth greek small letter epsilon") + '((->lowercase + ((=jis-x0208 . #x2645) ; &J90-2645; [06-37] + (=gb2312 . #x2645) ; &I-G0-2645; [06-37] + (=ks-x1001 . #x2565) ; &I-K0-2565; [05-69] + (=cns11643-1 . #x2533) ; &I-C1-2533; [05-19] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER EPSILON") + (=ucs . #x0395) ; Ε )) (<-fullwidth ((name . "GREEK CAPITAL LETTER EPSILON") @@ -568,20 +468,13 @@ (=ks-x1001 . #x2545) ; &I-K0-2545; [05-37] (=cns11643-1 . #x2479) ; &I-C1-2479; [04-89] (=big5 . #xA348) ; &I-B-A348; - (=ucs@jis . #x0395) ; &J90-2625; + (=ucs@jis/fw . #x0395) ; &J90-2625; )) (define-char '((name . "GREEK CAPITAL LETTER ZETA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter zeta") - (=jis-x0208 . #x2626) ; &J90-2626; [06-06] - (=gb2312 . #x2626) ; &I-G0-2626; [06-06] - (=ks-x1001 . #x2546) ; &I-K0-2546; [05-38] - (=cns11643-1 . #x247A) ; &I-C1-247A; [04-90] - )) (->lowercase ((name . "GREEK SMALL LETTER ZETA") (=ucs . #x03B6) ; ζ @@ -590,14 +483,15 @@ (greek-iso8859-7 . #xC6) ; &I-GREEK-46; )) (define-char - '((name . "fullwidth greek capital letter zeta") - (=>ucs . #x0396) ; Ζ - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x0396) - (->lowercase - ((name . "fullwidth greek small letter zeta") + '((->lowercase + ((=jis-x0208 . #x2646) ; &J90-2646; [06-38] + (=gb2312 . #x2646) ; &I-G0-2646; [06-38] + (=ks-x1001 . #x2566) ; &I-K0-2566; [05-70] + (=cns11643-1 . #x2534) ; &I-C1-2534; [05-20] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER ZETA") + (=ucs . #x0396) ; Ζ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER ZETA") @@ -608,20 +502,13 @@ (=ks-x1001 . #x2546) ; &I-K0-2546; [05-38] (=cns11643-1 . #x247A) ; &I-C1-247A; [04-90] (=big5 . #xA349) ; &I-B-A349; - (=ucs@jis . #x0396) ; &J90-2626; + (=ucs@jis/fw . #x0396) ; &J90-2626; )) (define-char '((name . "GREEK CAPITAL LETTER ETA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter eta") - (=jis-x0208 . #x2627) ; &J90-2627; [06-07] - (=gb2312 . #x2627) ; &I-G0-2627; [06-07] - (=ks-x1001 . #x2547) ; &I-K0-2547; [05-39] - (=cns11643-1 . #x247B) ; &I-C1-247B; [04-91] - )) (->lowercase ((name . "GREEK SMALL LETTER ETA") (=ucs . #x03B7) ; η @@ -630,14 +517,15 @@ (greek-iso8859-7 . #xC7) ; &I-GREEK-47; )) (define-char - '((name . "fullwidth greek capital letter eta") - (=>ucs . #x0397) ; Η - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x0397) - (->lowercase - ((name . "fullwidth greek small letter eta") + '((->lowercase + ((=jis-x0208 . #x2647) ; &J90-2647; [06-39] + (=gb2312 . #x2647) ; &I-G0-2647; [06-39] + (=ks-x1001 . #x2567) ; &I-K0-2567; [05-71] + (=cns11643-1 . #x2535) ; &I-C1-2535; [05-21] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER ETA") + (=ucs . #x0397) ; Η )) (<-fullwidth ((name . "GREEK CAPITAL LETTER ETA") @@ -648,20 +536,13 @@ (=ks-x1001 . #x2547) ; &I-K0-2547; [05-39] (=cns11643-1 . #x247B) ; &I-C1-247B; [04-91] (=big5 . #xA34A) ; &I-B-A34A; - (=ucs@jis . #x0397) ; &J90-2627; + (=ucs@jis/fw . #x0397) ; &J90-2627; )) (define-char '((name . "GREEK CAPITAL LETTER THETA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter theta") - (=jis-x0208 . #x2628) ; &J90-2628; [06-08] - (=gb2312 . #x2628) ; &I-G0-2628; [06-08] - (=ks-x1001 . #x2548) ; &I-K0-2548; [05-40] - (=cns11643-1 . #x247C) ; &I-C1-247C; [04-92] - )) (->lowercase ((name . "GREEK SMALL LETTER THETA") (=ucs . #x03B8) ; θ @@ -670,14 +551,15 @@ (greek-iso8859-7 . #xC8) ; &I-GREEK-48; )) (define-char - '((name . "fullwidth greek capital letter theta") - (=>ucs . #x0398) ; Θ - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x0398) - (->lowercase - ((name . "fullwidth greek small letter theta") + '((->lowercase + ((=jis-x0208 . #x2648) ; &J90-2648; [06-40] + (=gb2312 . #x2648) ; &I-G0-2648; [06-40] + (=ks-x1001 . #x2568) ; &I-K0-2568; [05-72] + (=cns11643-1 . #x2536) ; &I-C1-2536; [05-22] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER THETA") + (=ucs . #x0398) ; Θ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER THETA") @@ -688,20 +570,13 @@ (=ks-x1001 . #x2548) ; &I-K0-2548; [05-40] (=cns11643-1 . #x247C) ; &I-C1-247C; [04-92] (=big5 . #xA34B) ; &I-B-A34B; - (=ucs@jis . #x0398) ; &J90-2628; + (=ucs@jis/fw . #x0398) ; &J90-2628; )) (define-char '((name . "GREEK CAPITAL LETTER IOTA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter iota") - (=jis-x0208 . #x2629) ; &J90-2629; [06-09] - (=gb2312 . #x2629) ; &I-G0-2629; [06-09] - (=ks-x1001 . #x2549) ; &I-K0-2549; [05-41] - (=cns11643-1 . #x247D) ; &I-C1-247D; [04-93] - )) (->lowercase ((name . "GREEK SMALL LETTER IOTA") (=ucs . #x03B9) ; ι @@ -710,14 +585,15 @@ (greek-iso8859-7 . #xC9) ; &I-GREEK-49; )) (define-char - '((name . "fullwidth greek capital letter iota") - (=>ucs . #x0399) ; Ι - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x0399) - (->lowercase - ((name . "fullwidth greek small letter iota") + '((->lowercase + ((=jis-x0208 . #x2649) ; &J90-2649; [06-41] + (=gb2312 . #x2649) ; &I-G0-2649; [06-41] + (=ks-x1001 . #x2569) ; &I-K0-2569; [05-73] + (=cns11643-1 . #x2537) ; &I-C1-2537; [05-23] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER IOTA") + (=ucs . #x0399) ; Ι )) (<-fullwidth ((name . "GREEK CAPITAL LETTER IOTA") @@ -728,20 +604,13 @@ (=ks-x1001 . #x2549) ; &I-K0-2549; [05-41] (=cns11643-1 . #x247D) ; &I-C1-247D; [04-93] (=big5 . #xA34C) ; &I-B-A34C; - (=ucs@jis . #x0399) ; &J90-2629; + (=ucs@jis/fw . #x0399) ; &J90-2629; )) (define-char '((name . "GREEK CAPITAL LETTER KAPPA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter kappa") - (=jis-x0208 . #x262A) ; &J90-262A; [06-10] - (=gb2312 . #x262A) ; &I-G0-262A; [06-10] - (=ks-x1001 . #x254A) ; &I-K0-254A; [05-42] - (=cns11643-1 . #x247E) ; &I-C1-247E; [04-94] - )) (->lowercase ((name . "GREEK SMALL LETTER KAPPA") (=ucs . #x03BA) ; κ @@ -750,14 +619,15 @@ (greek-iso8859-7 . #xCA) ; &I-GREEK-4A; )) (define-char - '((name . "fullwidth greek capital letter kappa") - (=>ucs . #x039A) ; Κ - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x039A) - (->lowercase - ((name . "fullwidth greek small letter kappa") + '((->lowercase + ((=jis-x0208 . #x264A) ; &J90-264A; [06-42] + (=gb2312 . #x264A) ; &I-G0-264A; [06-42] + (=ks-x1001 . #x256A) ; &I-K0-256A; [05-74] + (=cns11643-1 . #x2538) ; &I-C1-2538; [05-24] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER KAPPA") + (=ucs . #x039A) ; Κ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER KAPPA") @@ -768,20 +638,13 @@ (=ks-x1001 . #x254A) ; &I-K0-254A; [05-42] (=cns11643-1 . #x247E) ; &I-C1-247E; [04-94] (=big5 . #xA34D) ; &I-B-A34D; - (=ucs@jis . #x039A) ; &J90-262A; + (=ucs@jis/fw . #x039A) ; &J90-262A; )) (define-char '((name . "GREEK CAPITAL LETTER LAMDA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter lamda") - (=jis-x0208 . #x262B) ; &J90-262B; [06-11] - (=gb2312 . #x262B) ; &I-G0-262B; [06-11] - (=ks-x1001 . #x254B) ; &I-K0-254B; [05-43] - (=cns11643-1 . #x2521) ; &I-C1-2521; [05-01] - )) (->lowercase ((name . "GREEK SMALL LETTER LAMDA") (=ucs . #x03BB) ; λ @@ -790,14 +653,15 @@ (greek-iso8859-7 . #xCB) ; &I-GREEK-4B; )) (define-char - '((name . "fullwidth greek capital letter lamda") - (=>ucs . #x039B) ; Λ - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x039B) - (->lowercase - ((name . "fullwidth greek small letter lamda") + '((->lowercase + ((=jis-x0208 . #x264B) ; &J90-264B; [06-43] + (=gb2312 . #x264B) ; &I-G0-264B; [06-43] + (=ks-x1001 . #x256B) ; &I-K0-256B; [05-75] + (=cns11643-1 . #x2539) ; &I-C1-2539; [05-25] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER LAMDA") + (=ucs . #x039B) ; Λ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER LAMDA") @@ -808,20 +672,13 @@ (=ks-x1001 . #x254B) ; &I-K0-254B; [05-43] (=cns11643-1 . #x2521) ; &I-C1-2521; [05-01] (=big5 . #xA34E) ; &I-B-A34E; - (=ucs@jis . #x039B) ; &J90-262B; + (=ucs@jis/fw . #x039B) ; &J90-262B; )) (define-char '((name . "GREEK CAPITAL LETTER MU") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter mu") - (=jis-x0208 . #x262C) ; &J90-262C; [06-12] - (=gb2312 . #x262C) ; &I-G0-262C; [06-12] - (=ks-x1001 . #x254C) ; &I-K0-254C; [05-44] - (=cns11643-1 . #x2522) ; &I-C1-2522; [05-02] - )) (->lowercase ((name . "GREEK SMALL LETTER MU") (=ucs . #x03BC) ; μ @@ -830,14 +687,15 @@ (greek-iso8859-7 . #xCC) ; &I-GREEK-4C; )) (define-char - '((name . "fullwidth greek capital letter mu") - (=>ucs . #x039C) ; Μ - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x039C) - (->lowercase - ((name . "fullwidth greek small letter mu") + '((->lowercase + ((=jis-x0208 . #x264C) ; &J90-264C; [06-44] + (=gb2312 . #x264C) ; &I-G0-264C; [06-44] + (=ks-x1001 . #x256C) ; &I-K0-256C; [05-76] + (=cns11643-1 . #x253A) ; &I-C1-253A; [05-26] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER MU") + (=ucs . #x039C) ; Μ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER MU") @@ -848,20 +706,13 @@ (=ks-x1001 . #x254C) ; &I-K0-254C; [05-44] (=cns11643-1 . #x2522) ; &I-C1-2522; [05-02] (=big5 . #xA34F) ; &I-B-A34F; - (=ucs@jis . #x039C) ; &J90-262C; + (=ucs@jis/fw . #x039C) ; &J90-262C; )) (define-char '((name . "GREEK CAPITAL LETTER NU") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter nu") - (=jis-x0208 . #x262D) ; &J90-262D; [06-13] - (=gb2312 . #x262D) ; &I-G0-262D; [06-13] - (=ks-x1001 . #x254D) ; &I-K0-254D; [05-45] - (=cns11643-1 . #x2523) ; &I-C1-2523; [05-03] - )) (->lowercase ((name . "GREEK SMALL LETTER NU") (=ucs . #x03BD) ; ν @@ -870,14 +721,15 @@ (greek-iso8859-7 . #xCD) ; &I-GREEK-4D; )) (define-char - '((name . "fullwidth greek capital letter nu") - (=>ucs . #x039D) ; Ν - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x039D) - (->lowercase - ((name . "fullwidth greek small letter nu") + '((->lowercase + ((=jis-x0208 . #x264D) ; &J90-264D; [06-45] + (=gb2312 . #x264D) ; &I-G0-264D; [06-45] + (=ks-x1001 . #x256D) ; &I-K0-256D; [05-77] + (=cns11643-1 . #x253B) ; &I-C1-253B; [05-27] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER NU") + (=ucs . #x039D) ; Ν )) (<-fullwidth ((name . "GREEK CAPITAL LETTER NU") @@ -888,20 +740,13 @@ (=ks-x1001 . #x254D) ; &I-K0-254D; [05-45] (=cns11643-1 . #x2523) ; &I-C1-2523; [05-03] (=big5 . #xA350) ; &I-B-A350; - (=ucs@jis . #x039D) ; &J90-262D; + (=ucs@jis/fw . #x039D) ; &J90-262D; )) (define-char '((name . "GREEK CAPITAL LETTER XI") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter xi") - (=jis-x0208 . #x262E) ; &J90-262E; [06-14] - (=gb2312 . #x262E) ; &I-G0-262E; [06-14] - (=ks-x1001 . #x254E) ; &I-K0-254E; [05-46] - (=cns11643-1 . #x2524) ; &I-C1-2524; [05-04] - )) (->lowercase ((name . "GREEK SMALL LETTER XI") (=ucs . #x03BE) ; ξ @@ -910,14 +755,15 @@ (greek-iso8859-7 . #xCE) ; &I-GREEK-4E; )) (define-char - '((name . "fullwidth greek capital letter xi") - (=>ucs . #x039E) ; Ξ - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x039E) - (->lowercase - ((name . "fullwidth greek small letter xi") + '((->lowercase + ((=jis-x0208 . #x264E) ; &J90-264E; [06-46] + (=gb2312 . #x264E) ; &I-G0-264E; [06-46] + (=ks-x1001 . #x256E) ; &I-K0-256E; [05-78] + (=cns11643-1 . #x253C) ; &I-C1-253C; [05-28] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER XI") + (=ucs . #x039E) ; Ξ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER XI") @@ -928,20 +774,13 @@ (=ks-x1001 . #x254E) ; &I-K0-254E; [05-46] (=cns11643-1 . #x2524) ; &I-C1-2524; [05-04] (=big5 . #xA351) ; &I-B-A351; - (=ucs@jis . #x039E) ; &J90-262E; + (=ucs@jis/fw . #x039E) ; &J90-262E; )) (define-char '((name . "GREEK CAPITAL LETTER OMICRON") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter omicron") - (=jis-x0208 . #x262F) ; &J90-262F; [06-15] - (=gb2312 . #x262F) ; &I-G0-262F; [06-15] - (=ks-x1001 . #x254F) ; &I-K0-254F; [05-47] - (=cns11643-1 . #x2525) ; &I-C1-2525; [05-05] - )) (->lowercase ((name . "GREEK SMALL LETTER OMICRON") (=ucs . #x03BF) ; ο @@ -950,14 +789,15 @@ (greek-iso8859-7 . #xCF) ; &I-GREEK-4F; )) (define-char - '((name . "fullwidth greek capital letter omicron") - (=>ucs . #x039F) ; Ο - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x039F) - (->lowercase - ((name . "fullwidth greek small letter omicron") + '((->lowercase + ((=jis-x0208 . #x264F) ; &J90-264F; [06-47] + (=gb2312 . #x264F) ; &I-G0-264F; [06-47] + (=ks-x1001 . #x256F) ; &I-K0-256F; [05-79] + (=cns11643-1 . #x253D) ; &I-C1-253D; [05-29] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER OMICRON") + (=ucs . #x039F) ; Ο )) (<-fullwidth ((name . "GREEK CAPITAL LETTER OMICRON") @@ -968,20 +808,13 @@ (=ks-x1001 . #x254F) ; &I-K0-254F; [05-47] (=cns11643-1 . #x2525) ; &I-C1-2525; [05-05] (=big5 . #xA352) ; &I-B-A352; - (=ucs@jis . #x039F) ; &J90-262F; + (=ucs@jis/fw . #x039F) ; &J90-262F; )) (define-char '((name . "GREEK CAPITAL LETTER PI") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter pi") - (=jis-x0208 . #x2630) ; &J90-2630; [06-16] - (=gb2312 . #x2630) ; &I-G0-2630; [06-16] - (=ks-x1001 . #x2550) ; &I-K0-2550; [05-48] - (=cns11643-1 . #x2526) ; &I-C1-2526; [05-06] - )) (->lowercase ((name . "GREEK SMALL LETTER PI") (=ucs . #x03C0) ; π @@ -990,14 +823,15 @@ (greek-iso8859-7 . #xD0) ; &I-GREEK-50; )) (define-char - '((name . "fullwidth greek capital letter pi") - (=>ucs . #x03A0) ; Π - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03A0) - (->lowercase - ((name . "fullwidth greek small letter pi") + '((->lowercase + ((=jis-x0208 . #x2650) ; &J90-2650; [06-48] + (=gb2312 . #x2650) ; &I-G0-2650; [06-48] + (=ks-x1001 . #x2570) ; &I-K0-2570; [05-80] + (=cns11643-1 . #x253E) ; &I-C1-253E; [05-30] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER PI") + (=ucs . #x03A0) ; Π )) (<-fullwidth ((name . "GREEK CAPITAL LETTER PI") @@ -1008,20 +842,13 @@ (=ks-x1001 . #x2550) ; &I-K0-2550; [05-48] (=cns11643-1 . #x2526) ; &I-C1-2526; [05-06] (=big5 . #xA353) ; &I-B-A353; - (=ucs@jis . #x03A0) ; &J90-2630; + (=ucs@jis/fw . #x03A0) ; &J90-2630; )) (define-char '((name . "GREEK CAPITAL LETTER RHO") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter rho") - (=jis-x0208 . #x2631) ; &J90-2631; [06-17] - (=gb2312 . #x2631) ; &I-G0-2631; [06-17] - (=ks-x1001 . #x2551) ; &I-K0-2551; [05-49] - (=cns11643-1 . #x2527) ; &I-C1-2527; [05-07] - )) (->lowercase ((name . "GREEK SMALL LETTER RHO") (=ucs . #x03C1) ; ρ @@ -1030,14 +857,15 @@ (greek-iso8859-7 . #xD1) ; &I-GREEK-51; )) (define-char - '((name . "fullwidth greek capital letter rho") - (=>ucs . #x03A1) ; Ρ - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03A1) - (->lowercase - ((name . "fullwidth greek small letter rho") + '((->lowercase + ((=jis-x0208 . #x2651) ; &J90-2651; [06-49] + (=gb2312 . #x2651) ; &I-G0-2651; [06-49] + (=ks-x1001 . #x2571) ; &I-K0-2571; [05-81] + (=cns11643-1 . #x253F) ; &I-C1-253F; [05-31] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER RHO") + (=ucs . #x03A1) ; Ρ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER RHO") @@ -1048,20 +876,13 @@ (=ks-x1001 . #x2551) ; &I-K0-2551; [05-49] (=cns11643-1 . #x2527) ; &I-C1-2527; [05-07] (=big5 . #xA354) ; &I-B-A354; - (=ucs@jis . #x03A1) ; &J90-2631; + (=ucs@jis/fw . #x03A1) ; &J90-2631; )) (define-char '((name . "GREEK CAPITAL LETTER SIGMA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter sigma") - (=jis-x0208 . #x2632) ; &J90-2632; [06-18] - (=gb2312 . #x2632) ; &I-G0-2632; [06-18] - (=ks-x1001 . #x2552) ; &I-K0-2552; [05-50] - (=cns11643-1 . #x2528) ; &I-C1-2528; [05-08] - )) (->lowercase ((name . "GREEK SMALL LETTER SIGMA") (=ucs . #x03C3) ; σ @@ -1070,14 +891,15 @@ (greek-iso8859-7 . #xD3) ; &I-GREEK-53; )) (define-char - '((name . "fullwidth greek capital letter sigma") - (=>ucs . #x03A3) ; Σ - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03A3) - (->lowercase - ((name . "fullwidth greek small letter sigma") + '((->lowercase + ((=jis-x0208 . #x2652) ; &J90-2652; [06-50] + (=gb2312 . #x2652) ; &I-G0-2652; [06-50] + (=ks-x1001 . #x2572) ; &I-K0-2572; [05-82] + (=cns11643-1 . #x2540) ; &I-C1-2540; [05-32] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER SIGMA") + (=ucs . #x03A3) ; Σ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER SIGMA") @@ -1088,20 +910,13 @@ (=ks-x1001 . #x2552) ; &I-K0-2552; [05-50] (=cns11643-1 . #x2528) ; &I-C1-2528; [05-08] (=big5 . #xA355) ; &I-B-A355; - (=ucs@jis . #x03A3) ; &J90-2632; + (=ucs@jis/fw . #x03A3) ; &J90-2632; )) (define-char '((name . "GREEK CAPITAL LETTER TAU") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter tau") - (=jis-x0208 . #x2633) ; &J90-2633; [06-19] - (=gb2312 . #x2633) ; &I-G0-2633; [06-19] - (=ks-x1001 . #x2553) ; &I-K0-2553; [05-51] - (=cns11643-1 . #x2529) ; &I-C1-2529; [05-09] - )) (->lowercase ((name . "GREEK SMALL LETTER TAU") (=ucs . #x03C4) ; τ @@ -1110,14 +925,15 @@ (greek-iso8859-7 . #xD4) ; &I-GREEK-54; )) (define-char - '((name . "fullwidth greek capital letter tau") - (=>ucs . #x03A4) ; Τ - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03A4) - (->lowercase - ((name . "fullwidth greek small letter tau") + '((->lowercase + ((=jis-x0208 . #x2653) ; &J90-2653; [06-51] + (=gb2312 . #x2653) ; &I-G0-2653; [06-51] + (=ks-x1001 . #x2573) ; &I-K0-2573; [05-83] + (=cns11643-1 . #x2541) ; &I-C1-2541; [05-33] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER TAU") + (=ucs . #x03A4) ; Τ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER TAU") @@ -1128,20 +944,13 @@ (=ks-x1001 . #x2553) ; &I-K0-2553; [05-51] (=cns11643-1 . #x2529) ; &I-C1-2529; [05-09] (=big5 . #xA356) ; &I-B-A356; - (=ucs@jis . #x03A4) ; &J90-2633; + (=ucs@jis/fw . #x03A4) ; &J90-2633; )) (define-char '((name . "GREEK CAPITAL LETTER UPSILON") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter upsilon") - (=jis-x0208 . #x2634) ; &J90-2634; [06-20] - (=gb2312 . #x2634) ; &I-G0-2634; [06-20] - (=ks-x1001 . #x2554) ; &I-K0-2554; [05-52] - (=cns11643-1 . #x252A) ; &I-C1-252A; [05-10] - )) (->lowercase ((name . "GREEK SMALL LETTER UPSILON") (=ucs . #x03C5) ; υ @@ -1150,14 +959,15 @@ (greek-iso8859-7 . #xD5) ; &I-GREEK-55; )) (define-char - '((name . "fullwidth greek capital letter upsilon") - (=>ucs . #x03A5) ; Υ - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03A5) - (->lowercase - ((name . "fullwidth greek small letter upsilon") + '((->lowercase + ((=jis-x0208 . #x2654) ; &J90-2654; [06-52] + (=gb2312 . #x2654) ; &I-G0-2654; [06-52] + (=ks-x1001 . #x2574) ; &I-K0-2574; [05-84] + (=cns11643-1 . #x2542) ; &I-C1-2542; [05-34] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER UPSILON") + (=ucs . #x03A5) ; Υ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER UPSILON") @@ -1168,20 +978,13 @@ (=ks-x1001 . #x2554) ; &I-K0-2554; [05-52] (=cns11643-1 . #x252A) ; &I-C1-252A; [05-10] (=big5 . #xA357) ; &I-B-A357; - (=ucs@jis . #x03A5) ; &J90-2634; + (=ucs@jis/fw . #x03A5) ; &J90-2634; )) (define-char '((name . "GREEK CAPITAL LETTER PHI") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter phi") - (=jis-x0208 . #x2635) ; &J90-2635; [06-21] - (=gb2312 . #x2635) ; &I-G0-2635; [06-21] - (=ks-x1001 . #x2555) ; &I-K0-2555; [05-53] - (=cns11643-1 . #x252B) ; &I-C1-252B; [05-11] - )) (->lowercase ((name . "GREEK SMALL LETTER PHI") (=ucs . #x03C6) ; φ @@ -1190,14 +993,15 @@ (greek-iso8859-7 . #xD6) ; &I-GREEK-56; )) (define-char - '((name . "fullwidth greek capital letter phi") - (=>ucs . #x03A6) ; Φ - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03A6) - (->lowercase - ((name . "fullwidth greek small letter phi") + '((->lowercase + ((=jis-x0208 . #x2655) ; &J90-2655; [06-53] + (=gb2312 . #x2655) ; &I-G0-2655; [06-53] + (=ks-x1001 . #x2575) ; &I-K0-2575; [05-85] + (=cns11643-1 . #x2543) ; &I-C1-2543; [05-35] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER PHI") + (=ucs . #x03A6) ; Φ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER PHI") @@ -1208,20 +1012,13 @@ (=ks-x1001 . #x2555) ; &I-K0-2555; [05-53] (=cns11643-1 . #x252B) ; &I-C1-252B; [05-11] (=big5 . #xA358) ; &I-B-A358; - (=ucs@jis . #x03A6) ; &J90-2635; + (=ucs@jis/fw . #x03A6) ; &J90-2635; )) (define-char '((name . "GREEK CAPITAL LETTER CHI") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter chi") - (=jis-x0208 . #x2636) ; &J90-2636; [06-22] - (=gb2312 . #x2636) ; &I-G0-2636; [06-22] - (=ks-x1001 . #x2556) ; &I-K0-2556; [05-54] - (=cns11643-1 . #x252C) ; &I-C1-252C; [05-12] - )) (->lowercase ((name . "GREEK SMALL LETTER CHI") (=ucs . #x03C7) ; χ @@ -1230,14 +1027,15 @@ (greek-iso8859-7 . #xD7) ; &I-GREEK-57; )) (define-char - '((name . "fullwidth greek capital letter chi") - (=>ucs . #x03A7) ; Χ - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03A7) - (->lowercase - ((name . "fullwidth greek small letter chi") + '((->lowercase + ((=jis-x0208 . #x2656) ; &J90-2656; [06-54] + (=gb2312 . #x2656) ; &I-G0-2656; [06-54] + (=ks-x1001 . #x2576) ; &I-K0-2576; [05-86] + (=cns11643-1 . #x2544) ; &I-C1-2544; [05-36] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER CHI") + (=ucs . #x03A7) ; Χ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER CHI") @@ -1248,20 +1046,13 @@ (=ks-x1001 . #x2556) ; &I-K0-2556; [05-54] (=cns11643-1 . #x252C) ; &I-C1-252C; [05-12] (=big5 . #xA359) ; &I-B-A359; - (=ucs@jis . #x03A7) ; &J90-2636; + (=ucs@jis/fw . #x03A7) ; &J90-2636; )) (define-char '((name . "GREEK CAPITAL LETTER PSI") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter psi") - (=jis-x0208 . #x2637) ; &J90-2637; [06-23] - (=gb2312 . #x2637) ; &I-G0-2637; [06-23] - (=ks-x1001 . #x2557) ; &I-K0-2557; [05-55] - (=cns11643-1 . #x252D) ; &I-C1-252D; [05-13] - )) (->lowercase ((name . "GREEK SMALL LETTER PSI") (=ucs . #x03C8) ; ψ @@ -1270,14 +1061,15 @@ (greek-iso8859-7 . #xD8) ; &I-GREEK-58; )) (define-char - '((name . "fullwidth greek capital letter psi") - (=>ucs . #x03A8) ; Ψ - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03A8) - (->lowercase - ((name . "fullwidth greek small letter psi") + '((->lowercase + ((=jis-x0208 . #x2657) ; &J90-2657; [06-55] + (=gb2312 . #x2657) ; &I-G0-2657; [06-55] + (=ks-x1001 . #x2577) ; &I-K0-2577; [05-87] + (=cns11643-1 . #x2545) ; &I-C1-2545; [05-37] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER PSI") + (=ucs . #x03A8) ; Ψ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER PSI") @@ -1288,20 +1080,13 @@ (=ks-x1001 . #x2557) ; &I-K0-2557; [05-55] (=cns11643-1 . #x252D) ; &I-C1-252D; [05-13] (=big5 . #xA35A) ; &I-B-A35A; - (=ucs@jis . #x03A8) ; &J90-2637; + (=ucs@jis/fw . #x03A8) ; &J90-2637; )) (define-char '((name . "GREEK CAPITAL LETTER OMEGA") (general-category letter uppercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek capital letter omega") - (=jis-x0208 . #x2638) ; &J90-2638; [06-24] - (=gb2312 . #x2638) ; &I-G0-2638; [06-24] - (=ks-x1001 . #x2558) ; &I-K0-2558; [05-56] - (=cns11643-1 . #x252E) ; &I-C1-252E; [05-14] - )) (->lowercase ((name . "GREEK SMALL LETTER OMEGA") (=ucs . #x03C9) ; ω @@ -1310,14 +1095,15 @@ (greek-iso8859-7 . #xD9) ; &I-GREEK-59; )) (define-char - '((name . "fullwidth greek capital letter omega") - (=>ucs . #x03A9) ; Ω - (general-category letter uppercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03A9) - (->lowercase - ((name . "fullwidth greek small letter omega") + '((->lowercase + ((=jis-x0208 . #x2658) ; &J90-2658; [06-56] + (=gb2312 . #x2658) ; &I-G0-2658; [06-56] + (=ks-x1001 . #x2578) ; &I-K0-2578; [05-88] + (=cns11643-1 . #x2546) ; &I-C1-2546; [05-38] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER OMEGA") + (=ucs . #x03A9) ; Ω )) (<-fullwidth ((name . "GREEK CAPITAL LETTER OMEGA") @@ -1328,7 +1114,7 @@ (=ks-x1001 . #x2558) ; &I-K0-2558; [05-56] (=cns11643-1 . #x252E) ; &I-C1-252E; [05-14] (=big5 . #xA35B) ; &I-B-A35B; - (=ucs@jis . #x03A9) ; &J90-2638; + (=ucs@jis/fw . #x03A9) ; &J90-2638; )) (define-char '((name . "GREEK CAPITAL LETTER IOTA WITH DIALYTIKA") @@ -1336,11 +1122,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x0399 #x0308) - (->fullwidth - ((name . "fullwidth greek capital letter iota with dialytika") - (=jis-x0212 . #x2665) ; &JSP-2665; [06-69] - (=ucs@jis . #x03AA) ; &JSP-2665; - )) (->lowercase ((name . "GREEK SMALL LETTER IOTA WITH DIALYTIKA") (=ucs . #x03CA) ; ϊ @@ -1349,21 +1130,19 @@ (greek-iso8859-7 . #xDA) ; &I-GREEK-5A; )) (define-char - '((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") + '((->lowercase + ((=jis-x0212 . #x2675) ; &JSP-2675; [06-85] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER IOTA WITH DIALYTIKA") + (=ucs . #x03AA) ; Ϊ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER IOTA WITH DIALYTIKA") (=ucs . #x03AA) ; Ϊ )) (=jis-x0212 . #x2665) ; &JSP-2665; [06-69] - (=ucs@jis . #x03AA) ; &JSP-2665; + (=ucs@jis/fw . #x03AA) ; &JSP-2665; )) (define-char '((name . "GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA") @@ -1371,11 +1150,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03A5 #x0308) - (->fullwidth - ((name . "fullwidth greek capital letter upsilon with dialytika") - (=jis-x0212 . #x266A) ; &JSP-266A; [06-74] - (=ucs@jis . #x03AB) ; &JSP-266A; - )) (->lowercase ((name . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA") (=ucs . #x03CB) ; ϋ @@ -1384,21 +1158,19 @@ (greek-iso8859-7 . #xDB) ; &I-GREEK-5B; )) (define-char - '((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") + '((->lowercase + ((=jis-x0212 . #x267A) ; &JSP-267A; [06-90] + )) + (<-denotational + ((name . "GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA") + (=ucs . #x03AB) ; Ϋ )) (<-fullwidth ((name . "GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA") (=ucs . #x03AB) ; Ϋ )) (=jis-x0212 . #x266A) ; &JSP-266A; [06-74] - (=ucs@jis . #x03AB) ; &JSP-266A; + (=ucs@jis/fw . #x03AB) ; &JSP-266A; )) (define-char '((name . "GREEK SMALL LETTER ALPHA WITH TONOS") @@ -1406,11 +1178,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03B1 #x0301) - (->fullwidth - ((name . "fullwidth greek small letter alpha with tonos") - (=jis-x0212 . #x2671) ; &JSP-2671; [06-81] - (=ucs@jis . #x03AC) ; &JSP-2671; - )) (->uppercase ((name . "GREEK CAPITAL LETTER ALPHA WITH TONOS") (=ucs . #x0386) ; Ά @@ -1419,21 +1186,19 @@ (greek-iso8859-7 . #xDC) ; &I-GREEK-5C; )) (define-char - '((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") + '((->uppercase + ((=jis-x0212 . #x2661) ; &JSP-2661; [06-65] + )) + (<-denotational + ((name . "GREEK SMALL LETTER ALPHA WITH TONOS") + (=ucs . #x03AC) ; ά )) (<-fullwidth ((name . "GREEK SMALL LETTER ALPHA WITH TONOS") (=ucs . #x03AC) ; ά )) (=jis-x0212 . #x2671) ; &JSP-2671; [06-81] - (=ucs@jis . #x03AC) ; &JSP-2671; + (=ucs@jis/fw . #x03AC) ; &JSP-2671; )) (define-char '((name . "GREEK SMALL LETTER EPSILON WITH TONOS") @@ -1441,11 +1206,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03B5 #x0301) - (->fullwidth - ((name . "fullwidth greek small letter epsilon with tonos") - (=jis-x0212 . #x2672) ; &JSP-2672; [06-82] - (=ucs@jis . #x03AD) ; &JSP-2672; - )) (->uppercase ((name . "GREEK CAPITAL LETTER EPSILON WITH TONOS") (=ucs . #x0388) ; Έ @@ -1454,21 +1214,19 @@ (greek-iso8859-7 . #xDD) ; &I-GREEK-5D; )) (define-char - '((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") + '((->uppercase + ((=jis-x0212 . #x2662) ; &JSP-2662; [06-66] + )) + (<-denotational + ((name . "GREEK SMALL LETTER EPSILON WITH TONOS") + (=ucs . #x03AD) ; έ )) (<-fullwidth ((name . "GREEK SMALL LETTER EPSILON WITH TONOS") (=ucs . #x03AD) ; έ )) (=jis-x0212 . #x2672) ; &JSP-2672; [06-82] - (=ucs@jis . #x03AD) ; &JSP-2672; + (=ucs@jis/fw . #x03AD) ; &JSP-2672; )) (define-char '((name . "GREEK SMALL LETTER ETA WITH TONOS") @@ -1476,11 +1234,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03B7 #x0301) - (->fullwidth - ((name . "fullwidth greek small letter eta with tonos") - (=jis-x0212 . #x2673) ; &JSP-2673; [06-83] - (=ucs@jis . #x03AE) ; &JSP-2673; - )) (->uppercase ((name . "GREEK CAPITAL LETTER ETA WITH TONOS") (=ucs . #x0389) ; Ή @@ -1489,21 +1242,19 @@ (greek-iso8859-7 . #xDE) ; &I-GREEK-5E; )) (define-char - '((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") + '((->uppercase + ((=jis-x0212 . #x2663) ; &JSP-2663; [06-67] + )) + (<-denotational + ((name . "GREEK SMALL LETTER ETA WITH TONOS") + (=ucs . #x03AE) ; ή )) (<-fullwidth ((name . "GREEK SMALL LETTER ETA WITH TONOS") (=ucs . #x03AE) ; ή )) (=jis-x0212 . #x2673) ; &JSP-2673; [06-83] - (=ucs@jis . #x03AE) ; &JSP-2673; + (=ucs@jis/fw . #x03AE) ; &JSP-2673; )) (define-char '((name . "GREEK SMALL LETTER IOTA WITH TONOS") @@ -1511,11 +1262,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03B9 #x0301) - (->fullwidth - ((name . "fullwidth greek small letter iota with tonos") - (=jis-x0212 . #x2674) ; &JSP-2674; [06-84] - (=ucs@jis . #x03AF) ; &JSP-2674; - )) (->uppercase ((name . "GREEK CAPITAL LETTER IOTA WITH TONOS") (=ucs . #x038A) ; Ί @@ -1524,21 +1270,19 @@ (greek-iso8859-7 . #xDF) ; &I-GREEK-5F; )) (define-char - '((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") + '((->uppercase + ((=jis-x0212 . #x2664) ; &JSP-2664; [06-68] + )) + (<-denotational + ((name . "GREEK SMALL LETTER IOTA WITH TONOS") + (=ucs . #x03AF) ; ί )) (<-fullwidth ((name . "GREEK SMALL LETTER IOTA WITH TONOS") (=ucs . #x03AF) ; ί )) (=jis-x0212 . #x2674) ; &JSP-2674; [06-84] - (=ucs@jis . #x03AF) ; &JSP-2674; + (=ucs@jis/fw . #x03AF) ; &JSP-2674; )) (define-char '((name . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS") @@ -1546,40 +1290,26 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03CB #x0301) - (->fullwidth - ((name . "fullwidth greek small letter upsilon with dialytika and tonos") - (=jis-x0212 . #x267B) ; &JSP-267B; [06-91] - (=ucs@jis . #x03B0) ; &JSP-267B; - )) (=ucs . #x03B0) ; ΰ (greek-iso8859-7 . #xE0) ; &I-GREEK-60; )) (define-char - '((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) + '((<-denotational + ((name . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS") + (=ucs . #x03B0) ; ΰ + )) (<-fullwidth ((name . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS") (=ucs . #x03B0) ; ΰ )) (=jis-x0212 . #x267B) ; &JSP-267B; [06-91] - (=ucs@jis . #x03B0) ; &JSP-267B; + (=ucs@jis/fw . #x03B0) ; &JSP-267B; )) (define-char '((name . "GREEK SMALL LETTER ALPHA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter alpha") - (=jis-x0208 . #x2641) ; &J90-2641; [06-33] - (=gb2312 . #x2641) ; &I-G0-2641; [06-33] - (=ks-x1001 . #x2561) ; &I-K0-2561; [05-65] - (=cns11643-1 . #x252F) ; &I-C1-252F; [05-15] - )) (->uppercase ((name . "GREEK CAPITAL LETTER ALPHA") (=ucs . #x0391) ; Α @@ -1588,14 +1318,15 @@ (greek-iso8859-7 . #xE1) ; &I-GREEK-61; )) (define-char - '((name . "fullwidth greek small letter alpha") - (=>ucs . #x03B1) ; α - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03B1) - (->uppercase - ((name . "fullwidth greek capital letter alpha") + '((->uppercase + ((=jis-x0208 . #x2621) ; &J90-2621; [06-01] + (=gb2312 . #x2621) ; &I-G0-2621; [06-01] + (=ks-x1001 . #x2541) ; &I-K0-2541; [05-33] + (=cns11643-1 . #x2475) ; &I-C1-2475; [04-85] + )) + (<-denotational + ((name . "GREEK SMALL LETTER ALPHA") + (=ucs . #x03B1) ; α )) (<-fullwidth ((name . "GREEK SMALL LETTER ALPHA") @@ -1606,20 +1337,13 @@ (=ks-x1001 . #x2561) ; &I-K0-2561; [05-65] (=cns11643-1 . #x252F) ; &I-C1-252F; [05-15] (=big5 . #xA35C) ; &I-B-A35C; - (=ucs@jis . #x03B1) ; &J90-2641; + (=ucs@jis/fw . #x03B1) ; &J90-2641; )) (define-char '((name . "GREEK SMALL LETTER BETA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter beta") - (=jis-x0208 . #x2642) ; &J90-2642; [06-34] - (=gb2312 . #x2642) ; &I-G0-2642; [06-34] - (=ks-x1001 . #x2562) ; &I-K0-2562; [05-66] - (=cns11643-1 . #x2530) ; &I-C1-2530; [05-16] - )) (->uppercase ((name . "GREEK CAPITAL LETTER BETA") (=ucs . #x0392) ; Β @@ -1628,14 +1352,15 @@ (greek-iso8859-7 . #xE2) ; &I-GREEK-62; )) (define-char - '((name . "fullwidth greek small letter beta") - (=>ucs . #x03B2) ; β - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03B2) - (->uppercase - ((name . "fullwidth greek capital letter beta") + '((->uppercase + ((=jis-x0208 . #x2622) ; &J90-2622; [06-02] + (=gb2312 . #x2622) ; &I-G0-2622; [06-02] + (=ks-x1001 . #x2542) ; &I-K0-2542; [05-34] + (=cns11643-1 . #x2476) ; &I-C1-2476; [04-86] + )) + (<-denotational + ((name . "GREEK SMALL LETTER BETA") + (=ucs . #x03B2) ; β )) (<-fullwidth ((name . "GREEK SMALL LETTER BETA") @@ -1646,20 +1371,13 @@ (=ks-x1001 . #x2562) ; &I-K0-2562; [05-66] (=cns11643-1 . #x2530) ; &I-C1-2530; [05-16] (=big5 . #xA35D) ; &I-B-A35D; - (=ucs@jis . #x03B2) ; &J90-2642; + (=ucs@jis/fw . #x03B2) ; &J90-2642; )) (define-char '((name . "GREEK SMALL LETTER GAMMA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter gamma") - (=jis-x0208 . #x2643) ; &J90-2643; [06-35] - (=gb2312 . #x2643) ; &I-G0-2643; [06-35] - (=ks-x1001 . #x2563) ; &I-K0-2563; [05-67] - (=cns11643-1 . #x2531) ; &I-C1-2531; [05-17] - )) (->uppercase ((name . "GREEK CAPITAL LETTER GAMMA") (=ucs . #x0393) ; Γ @@ -1668,14 +1386,15 @@ (greek-iso8859-7 . #xE3) ; &I-GREEK-63; )) (define-char - '((name . "fullwidth greek small letter gamma") - (=>ucs . #x03B3) ; γ - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03B3) - (->uppercase - ((name . "fullwidth greek capital letter gamma") + '((->uppercase + ((=jis-x0208 . #x2623) ; &J90-2623; [06-03] + (=gb2312 . #x2623) ; &I-G0-2623; [06-03] + (=ks-x1001 . #x2543) ; &I-K0-2543; [05-35] + (=cns11643-1 . #x2477) ; &I-C1-2477; [04-87] + )) + (<-denotational + ((name . "GREEK SMALL LETTER GAMMA") + (=ucs . #x03B3) ; γ )) (<-fullwidth ((name . "GREEK SMALL LETTER GAMMA") @@ -1686,20 +1405,13 @@ (=ks-x1001 . #x2563) ; &I-K0-2563; [05-67] (=cns11643-1 . #x2531) ; &I-C1-2531; [05-17] (=big5 . #xA35E) ; &I-B-A35E; - (=ucs@jis . #x03B3) ; &J90-2643; + (=ucs@jis/fw . #x03B3) ; &J90-2643; )) (define-char '((name . "GREEK SMALL LETTER DELTA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter delta") - (=jis-x0208 . #x2644) ; &J90-2644; [06-36] - (=gb2312 . #x2644) ; &I-G0-2644; [06-36] - (=ks-x1001 . #x2564) ; &I-K0-2564; [05-68] - (=cns11643-1 . #x2532) ; &I-C1-2532; [05-18] - )) (->uppercase ((name . "GREEK CAPITAL LETTER DELTA") (=ucs . #x0394) ; Δ @@ -1708,14 +1420,15 @@ (greek-iso8859-7 . #xE4) ; &I-GREEK-64; )) (define-char - '((name . "fullwidth greek small letter delta") - (=>ucs . #x03B4) ; δ - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03B4) - (->uppercase - ((name . "fullwidth greek capital letter delta") + '((->uppercase + ((=jis-x0208 . #x2624) ; &J90-2624; [06-04] + (=gb2312 . #x2624) ; &I-G0-2624; [06-04] + (=ks-x1001 . #x2544) ; &I-K0-2544; [05-36] + (=cns11643-1 . #x2478) ; &I-C1-2478; [04-88] + )) + (<-denotational + ((name . "GREEK SMALL LETTER DELTA") + (=ucs . #x03B4) ; δ )) (<-fullwidth ((name . "GREEK SMALL LETTER DELTA") @@ -1726,20 +1439,13 @@ (=ks-x1001 . #x2564) ; &I-K0-2564; [05-68] (=cns11643-1 . #x2532) ; &I-C1-2532; [05-18] (=big5 . #xA35F) ; &I-B-A35F; - (=ucs@jis . #x03B4) ; &J90-2644; + (=ucs@jis/fw . #x03B4) ; &J90-2644; )) (define-char '((name . "GREEK SMALL LETTER EPSILON") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter epsilon") - (=jis-x0208 . #x2645) ; &J90-2645; [06-37] - (=gb2312 . #x2645) ; &I-G0-2645; [06-37] - (=ks-x1001 . #x2565) ; &I-K0-2565; [05-69] - (=cns11643-1 . #x2533) ; &I-C1-2533; [05-19] - )) (->uppercase ((name . "GREEK CAPITAL LETTER EPSILON") (=ucs . #x0395) ; Ε @@ -1748,14 +1454,15 @@ (greek-iso8859-7 . #xE5) ; &I-GREEK-65; )) (define-char - '((name . "fullwidth greek small letter epsilon") - (=>ucs . #x03B5) ; ε - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03B5) - (->uppercase - ((name . "fullwidth greek capital letter epsilon") + '((->uppercase + ((=jis-x0208 . #x2625) ; &J90-2625; [06-05] + (=gb2312 . #x2625) ; &I-G0-2625; [06-05] + (=ks-x1001 . #x2545) ; &I-K0-2545; [05-37] + (=cns11643-1 . #x2479) ; &I-C1-2479; [04-89] + )) + (<-denotational + ((name . "GREEK SMALL LETTER EPSILON") + (=ucs . #x03B5) ; ε )) (<-fullwidth ((name . "GREEK SMALL LETTER EPSILON") @@ -1766,20 +1473,13 @@ (=ks-x1001 . #x2565) ; &I-K0-2565; [05-69] (=cns11643-1 . #x2533) ; &I-C1-2533; [05-19] (=big5 . #xA360) ; &I-B-A360; - (=ucs@jis . #x03B5) ; &J90-2645; + (=ucs@jis/fw . #x03B5) ; &J90-2645; )) (define-char '((name . "GREEK SMALL LETTER ZETA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter zeta") - (=jis-x0208 . #x2646) ; &J90-2646; [06-38] - (=gb2312 . #x2646) ; &I-G0-2646; [06-38] - (=ks-x1001 . #x2566) ; &I-K0-2566; [05-70] - (=cns11643-1 . #x2534) ; &I-C1-2534; [05-20] - )) (->uppercase ((name . "GREEK CAPITAL LETTER ZETA") (=ucs . #x0396) ; Ζ @@ -1788,14 +1488,15 @@ (greek-iso8859-7 . #xE6) ; &I-GREEK-66; )) (define-char - '((name . "fullwidth greek small letter zeta") - (=>ucs . #x03B6) ; ζ - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03B6) - (->uppercase - ((name . "fullwidth greek capital letter zeta") + '((->uppercase + ((=jis-x0208 . #x2626) ; &J90-2626; [06-06] + (=gb2312 . #x2626) ; &I-G0-2626; [06-06] + (=ks-x1001 . #x2546) ; &I-K0-2546; [05-38] + (=cns11643-1 . #x247A) ; &I-C1-247A; [04-90] + )) + (<-denotational + ((name . "GREEK SMALL LETTER ZETA") + (=ucs . #x03B6) ; ζ )) (<-fullwidth ((name . "GREEK SMALL LETTER ZETA") @@ -1806,20 +1507,13 @@ (=ks-x1001 . #x2566) ; &I-K0-2566; [05-70] (=cns11643-1 . #x2534) ; &I-C1-2534; [05-20] (=big5 . #xA361) ; &I-B-A361; - (=ucs@jis . #x03B6) ; &J90-2646; + (=ucs@jis/fw . #x03B6) ; &J90-2646; )) (define-char '((name . "GREEK SMALL LETTER ETA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter eta") - (=jis-x0208 . #x2647) ; &J90-2647; [06-39] - (=gb2312 . #x2647) ; &I-G0-2647; [06-39] - (=ks-x1001 . #x2567) ; &I-K0-2567; [05-71] - (=cns11643-1 . #x2535) ; &I-C1-2535; [05-21] - )) (->uppercase ((name . "GREEK CAPITAL LETTER ETA") (=ucs . #x0397) ; Η @@ -1828,14 +1522,15 @@ (greek-iso8859-7 . #xE7) ; &I-GREEK-67; )) (define-char - '((name . "fullwidth greek small letter eta") - (=>ucs . #x03B7) ; η - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03B7) - (->uppercase - ((name . "fullwidth greek capital letter eta") + '((->uppercase + ((=jis-x0208 . #x2627) ; &J90-2627; [06-07] + (=gb2312 . #x2627) ; &I-G0-2627; [06-07] + (=ks-x1001 . #x2547) ; &I-K0-2547; [05-39] + (=cns11643-1 . #x247B) ; &I-C1-247B; [04-91] + )) + (<-denotational + ((name . "GREEK SMALL LETTER ETA") + (=ucs . #x03B7) ; η )) (<-fullwidth ((name . "GREEK SMALL LETTER ETA") @@ -1846,20 +1541,13 @@ (=ks-x1001 . #x2567) ; &I-K0-2567; [05-71] (=cns11643-1 . #x2535) ; &I-C1-2535; [05-21] (=big5 . #xA362) ; &I-B-A362; - (=ucs@jis . #x03B7) ; &J90-2647; + (=ucs@jis/fw . #x03B7) ; &J90-2647; )) (define-char '((name . "GREEK SMALL LETTER THETA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter theta") - (=jis-x0208 . #x2648) ; &J90-2648; [06-40] - (=gb2312 . #x2648) ; &I-G0-2648; [06-40] - (=ks-x1001 . #x2568) ; &I-K0-2568; [05-72] - (=cns11643-1 . #x2536) ; &I-C1-2536; [05-22] - )) (->uppercase ((name . "GREEK CAPITAL LETTER THETA") (=ucs . #x0398) ; Θ @@ -1869,14 +1557,15 @@ (ipa . #xC8) ; &I-MULE-IPA-48; )) (define-char - '((name . "fullwidth greek small letter theta") - (=>ucs . #x03B8) ; θ - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03B8) - (->uppercase - ((name . "fullwidth greek capital letter theta") + '((->uppercase + ((=jis-x0208 . #x2628) ; &J90-2628; [06-08] + (=gb2312 . #x2628) ; &I-G0-2628; [06-08] + (=ks-x1001 . #x2548) ; &I-K0-2548; [05-40] + (=cns11643-1 . #x247C) ; &I-C1-247C; [04-92] + )) + (<-denotational + ((name . "GREEK SMALL LETTER THETA") + (=ucs . #x03B8) ; θ )) (<-fullwidth ((name . "GREEK SMALL LETTER THETA") @@ -1887,20 +1576,13 @@ (=ks-x1001 . #x2568) ; &I-K0-2568; [05-72] (=cns11643-1 . #x2536) ; &I-C1-2536; [05-22] (=big5 . #xA363) ; &I-B-A363; - (=ucs@jis . #x03B8) ; &J90-2648; + (=ucs@jis/fw . #x03B8) ; &J90-2648; )) (define-char '((name . "GREEK SMALL LETTER IOTA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter iota") - (=jis-x0208 . #x2649) ; &J90-2649; [06-41] - (=gb2312 . #x2649) ; &I-G0-2649; [06-41] - (=ks-x1001 . #x2569) ; &I-K0-2569; [05-73] - (=cns11643-1 . #x2537) ; &I-C1-2537; [05-23] - )) (->uppercase ((name . "GREEK CAPITAL LETTER IOTA") (=ucs . #x0399) ; Ι @@ -1909,14 +1591,15 @@ (greek-iso8859-7 . #xE9) ; &I-GREEK-69; )) (define-char - '((name . "fullwidth greek small letter iota") - (=>ucs . #x03B9) ; ι - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03B9) - (->uppercase - ((name . "fullwidth greek capital letter iota") + '((->uppercase + ((=jis-x0208 . #x2629) ; &J90-2629; [06-09] + (=gb2312 . #x2629) ; &I-G0-2629; [06-09] + (=ks-x1001 . #x2549) ; &I-K0-2549; [05-41] + (=cns11643-1 . #x247D) ; &I-C1-247D; [04-93] + )) + (<-denotational + ((name . "GREEK SMALL LETTER IOTA") + (=ucs . #x03B9) ; ι )) (<-fullwidth ((name . "GREEK SMALL LETTER IOTA") @@ -1927,20 +1610,13 @@ (=ks-x1001 . #x2569) ; &I-K0-2569; [05-73] (=cns11643-1 . #x2537) ; &I-C1-2537; [05-23] (=big5 . #xA364) ; &I-B-A364; - (=ucs@jis . #x03B9) ; &J90-2649; + (=ucs@jis/fw . #x03B9) ; &J90-2649; )) (define-char '((name . "GREEK SMALL LETTER KAPPA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter kappa") - (=jis-x0208 . #x264A) ; &J90-264A; [06-42] - (=gb2312 . #x264A) ; &I-G0-264A; [06-42] - (=ks-x1001 . #x256A) ; &I-K0-256A; [05-74] - (=cns11643-1 . #x2538) ; &I-C1-2538; [05-24] - )) (->uppercase ((name . "GREEK CAPITAL LETTER KAPPA") (=ucs . #x039A) ; Κ @@ -1949,15 +1625,15 @@ (greek-iso8859-7 . #xEA) ; &I-GREEK-6A; )) (define-char - '((name . "fullwidth greek small letter kappa") - (=>ucs . #x03BA) ; κ - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03BA) - (->uppercase - ((name . "GREEK CAPITAL LETTER KAPPA") - (=ucs . #x039A) ; Κ + '((->uppercase + ((=jis-x0208 . #x262A) ; &J90-262A; [06-10] + (=gb2312 . #x262A) ; &I-G0-262A; [06-10] + (=ks-x1001 . #x254A) ; &I-K0-254A; [05-42] + (=cns11643-1 . #x247E) ; &I-C1-247E; [04-94] + )) + (<-denotational + ((name . "GREEK SMALL LETTER KAPPA") + (=ucs . #x03BA) ; κ )) (<-fullwidth ((name . "GREEK SMALL LETTER KAPPA") @@ -1968,20 +1644,13 @@ (=ks-x1001 . #x256A) ; &I-K0-256A; [05-74] (=cns11643-1 . #x2538) ; &I-C1-2538; [05-24] (=big5 . #xA365) ; &I-B-A365; - (=ucs@jis . #x03BA) ; &J90-264A; + (=ucs@jis/fw . #x03BA) ; &J90-264A; )) (define-char '((name . "GREEK SMALL LETTER LAMDA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter lamda") - (=jis-x0208 . #x264B) ; &J90-264B; [06-43] - (=gb2312 . #x264B) ; &I-G0-264B; [06-43] - (=ks-x1001 . #x256B) ; &I-K0-256B; [05-75] - (=cns11643-1 . #x2539) ; &I-C1-2539; [05-25] - )) (->uppercase ((name . "GREEK CAPITAL LETTER LAMDA") (=ucs . #x039B) ; Λ @@ -1990,14 +1659,15 @@ (greek-iso8859-7 . #xEB) ; &I-GREEK-6B; )) (define-char - '((name . "fullwidth greek small letter lamda") - (=>ucs . #x03BB) ; λ - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03BB) - (->uppercase - ((name . "fullwidth greek capital letter lamda") + '((->uppercase + ((=jis-x0208 . #x262B) ; &J90-262B; [06-11] + (=gb2312 . #x262B) ; &I-G0-262B; [06-11] + (=ks-x1001 . #x254B) ; &I-K0-254B; [05-43] + (=cns11643-1 . #x2521) ; &I-C1-2521; [05-01] + )) + (<-denotational + ((name . "GREEK SMALL LETTER LAMDA") + (=ucs . #x03BB) ; λ )) (<-fullwidth ((name . "GREEK SMALL LETTER LAMDA") @@ -2008,20 +1678,13 @@ (=ks-x1001 . #x256B) ; &I-K0-256B; [05-75] (=cns11643-1 . #x2539) ; &I-C1-2539; [05-25] (=big5 . #xA366) ; &I-B-A366; - (=ucs@jis . #x03BB) ; &J90-264B; + (=ucs@jis/fw . #x03BB) ; &J90-264B; )) (define-char '((name . "GREEK SMALL LETTER MU") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter mu") - (=jis-x0208 . #x264C) ; &J90-264C; [06-44] - (=gb2312 . #x264C) ; &I-G0-264C; [06-44] - (=ks-x1001 . #x256C) ; &I-K0-256C; [05-76] - (=cns11643-1 . #x253A) ; &I-C1-253A; [05-26] - )) (->uppercase ((name . "GREEK CAPITAL LETTER MU") (=ucs . #x039C) ; Μ @@ -2030,14 +1693,15 @@ (greek-iso8859-7 . #xEC) ; &I-GREEK-6C; )) (define-char - '((name . "fullwidth greek small letter mu") - (=>ucs . #x03BC) ; μ - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03BC) - (->uppercase - ((name . "fullwidth greek capital letter mu") + '((->uppercase + ((=jis-x0208 . #x262C) ; &J90-262C; [06-12] + (=gb2312 . #x262C) ; &I-G0-262C; [06-12] + (=ks-x1001 . #x254C) ; &I-K0-254C; [05-44] + (=cns11643-1 . #x2522) ; &I-C1-2522; [05-02] + )) + (<-denotational + ((name . "GREEK SMALL LETTER MU") + (=ucs . #x03BC) ; μ )) (<-fullwidth ((name . "GREEK SMALL LETTER MU") @@ -2048,20 +1712,13 @@ (=ks-x1001 . #x256C) ; &I-K0-256C; [05-76] (=cns11643-1 . #x253A) ; &I-C1-253A; [05-26] (=big5 . #xA367) ; &I-B-A367; - (=ucs@jis . #x03BC) ; &J90-264C; + (=ucs@jis/fw . #x03BC) ; &J90-264C; )) (define-char '((name . "GREEK SMALL LETTER NU") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter nu") - (=jis-x0208 . #x264D) ; &J90-264D; [06-45] - (=gb2312 . #x264D) ; &I-G0-264D; [06-45] - (=ks-x1001 . #x256D) ; &I-K0-256D; [05-77] - (=cns11643-1 . #x253B) ; &I-C1-253B; [05-27] - )) (->uppercase ((name . "GREEK CAPITAL LETTER NU") (=ucs . #x039D) ; Ν @@ -2070,14 +1727,15 @@ (greek-iso8859-7 . #xED) ; &I-GREEK-6D; )) (define-char - '((name . "fullwidth greek small letter nu") - (=>ucs . #x03BD) ; ν - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03BD) - (->uppercase - ((name . "fullwidth greek capital letter nu") + '((->uppercase + ((=jis-x0208 . #x262D) ; &J90-262D; [06-13] + (=gb2312 . #x262D) ; &I-G0-262D; [06-13] + (=ks-x1001 . #x254D) ; &I-K0-254D; [05-45] + (=cns11643-1 . #x2523) ; &I-C1-2523; [05-03] + )) + (<-denotational + ((name . "GREEK SMALL LETTER NU") + (=ucs . #x03BD) ; ν )) (<-fullwidth ((name . "GREEK SMALL LETTER NU") @@ -2088,20 +1746,13 @@ (=ks-x1001 . #x256D) ; &I-K0-256D; [05-77] (=cns11643-1 . #x253B) ; &I-C1-253B; [05-27] (=big5 . #xA368) ; &I-B-A368; - (=ucs@jis . #x03BD) ; &J90-264D; + (=ucs@jis/fw . #x03BD) ; &J90-264D; )) (define-char '((name . "GREEK SMALL LETTER XI") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter xi") - (=jis-x0208 . #x264E) ; &J90-264E; [06-46] - (=gb2312 . #x264E) ; &I-G0-264E; [06-46] - (=ks-x1001 . #x256E) ; &I-K0-256E; [05-78] - (=cns11643-1 . #x253C) ; &I-C1-253C; [05-28] - )) (->uppercase ((name . "GREEK CAPITAL LETTER XI") (=ucs . #x039E) ; Ξ @@ -2110,14 +1761,15 @@ (greek-iso8859-7 . #xEE) ; &I-GREEK-6E; )) (define-char - '((name . "fullwidth greek small letter xi") - (=>ucs . #x03BE) ; ξ - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03BE) - (->uppercase - ((name . "fullwidth greek capital letter xi") + '((->uppercase + ((=jis-x0208 . #x262E) ; &J90-262E; [06-14] + (=gb2312 . #x262E) ; &I-G0-262E; [06-14] + (=ks-x1001 . #x254E) ; &I-K0-254E; [05-46] + (=cns11643-1 . #x2524) ; &I-C1-2524; [05-04] + )) + (<-denotational + ((name . "GREEK SMALL LETTER XI") + (=ucs . #x03BE) ; ξ )) (<-fullwidth ((name . "GREEK SMALL LETTER XI") @@ -2128,20 +1780,13 @@ (=ks-x1001 . #x256E) ; &I-K0-256E; [05-78] (=cns11643-1 . #x253C) ; &I-C1-253C; [05-28] (=big5 . #xA369) ; &I-B-A369; - (=ucs@jis . #x03BE) ; &J90-264E; + (=ucs@jis/fw . #x03BE) ; &J90-264E; )) (define-char '((name . "GREEK SMALL LETTER OMICRON") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter omicron") - (=jis-x0208 . #x264F) ; &J90-264F; [06-47] - (=gb2312 . #x264F) ; &I-G0-264F; [06-47] - (=ks-x1001 . #x256F) ; &I-K0-256F; [05-79] - (=cns11643-1 . #x253D) ; &I-C1-253D; [05-29] - )) (->uppercase ((name . "GREEK CAPITAL LETTER OMICRON") (=ucs . #x039F) ; Ο @@ -2150,14 +1795,15 @@ (greek-iso8859-7 . #xEF) ; &I-GREEK-6F; )) (define-char - '((name . "fullwidth greek small letter omicron") - (=>ucs . #x03BF) ; ο - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03BF) - (->uppercase - ((name . "fullwidth greek capital letter omicron") + '((->uppercase + ((=jis-x0208 . #x262F) ; &J90-262F; [06-15] + (=gb2312 . #x262F) ; &I-G0-262F; [06-15] + (=ks-x1001 . #x254F) ; &I-K0-254F; [05-47] + (=cns11643-1 . #x2525) ; &I-C1-2525; [05-05] + )) + (<-denotational + ((name . "GREEK SMALL LETTER OMICRON") + (=ucs . #x03BF) ; ο )) (<-fullwidth ((name . "GREEK SMALL LETTER OMICRON") @@ -2168,20 +1814,13 @@ (=ks-x1001 . #x256F) ; &I-K0-256F; [05-79] (=cns11643-1 . #x253D) ; &I-C1-253D; [05-29] (=big5 . #xA36A) ; &I-B-A36A; - (=ucs@jis . #x03BF) ; &J90-264F; + (=ucs@jis/fw . #x03BF) ; &J90-264F; )) (define-char '((name . "GREEK SMALL LETTER PI") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter pi") - (=jis-x0208 . #x2650) ; &J90-2650; [06-48] - (=gb2312 . #x2650) ; &I-G0-2650; [06-48] - (=ks-x1001 . #x2570) ; &I-K0-2570; [05-80] - (=cns11643-1 . #x253E) ; &I-C1-253E; [05-30] - )) (->uppercase ((name . "GREEK CAPITAL LETTER PI") (=ucs . #x03A0) ; Π @@ -2190,14 +1829,15 @@ (greek-iso8859-7 . #xF0) ; &I-GREEK-70; )) (define-char - '((name . "fullwidth greek small letter pi") - (=>ucs . #x03C0) ; π - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03C0) - (->uppercase - ((name . "fullwidth greek capital letter pi") + '((->uppercase + ((=jis-x0208 . #x2630) ; &J90-2630; [06-16] + (=gb2312 . #x2630) ; &I-G0-2630; [06-16] + (=ks-x1001 . #x2550) ; &I-K0-2550; [05-48] + (=cns11643-1 . #x2526) ; &I-C1-2526; [05-06] + )) + (<-denotational + ((name . "GREEK SMALL LETTER PI") + (=ucs . #x03C0) ; π )) (<-fullwidth ((name . "GREEK SMALL LETTER PI") @@ -2208,20 +1848,13 @@ (=ks-x1001 . #x2570) ; &I-K0-2570; [05-80] (=cns11643-1 . #x253E) ; &I-C1-253E; [05-30] (=big5 . #xA36B) ; &I-B-A36B; - (=ucs@jis . #x03C0) ; &J90-2650; + (=ucs@jis/fw . #x03C0) ; &J90-2650; )) (define-char '((name . "GREEK SMALL LETTER RHO") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter rho") - (=jis-x0208 . #x2651) ; &J90-2651; [06-49] - (=gb2312 . #x2651) ; &I-G0-2651; [06-49] - (=ks-x1001 . #x2571) ; &I-K0-2571; [05-81] - (=cns11643-1 . #x253F) ; &I-C1-253F; [05-31] - )) (->uppercase ((name . "GREEK CAPITAL LETTER RHO") (=ucs . #x03A1) ; Ρ @@ -2230,14 +1863,15 @@ (greek-iso8859-7 . #xF1) ; &I-GREEK-71; )) (define-char - '((name . "fullwidth greek small letter rho") - (=>ucs . #x03C1) ; ρ - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03C1) - (->uppercase - ((name . "fullwidth greek capital letter rho") + '((->uppercase + ((=jis-x0208 . #x2631) ; &J90-2631; [06-17] + (=gb2312 . #x2631) ; &I-G0-2631; [06-17] + (=ks-x1001 . #x2551) ; &I-K0-2551; [05-49] + (=cns11643-1 . #x2527) ; &I-C1-2527; [05-07] + )) + (<-denotational + ((name . "GREEK SMALL LETTER RHO") + (=ucs . #x03C1) ; ρ )) (<-fullwidth ((name . "GREEK SMALL LETTER RHO") @@ -2248,18 +1882,13 @@ (=ks-x1001 . #x2571) ; &I-K0-2571; [05-81] (=cns11643-1 . #x253F) ; &I-C1-253F; [05-31] (=big5 . #xA36C) ; &I-B-A36C; - (=ucs@jis . #x03C1) ; &J90-2651; + (=ucs@jis/fw . #x03C1) ; &J90-2651; )) (define-char '((name . "GREEK SMALL LETTER FINAL SIGMA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter final sigma") - (=jis-x0212 . #x2678) ; &JX1-2659; [06-88] - (=jis-x0213-1-2000 . #x2659) ; &I-JX1-2659; [06-57] - )) (->uppercase ((name . "GREEK CAPITAL LETTER SIGMA") (=ucs . #x03A3) ; Σ @@ -2268,14 +1897,15 @@ (greek-iso8859-7 . #xF2) ; &I-GREEK-72; )) (define-char - '((name . "fullwidth greek small letter final sigma") - (=>ucs . #x03C2) ; ς - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03C2) - (->uppercase - ((name . "fullwidth greek capital letter final sigma") + '((->uppercase + ((=jis-x0208 . #x2632) ; &J90-2632; [06-18] + (=gb2312 . #x2632) ; &I-G0-2632; [06-18] + (=ks-x1001 . #x2552) ; &I-K0-2552; [05-50] + (=cns11643-1 . #x2528) ; &I-C1-2528; [05-08] + )) + (<-denotational + ((name . "GREEK SMALL LETTER FINAL SIGMA") + (=ucs . #x03C2) ; ς )) (<-fullwidth ((name . "GREEK SMALL LETTER FINAL SIGMA") @@ -2283,20 +1913,13 @@ )) (=jis-x0212 . #x2678) ; &JX1-2659; [06-88] (=jis-x0213-1-2000 . #x2659) ; &I-JX1-2659; [06-57] - (=ucs@jis . #x03C2) ; &JX1-2659; + (=ucs@jis/fw . #x03C2) ; &JX1-2659; )) (define-char '((name . "GREEK SMALL LETTER SIGMA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter sigma") - (=jis-x0208 . #x2652) ; &J90-2652; [06-50] - (=gb2312 . #x2652) ; &I-G0-2652; [06-50] - (=ks-x1001 . #x2572) ; &I-K0-2572; [05-82] - (=cns11643-1 . #x2540) ; &I-C1-2540; [05-32] - )) (->uppercase ((name . "GREEK CAPITAL LETTER SIGMA") (=ucs . #x03A3) ; Σ @@ -2305,14 +1928,15 @@ (greek-iso8859-7 . #xF3) ; &I-GREEK-73; )) (define-char - '((name . "fullwidth greek small letter sigma") - (=>ucs . #x03C3) ; σ - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03C3) - (->uppercase - ((name . "fullwidth greek capital letter sigma") + '((->uppercase + ((=jis-x0208 . #x2632) ; &J90-2632; [06-18] + (=gb2312 . #x2632) ; &I-G0-2632; [06-18] + (=ks-x1001 . #x2552) ; &I-K0-2552; [05-50] + (=cns11643-1 . #x2528) ; &I-C1-2528; [05-08] + )) + (<-denotational + ((name . "GREEK SMALL LETTER SIGMA") + (=ucs . #x03C3) ; σ )) (<-fullwidth ((name . "GREEK SMALL LETTER SIGMA") @@ -2323,20 +1947,13 @@ (=ks-x1001 . #x2572) ; &I-K0-2572; [05-82] (=cns11643-1 . #x2540) ; &I-C1-2540; [05-32] (=big5 . #xA36D) ; &I-B-A36D; - (=ucs@jis . #x03C3) ; &J90-2652; + (=ucs@jis/fw . #x03C3) ; &J90-2652; )) (define-char '((name . "GREEK SMALL LETTER TAU") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter tau") - (=jis-x0208 . #x2653) ; &J90-2653; [06-51] - (=gb2312 . #x2653) ; &I-G0-2653; [06-51] - (=ks-x1001 . #x2573) ; &I-K0-2573; [05-83] - (=cns11643-1 . #x2541) ; &I-C1-2541; [05-33] - )) (->uppercase ((name . "GREEK CAPITAL LETTER TAU") (=ucs . #x03A4) ; Τ @@ -2345,14 +1962,15 @@ (greek-iso8859-7 . #xF4) ; &I-GREEK-74; )) (define-char - '((name . "fullwidth greek small letter tau") - (=>ucs . #x03C4) ; τ - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03C4) - (->uppercase - ((name . "fullwidth greek capital letter tau") + '((->uppercase + ((=jis-x0208 . #x2633) ; &J90-2633; [06-19] + (=gb2312 . #x2633) ; &I-G0-2633; [06-19] + (=ks-x1001 . #x2553) ; &I-K0-2553; [05-51] + (=cns11643-1 . #x2529) ; &I-C1-2529; [05-09] + )) + (<-denotational + ((name . "GREEK SMALL LETTER TAU") + (=ucs . #x03C4) ; τ )) (<-fullwidth ((name . "GREEK SMALL LETTER TAU") @@ -2363,20 +1981,13 @@ (=ks-x1001 . #x2573) ; &I-K0-2573; [05-83] (=cns11643-1 . #x2541) ; &I-C1-2541; [05-33] (=big5 . #xA36E) ; &I-B-A36E; - (=ucs@jis . #x03C4) ; &J90-2653; + (=ucs@jis/fw . #x03C4) ; &J90-2653; )) (define-char '((name . "GREEK SMALL LETTER UPSILON") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter upsilon") - (=jis-x0208 . #x2654) ; &J90-2654; [06-52] - (=gb2312 . #x2654) ; &I-G0-2654; [06-52] - (=ks-x1001 . #x2574) ; &I-K0-2574; [05-84] - (=cns11643-1 . #x2542) ; &I-C1-2542; [05-34] - )) (->uppercase ((name . "GREEK CAPITAL LETTER UPSILON") (=ucs . #x03A5) ; Υ @@ -2385,14 +1996,15 @@ (greek-iso8859-7 . #xF5) ; &I-GREEK-75; )) (define-char - '((name . "fullwidth greek small letter upsilon") - (=>ucs . #x03C5) ; υ - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03C5) - (->uppercase - ((name . "fullwidth greek capital letter upsilon") + '((->uppercase + ((=jis-x0208 . #x2634) ; &J90-2634; [06-20] + (=gb2312 . #x2634) ; &I-G0-2634; [06-20] + (=ks-x1001 . #x2554) ; &I-K0-2554; [05-52] + (=cns11643-1 . #x252A) ; &I-C1-252A; [05-10] + )) + (<-denotational + ((name . "GREEK SMALL LETTER UPSILON") + (=ucs . #x03C5) ; υ )) (<-fullwidth ((name . "GREEK SMALL LETTER UPSILON") @@ -2403,20 +2015,13 @@ (=ks-x1001 . #x2574) ; &I-K0-2574; [05-84] (=cns11643-1 . #x2542) ; &I-C1-2542; [05-34] (=big5 . #xA36F) ; &I-B-A36F; - (=ucs@jis . #x03C5) ; &J90-2654; + (=ucs@jis/fw . #x03C5) ; &J90-2654; )) (define-char '((name . "GREEK SMALL LETTER PHI") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter phi") - (=jis-x0208 . #x2655) ; &J90-2655; [06-53] - (=gb2312 . #x2655) ; &I-G0-2655; [06-53] - (=ks-x1001 . #x2575) ; &I-K0-2575; [05-85] - (=cns11643-1 . #x2543) ; &I-C1-2543; [05-35] - )) (->uppercase ((name . "GREEK CAPITAL LETTER PHI") (=ucs . #x03A6) ; Φ @@ -2425,14 +2030,15 @@ (greek-iso8859-7 . #xF6) ; &I-GREEK-76; )) (define-char - '((name . "fullwidth greek small letter phi") - (=>ucs . #x03C6) ; φ - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03C6) - (->uppercase - ((name . "fullwidth greek capital letter phi") + '((->uppercase + ((=jis-x0208 . #x2635) ; &J90-2635; [06-21] + (=gb2312 . #x2635) ; &I-G0-2635; [06-21] + (=ks-x1001 . #x2555) ; &I-K0-2555; [05-53] + (=cns11643-1 . #x252B) ; &I-C1-252B; [05-11] + )) + (<-denotational + ((name . "GREEK SMALL LETTER PHI") + (=ucs . #x03C6) ; φ )) (<-fullwidth ((name . "GREEK SMALL LETTER PHI") @@ -2443,20 +2049,13 @@ (=ks-x1001 . #x2575) ; &I-K0-2575; [05-85] (=cns11643-1 . #x2543) ; &I-C1-2543; [05-35] (=big5 . #xA370) ; &I-B-A370; - (=ucs@jis . #x03C6) ; &J90-2655; + (=ucs@jis/fw . #x03C6) ; &J90-2655; )) (define-char '((name . "GREEK SMALL LETTER CHI") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter chi") - (=jis-x0208 . #x2656) ; &J90-2656; [06-54] - (=gb2312 . #x2656) ; &I-G0-2656; [06-54] - (=ks-x1001 . #x2576) ; &I-K0-2576; [05-86] - (=cns11643-1 . #x2544) ; &I-C1-2544; [05-36] - )) (->uppercase ((name . "GREEK CAPITAL LETTER CHI") (=ucs . #x03A7) ; Χ @@ -2465,14 +2064,15 @@ (greek-iso8859-7 . #xF7) ; &I-GREEK-77; )) (define-char - '((name . "fullwidth greek small letter chi") - (=>ucs . #x03C7) ; χ - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03C7) - (->uppercase - ((name . "fullwidth greek capital letter chi") + '((->uppercase + ((=jis-x0208 . #x2636) ; &J90-2636; [06-22] + (=gb2312 . #x2636) ; &I-G0-2636; [06-22] + (=ks-x1001 . #x2556) ; &I-K0-2556; [05-54] + (=cns11643-1 . #x252C) ; &I-C1-252C; [05-12] + )) + (<-denotational + ((name . "GREEK SMALL LETTER CHI") + (=ucs . #x03C7) ; χ )) (<-fullwidth ((name . "GREEK SMALL LETTER CHI") @@ -2483,20 +2083,13 @@ (=ks-x1001 . #x2576) ; &I-K0-2576; [05-86] (=cns11643-1 . #x2544) ; &I-C1-2544; [05-36] (=big5 . #xA371) ; &I-B-A371; - (=ucs@jis . #x03C7) ; &J90-2656; + (=ucs@jis/fw . #x03C7) ; &J90-2656; )) (define-char '((name . "GREEK SMALL LETTER PSI") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter psi") - (=jis-x0208 . #x2657) ; &J90-2657; [06-55] - (=gb2312 . #x2657) ; &I-G0-2657; [06-55] - (=ks-x1001 . #x2577) ; &I-K0-2577; [05-87] - (=cns11643-1 . #x2545) ; &I-C1-2545; [05-37] - )) (->uppercase ((name . "GREEK CAPITAL LETTER PSI") (=ucs . #x03A8) ; Ψ @@ -2505,14 +2098,15 @@ (greek-iso8859-7 . #xF8) ; &I-GREEK-78; )) (define-char - '((name . "fullwidth greek small letter psi") - (=>ucs . #x03C8) ; ψ - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03C8) - (->uppercase - ((name . "fullwidth greek capital letter psi") + '((->uppercase + ((=jis-x0208 . #x2637) ; &J90-2637; [06-23] + (=gb2312 . #x2637) ; &I-G0-2637; [06-23] + (=ks-x1001 . #x2557) ; &I-K0-2557; [05-55] + (=cns11643-1 . #x252D) ; &I-C1-252D; [05-13] + )) + (<-denotational + ((name . "GREEK SMALL LETTER PSI") + (=ucs . #x03C8) ; ψ )) (<-fullwidth ((name . "GREEK SMALL LETTER PSI") @@ -2523,20 +2117,13 @@ (=ks-x1001 . #x2577) ; &I-K0-2577; [05-87] (=cns11643-1 . #x2545) ; &I-C1-2545; [05-37] (=big5 . #xA372) ; &I-B-A372; - (=ucs@jis . #x03C8) ; &J90-2657; + (=ucs@jis/fw . #x03C8) ; &J90-2657; )) (define-char '((name . "GREEK SMALL LETTER OMEGA") (general-category letter lowercase) ; Normative Category (bidi-category . "L") (mirrored . nil) - (->fullwidth - ((name . "fullwidth greek small letter omega") - (=jis-x0208 . #x2658) ; &J90-2658; [06-56] - (=gb2312 . #x2658) ; &I-G0-2658; [06-56] - (=ks-x1001 . #x2578) ; &I-K0-2578; [05-88] - (=cns11643-1 . #x2546) ; &I-C1-2546; [05-38] - )) (->uppercase ((name . "GREEK CAPITAL LETTER OMEGA") (=ucs . #x03A9) ; Ω @@ -2545,14 +2132,15 @@ (greek-iso8859-7 . #xF9) ; &I-GREEK-79; )) (define-char - '((name . "fullwidth greek small letter omega") - (=>ucs . #x03C9) ; ω - (general-category letter lowercase) ; Normative Category - (bidi-category . "L") - (mirrored . nil) - (->decomposition wide #x03C9) - (->uppercase - ((name . "fullwidth greek capital letter omega") + '((->uppercase + ((=jis-x0208 . #x2638) ; &J90-2638; [06-24] + (=gb2312 . #x2638) ; &I-G0-2638; [06-24] + (=ks-x1001 . #x2558) ; &I-K0-2558; [05-56] + (=cns11643-1 . #x252E) ; &I-C1-252E; [05-14] + )) + (<-denotational + ((name . "GREEK SMALL LETTER OMEGA") + (=ucs . #x03C9) ; ω )) (<-fullwidth ((name . "GREEK SMALL LETTER OMEGA") @@ -2563,7 +2151,7 @@ (=ks-x1001 . #x2578) ; &I-K0-2578; [05-88] (=cns11643-1 . #x2546) ; &I-C1-2546; [05-38] (=big5 . #xA373) ; &I-B-A373; - (=ucs@jis . #x03C9) ; &J90-2658; + (=ucs@jis/fw . #x03C9) ; &J90-2658; )) (define-char '((name . "GREEK SMALL LETTER IOTA WITH DIALYTIKA") @@ -2571,11 +2159,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03B9 #x0308) - (->fullwidth - ((name . "fullwidth greek small letter iota with dialytika") - (=jis-x0212 . #x2675) ; &JSP-2675; [06-85] - (=ucs@jis . #x03CA) ; &JSP-2675; - )) (->uppercase ((name . "GREEK CAPITAL LETTER IOTA WITH DIALYTIKA") (=ucs . #x03AA) ; Ϊ @@ -2584,21 +2167,19 @@ (greek-iso8859-7 . #xFA) ; &I-GREEK-7A; )) (define-char - '((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") + '((->uppercase + ((=jis-x0212 . #x2665) ; &JSP-2665; [06-69] + )) + (<-denotational + ((name . "GREEK SMALL LETTER IOTA WITH DIALYTIKA") + (=ucs . #x03CA) ; ϊ )) (<-fullwidth ((name . "GREEK SMALL LETTER IOTA WITH DIALYTIKA") (=ucs . #x03CA) ; ϊ )) (=jis-x0212 . #x2675) ; &JSP-2675; [06-85] - (=ucs@jis . #x03CA) ; &JSP-2675; + (=ucs@jis/fw . #x03CA) ; &JSP-2675; )) (define-char '((name . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA") @@ -2606,11 +2187,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03C5 #x0308) - (->fullwidth - ((name . "fullwidth greek small letter upsilon with dialytika") - (=jis-x0212 . #x267A) ; &JSP-267A; [06-90] - (=ucs@jis . #x03CB) ; &JSP-267A; - )) (->uppercase ((name . "GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA") (=ucs . #x03AB) ; Ϋ @@ -2619,21 +2195,19 @@ (greek-iso8859-7 . #xFB) ; &I-GREEK-7B; )) (define-char - '((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") + '((->uppercase + ((=jis-x0212 . #x266A) ; &JSP-266A; [06-74] + )) + (<-denotational + ((name . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA") + (=ucs . #x03CB) ; ϋ )) (<-fullwidth ((name . "GREEK SMALL LETTER UPSILON WITH DIALYTIKA") (=ucs . #x03CB) ; ϋ )) (=jis-x0212 . #x267A) ; &JSP-267A; [06-90] - (=ucs@jis . #x03CB) ; &JSP-267A; + (=ucs@jis/fw . #x03CB) ; &JSP-267A; )) (define-char '((name . "GREEK SMALL LETTER OMICRON WITH TONOS") @@ -2641,11 +2215,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03BF #x0301) - (->fullwidth - ((name . "fullwidth greek small letter omicron with tonos") - (=jis-x0212 . #x2677) ; &JSP-2677; [06-87] - (=ucs@jis . #x03CC) ; &JSP-2677; - )) (->uppercase ((name . "GREEK CAPITAL LETTER OMICRON WITH TONOS") (=ucs . #x038C) ; Ό @@ -2654,21 +2223,19 @@ (greek-iso8859-7 . #xFC) ; &I-GREEK-7C; )) (define-char - '((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") + '((->uppercase + ((=jis-x0212 . #x2667) ; &JSP-2667; [06-71] + )) + (<-denotational + ((name . "GREEK SMALL LETTER OMICRON WITH TONOS") + (=ucs . #x03CC) ; ό )) (<-fullwidth ((name . "GREEK SMALL LETTER OMICRON WITH TONOS") (=ucs . #x03CC) ; ό )) (=jis-x0212 . #x2677) ; &JSP-2677; [06-87] - (=ucs@jis . #x03CC) ; &JSP-2677; + (=ucs@jis/fw . #x03CC) ; &JSP-2677; )) (define-char '((name . "GREEK SMALL LETTER UPSILON WITH TONOS") @@ -2676,11 +2243,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03C5 #x0301) - (->fullwidth - ((name . "fullwidth greek small letter upsilon with tonos") - (=jis-x0212 . #x2679) ; &JSP-2679; [06-89] - (=ucs@jis . #x03CD) ; &JSP-2679; - )) (->uppercase ((name . "GREEK CAPITAL LETTER UPSILON WITH TONOS") (=ucs . #x038E) ; Ύ @@ -2689,21 +2251,19 @@ (greek-iso8859-7 . #xFD) ; &I-GREEK-7D; )) (define-char - '((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") + '((->uppercase + ((=jis-x0212 . #x2669) ; &JSP-2669; [06-73] + )) + (<-denotational + ((name . "GREEK SMALL LETTER UPSILON WITH TONOS") + (=ucs . #x03CD) ; ύ )) (<-fullwidth ((name . "GREEK SMALL LETTER UPSILON WITH TONOS") (=ucs . #x03CD) ; ύ )) (=jis-x0212 . #x2679) ; &JSP-2679; [06-89] - (=ucs@jis . #x03CD) ; &JSP-2679; + (=ucs@jis/fw . #x03CD) ; &JSP-2679; )) (define-char '((name . "GREEK SMALL LETTER OMEGA WITH TONOS") @@ -2711,11 +2271,6 @@ (bidi-category . "L") (mirrored . nil) (->decomposition #x03C9 #x0301) - (->fullwidth - ((name . "fullwidth greek small letter omega with tonos") - (=jis-x0212 . #x267C) ; &JSP-267C; [06-92] - (=ucs@jis . #x03CE) ; &JSP-267C; - )) (->uppercase ((name . "GREEK CAPITAL LETTER OMEGA WITH TONOS") (=ucs . #x038F) ; Ώ @@ -2724,21 +2279,19 @@ (greek-iso8859-7 . #xFE) ; &I-GREEK-7E; )) (define-char - '((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") + '((->uppercase + ((=jis-x0212 . #x266C) ; &JSP-266C; [06-76] + )) + (<-denotational + ((name . "GREEK SMALL LETTER OMEGA WITH TONOS") + (=ucs . #x03CE) ; ώ )) (<-fullwidth ((name . "GREEK SMALL LETTER OMEGA WITH TONOS") (=ucs . #x03CE) ; ώ )) (=jis-x0212 . #x267C) ; &JSP-267C; [06-92] - (=ucs@jis . #x03CE) ; &JSP-267C; + (=ucs@jis/fw . #x03CE) ; &JSP-267C; )) (define-char '((name . "GREEK BETA SYMBOL")