Commit 9b18faaf authored by Dave Love's avatar Dave Love
Browse files

*** empty log message ***

parent fce9d9dc
;;; ucs-tables.el --- translation to, from and via Unicode -*- coding: iso-2022-7bit -*-
;; Copyright (C) 2001 Free Software Foundation, Inc.
;; Author: Dave Love <fx@gnu.org>
;; Keywords: i18n
;; This file is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation; either version 2, or (at your option)
;; any later version.
;; This file is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.
;; You should have received a copy of the GNU General Public License
;; along with GNU Emacs; see the file COPYING. If not, write to
;; the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
;;; Commentary:
;; This file provides tables mapping between Unicode numbers and
;; emacs-mule characters from the iso8859 charsets. These are used to
;; construct other mappings between the Mule iso8859 charsets and the
;; emacs-unicode charsets and also a table that unifies iso8859
;; characters using a single charset as far as possible. These tables
;; can be used by latin1-disp.el to display some Unicode characters
;; without a Unicode font and by utf-8.el to unify Latin-N as far as
;; possible into Latin-1 on encoding.
;;; Code:
(defvar ucs-mule-8859-to-ucs-table (make-translation-table)
"Translation table from Emacs ISO-8859 characters to Unicode.
This maps Emacs characters from the non-Latin-1
...-iso8859-... charsets to their Unicode code points. This is a
many-to-one mapping.")
(defvar ucs-ucs-to-mule-8859-table (make-translation-table)
"Translation table from Unicode to Emacs ISO-8859 characters.
This maps Unicode code points to corresponding Emacs characters from
the ...-iso8859-... charsets. This is made a one-to-one mapping where
the same character occurs in more than one set by preferring the Emacs
iso-8859-N character with lowest N .")
(defvar ucs-mule-8859-to-mule-unicode (make-translation-table)
"Translation table from Emacs ISO-8859 characters to Mule Unicode.
This maps Emacs characters from the non-Latin-1
...-iso8859-... charsets to characters from the
mule-unicode-... charsets. This is a many-to-one mapping. The
characters translated to are suitable for encoding using the
`mule-utf-8' coding system.")
(defvar ucs-mule-unicode-to-mule-8859 (make-translation-table)
"Translation table from Mule Unicode to Emacs ISO-8859 characters.
This maps non-Latin-1 Emacs characters from the
mule-unicode-... charsets used by the `mule-utf-8' coding system to
characters from the ...-iso8859-... charsets. This is made a
one-to-one mapping where the same character occurs in more than one
set by preferring the Emacs iso-8859-N character with lowest N.")
(defvar ucs-latin-1-unification-table (make-translation-table)
"Translation table from other ISO-8859 characters to Latin-1.
This maps Emacs characters from the non-Latin-1
...-iso8859-... charsets to their equivalent Latin-1 characters, when
they have an equivalent. E.g. capital A with diaresis is code point
0xC4 in both Latin-1 and Latin-2, so this table maps Emacs character
0x944 to 0x8c4. This is a many-to-one mapping.")
(defcustom ucs-preferred-8859-set 'latin-iso8859-1
"Preferred charset to use for the `ucs-latin-1-unification-table'
target. Only a Latin-N set makes sense. You might want to change
this from the default latin-iso8859-1 to match your preferred coding
system in a non-Latin-1 environment."
:type '(choice (const latin-iso8859-15)
(const latin-iso8859-14)
(const latin-iso8859-9)
(const latin-iso8859-5)
(const latin-iso8859-4)
(const latin-iso8859-3)
(const latin-iso8859-2)
(const latin-iso8859-1)))
;; There doesn't seem to be a need to make these let bindings into
;; defvars, so we'll let the data get GC'ed.
(let ((ucs-8859-2-alist
'((?\,B (B . ?\x00A0) ;; NO-BREAK SPACE
(?\,B!(B . ?\x0104) ;; LATIN CAPITAL LETTER A WITH OGONEK
(?\,B"(B . ?\x02D8) ;; BREVE
(?\,B#(B . ?\x0141) ;; LATIN CAPITAL LETTER L WITH STROKE
(?\,B$(B . ?\x00A4) ;; CURRENCY SIGN
(?\,B%(B . ?\x013D) ;; LATIN CAPITAL LETTER L WITH CARON
(?\,B&(B . ?\x015A) ;; LATIN CAPITAL LETTER S WITH ACUTE
(?\,B'(B . ?\x00A7) ;; SECTION SIGN
(?\,B((B . ?\x00A8) ;; DIAERESIS
(?\,B)(B . ?\x0160) ;; LATIN CAPITAL LETTER S WITH CARON
(?\,B*(B . ?\x015E) ;; LATIN CAPITAL LETTER S WITH CEDILLA
(?\,B+(B . ?\x0164) ;; LATIN CAPITAL LETTER T WITH CARON
(?\,B,(B . ?\x0179) ;; LATIN CAPITAL LETTER Z WITH ACUTE
(?\,B-(B . ?\x00AD) ;; SOFT HYPHEN
(?\,B.(B . ?\x017D) ;; LATIN CAPITAL LETTER Z WITH CARON
(?\,B/(B . ?\x017B) ;; LATIN CAPITAL LETTER Z WITH DOT ABOVE
(?\,B0(B . ?\x00B0) ;; DEGREE SIGN
(?\,B1(B . ?\x0105) ;; LATIN SMALL LETTER A WITH OGONEK
(?\,B2(B . ?\x02DB) ;; OGONEK
(?\,B3(B . ?\x0142) ;; LATIN SMALL LETTER L WITH STROKE
(?\,B4(B . ?\x00B4) ;; ACUTE ACCENT
(?\,B5(B . ?\x013E) ;; LATIN SMALL LETTER L WITH CARON
(?\,B6(B . ?\x015B) ;; LATIN SMALL LETTER S WITH ACUTE
(?\,B7(B . ?\x02C7) ;; CARON
(?\,B8(B . ?\x00B8) ;; CEDILLA
(?\,B9(B . ?\x0161) ;; LATIN SMALL LETTER S WITH CARON
(?\,B:(B . ?\x015F) ;; LATIN SMALL LETTER S WITH CEDILLA
(?\,B;(B . ?\x0165) ;; LATIN SMALL LETTER T WITH CARON
(?\,B<(B . ?\x017A) ;; LATIN SMALL LETTER Z WITH ACUTE
(?\,B=(B . ?\x02DD) ;; DOUBLE ACUTE ACCENT
(?\,B>(B . ?\x017E) ;; LATIN SMALL LETTER Z WITH CARON
(?\,B?(B . ?\x017C) ;; LATIN SMALL LETTER Z WITH DOT ABOVE
(?\,B@(B . ?\x0154) ;; LATIN CAPITAL LETTER R WITH ACUTE
(?\,BA(B . ?\x00C1) ;; LATIN CAPITAL LETTER A WITH ACUTE
(?\,BB(B . ?\x00C2) ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX
(?\,BC(B . ?\x0102) ;; LATIN CAPITAL LETTER A WITH BREVE
(?\,BD(B . ?\x00C4) ;; LATIN CAPITAL LETTER A WITH DIAERESIS
(?\,BE(B . ?\x0139) ;; LATIN CAPITAL LETTER L WITH ACUTE
(?\,BF(B . ?\x0106) ;; LATIN CAPITAL LETTER C WITH ACUTE
(?\,BG(B . ?\x00C7) ;; LATIN CAPITAL LETTER C WITH CEDILLA
(?\,BH(B . ?\x010C) ;; LATIN CAPITAL LETTER C WITH CARON
(?\,BI(B . ?\x00C9) ;; LATIN CAPITAL LETTER E WITH ACUTE
(?\,BJ(B . ?\x0118) ;; LATIN CAPITAL LETTER E WITH OGONEK
(?\,BK(B . ?\x00CB) ;; LATIN CAPITAL LETTER E WITH DIAERESIS
(?\,BL(B . ?\x011A) ;; LATIN CAPITAL LETTER E WITH CARON
(?\,BM(B . ?\x00CD) ;; LATIN CAPITAL LETTER I WITH ACUTE
(?\,BN(B . ?\x00CE) ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX
(?\,BO(B . ?\x010E) ;; LATIN CAPITAL LETTER D WITH CARON
(?\,BP(B . ?\x0110) ;; LATIN CAPITAL LETTER D WITH STROKE
(?\,BQ(B . ?\x0143) ;; LATIN CAPITAL LETTER N WITH ACUTE
(?\,BR(B . ?\x0147) ;; LATIN CAPITAL LETTER N WITH CARON
(?\,BS(B . ?\x00D3) ;; LATIN CAPITAL LETTER O WITH ACUTE
(?\,BT(B . ?\x00D4) ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX
(?\,BU(B . ?\x0150) ;; LATIN CAPITAL LETTER O WITH DOUBLE ACUTE
(?\,BV(B . ?\x00D6) ;; LATIN CAPITAL LETTER O WITH DIAERESIS
(?\,BW(B . ?\x00D7) ;; MULTIPLICATION SIGN
(?\,BX(B . ?\x0158) ;; LATIN CAPITAL LETTER R WITH CARON
(?\,BY(B . ?\x016E) ;; LATIN CAPITAL LETTER U WITH RING ABOVE
(?\,BZ(B . ?\x00DA) ;; LATIN CAPITAL LETTER U WITH ACUTE
(?\,B[(B . ?\x0170) ;; LATIN CAPITAL LETTER U WITH DOUBLE ACUTE
(?\,B\(B . ?\x00DC) ;; LATIN CAPITAL LETTER U WITH DIAERESIS
(?\,B](B . ?\x00DD) ;; LATIN CAPITAL LETTER Y WITH ACUTE
(?\,B^(B . ?\x0162) ;; LATIN CAPITAL LETTER T WITH CEDILLA
(?\,B_(B . ?\x00DF) ;; LATIN SMALL LETTER SHARP S
(?\,B`(B . ?\x0155) ;; LATIN SMALL LETTER R WITH ACUTE
(?\,Ba(B . ?\x00E1) ;; LATIN SMALL LETTER A WITH ACUTE
(?\,Bb(B . ?\x00E2) ;; LATIN SMALL LETTER A WITH CIRCUMFLEX
(?\,Bc(B . ?\x0103) ;; LATIN SMALL LETTER A WITH BREVE
(?\,Bd(B . ?\x00E4) ;; LATIN SMALL LETTER A WITH DIAERESIS
(?\,Be(B . ?\x013A) ;; LATIN SMALL LETTER L WITH ACUTE
(?\,Bf(B . ?\x0107) ;; LATIN SMALL LETTER C WITH ACUTE
(?\,Bg(B . ?\x00E7) ;; LATIN SMALL LETTER C WITH CEDILLA
(?\,Bh(B . ?\x010D) ;; LATIN SMALL LETTER C WITH CARON
(?\,Bi(B . ?\x00E9) ;; LATIN SMALL LETTER E WITH ACUTE
(?\,Bj(B . ?\x0119) ;; LATIN SMALL LETTER E WITH OGONEK
(?\,Bk(B . ?\x00EB) ;; LATIN SMALL LETTER E WITH DIAERESIS
(?\,Bl(B . ?\x011B) ;; LATIN SMALL LETTER E WITH CARON
(?\,Bm(B . ?\x00ED) ;; LATIN SMALL LETTER I WITH ACUTE
(?\,Bn(B . ?\x00EE) ;; LATIN SMALL LETTER I WITH CIRCUMFLEX
(?\,Bo(B . ?\x010F) ;; LATIN SMALL LETTER D WITH CARON
(?\,Bp(B . ?\x0111) ;; LATIN SMALL LETTER D WITH STROKE
(?\,Bq(B . ?\x0144) ;; LATIN SMALL LETTER N WITH ACUTE
(?\,Br(B . ?\x0148) ;; LATIN SMALL LETTER N WITH CARON
(?\,Bs(B . ?\x00F3) ;; LATIN SMALL LETTER O WITH ACUTE
(?\,Bt(B . ?\x00F4) ;; LATIN SMALL LETTER O WITH CIRCUMFLEX
(?\,Bu(B . ?\x0151) ;; LATIN SMALL LETTER O WITH DOUBLE ACUTE
(?\,Bv(B . ?\x00F6) ;; LATIN SMALL LETTER O WITH DIAERESIS
(?\,Bw(B . ?\x00F7) ;; DIVISION SIGN
(?\,Bx(B . ?\x0159) ;; LATIN SMALL LETTER R WITH CARON
(?\,By(B . ?\x016F) ;; LATIN SMALL LETTER U WITH RING ABOVE
(?\,Bz(B . ?\x00FA) ;; LATIN SMALL LETTER U WITH ACUTE
(?\,B{(B . ?\x0171) ;; LATIN SMALL LETTER U WITH DOUBLE ACUTE
(?\,B|(B . ?\x00FC) ;; LATIN SMALL LETTER U WITH DIAERESIS
(?\,B}(B . ?\x00FD) ;; LATIN SMALL LETTER Y WITH ACUTE
(?\,B~(B . ?\x0163) ;; LATIN SMALL LETTER T WITH CEDILLA
(?\,B(B . ?\x02D9) ;; DOT ABOVE
))
(ucs-8859-3-alist
'((?\,C (B . ?\x00A0) ;; NO-BREAK SPACE
(?\,C!(B . ?\x0126) ;; LATIN CAPITAL LETTER H WITH STROKE
(?\,C"(B . ?\x02D8) ;; BREVE
(?\,C#(B . ?\x00A3) ;; POUND SIGN
(?\,C$(B . ?\x00A4) ;; CURRENCY SIGN
(?\,C&(B . ?\x0124) ;; LATIN CAPITAL LETTER H WITH CIRCUMFLEX
(?\,C'(B . ?\x00A7) ;; SECTION SIGN
(?\,C((B . ?\x00A8) ;; DIAERESIS
(?\,C)(B . ?\x0130) ;; LATIN CAPITAL LETTER I WITH DOT ABOVE
(?\,C*(B . ?\x015E) ;; LATIN CAPITAL LETTER S WITH CEDILLA
(?\,C+(B . ?\x011E) ;; LATIN CAPITAL LETTER G WITH BREVE
(?\,C,(B . ?\x0134) ;; LATIN CAPITAL LETTER J WITH CIRCUMFLEX
(?\,C-(B . ?\x00AD) ;; SOFT HYPHEN
(?\,C/(B . ?\x017B) ;; LATIN CAPITAL LETTER Z WITH DOT ABOVE
(?\,C0(B . ?\x00B0) ;; DEGREE SIGN
(?\,C1(B . ?\x0127) ;; LATIN SMALL LETTER H WITH STROKE
(?\,C2(B . ?\x00B2) ;; SUPERSCRIPT TWO
(?\,C3(B . ?\x00B3) ;; SUPERSCRIPT THREE
(?\,C4(B . ?\x00B4) ;; ACUTE ACCENT
(?\,C5(B . ?\x00B5) ;; MICRO SIGN
(?\,C6(B . ?\x0125) ;; LATIN SMALL LETTER H WITH CIRCUMFLEX
(?\,C7(B . ?\x00B7) ;; MIDDLE DOT
(?\,C8(B . ?\x00B8) ;; CEDILLA
(?\,C9(B . ?\x0131) ;; LATIN SMALL LETTER DOTLESS I
(?\,C:(B . ?\x015F) ;; LATIN SMALL LETTER S WITH CEDILLA
(?\,C;(B . ?\x011F) ;; LATIN SMALL LETTER G WITH BREVE
(?\,C<(B . ?\x0135) ;; LATIN SMALL LETTER J WITH CIRCUMFLEX
(?\,C=(B . ?\x00BD) ;; VULGAR FRACTION ONE HALF
(?\,C?(B . ?\x017C) ;; LATIN SMALL LETTER Z WITH DOT ABOVE
(?\,C@(B . ?\x00C0) ;; LATIN CAPITAL LETTER A WITH GRAVE
(?\,CA(B . ?\x00C1) ;; LATIN CAPITAL LETTER A WITH ACUTE
(?\,CB(B . ?\x00C2) ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX
(?\,CD(B . ?\x00C4) ;; LATIN CAPITAL LETTER A WITH DIAERESIS
(?\,CE(B . ?\x010A) ;; LATIN CAPITAL LETTER C WITH DOT ABOVE
(?\,CF(B . ?\x0108) ;; LATIN CAPITAL LETTER C WITH CIRCUMFLEX
(?\,CG(B . ?\x00C7) ;; LATIN CAPITAL LETTER C WITH CEDILLA
(?\,CH(B . ?\x00C8) ;; LATIN CAPITAL LETTER E WITH GRAVE
(?\,CI(B . ?\x00C9) ;; LATIN CAPITAL LETTER E WITH ACUTE
(?\,CJ(B . ?\x00CA) ;; LATIN CAPITAL LETTER E WITH CIRCUMFLEX
(?\,CK(B . ?\x00CB) ;; LATIN CAPITAL LETTER E WITH DIAERESIS
(?\,CL(B . ?\x00CC) ;; LATIN CAPITAL LETTER I WITH GRAVE
(?\,CM(B . ?\x00CD) ;; LATIN CAPITAL LETTER I WITH ACUTE
(?\,CN(B . ?\x00CE) ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX
(?\,CO(B . ?\x00CF) ;; LATIN CAPITAL LETTER I WITH DIAERESIS
(?\,CQ(B . ?\x00D1) ;; LATIN CAPITAL LETTER N WITH TILDE
(?\,CR(B . ?\x00D2) ;; LATIN CAPITAL LETTER O WITH GRAVE
(?\,CS(B . ?\x00D3) ;; LATIN CAPITAL LETTER O WITH ACUTE
(?\,CT(B . ?\x00D4) ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX
(?\,CU(B . ?\x0120) ;; LATIN CAPITAL LETTER G WITH DOT ABOVE
(?\,CV(B . ?\x00D6) ;; LATIN CAPITAL LETTER O WITH DIAERESIS
(?\,CW(B . ?\x00D7) ;; MULTIPLICATION SIGN
(?\,CX(B . ?\x011C) ;; LATIN CAPITAL LETTER G WITH CIRCUMFLEX
(?\,CY(B . ?\x00D9) ;; LATIN CAPITAL LETTER U WITH GRAVE
(?\,CZ(B . ?\x00DA) ;; LATIN CAPITAL LETTER U WITH ACUTE
(?\,C[(B . ?\x00DB) ;; LATIN CAPITAL LETTER U WITH CIRCUMFLEX
(?\,C\(B . ?\x00DC) ;; LATIN CAPITAL LETTER U WITH DIAERESIS
(?\,C](B . ?\x016C) ;; LATIN CAPITAL LETTER U WITH BREVE
(?\,C^(B . ?\x015C) ;; LATIN CAPITAL LETTER S WITH CIRCUMFLEX
(?\,C_(B . ?\x00DF) ;; LATIN SMALL LETTER SHARP S
(?\,C`(B . ?\x00E0) ;; LATIN SMALL LETTER A WITH GRAVE
(?\,Ca(B . ?\x00E1) ;; LATIN SMALL LETTER A WITH ACUTE
(?\,Cb(B . ?\x00E2) ;; LATIN SMALL LETTER A WITH CIRCUMFLEX
(?\,Cd(B . ?\x00E4) ;; LATIN SMALL LETTER A WITH DIAERESIS
(?\,Ce(B . ?\x010B) ;; LATIN SMALL LETTER C WITH DOT ABOVE
(?\,Cf(B . ?\x0109) ;; LATIN SMALL LETTER C WITH CIRCUMFLEX
(?\,Cg(B . ?\x00E7) ;; LATIN SMALL LETTER C WITH CEDILLA
(?\,Ch(B . ?\x00E8) ;; LATIN SMALL LETTER E WITH GRAVE
(?\,Ci(B . ?\x00E9) ;; LATIN SMALL LETTER E WITH ACUTE
(?\,Cj(B . ?\x00EA) ;; LATIN SMALL LETTER E WITH CIRCUMFLEX
(?\,Ck(B . ?\x00EB) ;; LATIN SMALL LETTER E WITH DIAERESIS
(?\,Cl(B . ?\x00EC) ;; LATIN SMALL LETTER I WITH GRAVE
(?\,Cm(B . ?\x00ED) ;; LATIN SMALL LETTER I WITH ACUTE
(?\,Cn(B . ?\x00EE) ;; LATIN SMALL LETTER I WITH CIRCUMFLEX
(?\,Co(B . ?\x00EF) ;; LATIN SMALL LETTER I WITH DIAERESIS
(?\,Cq(B . ?\x00F1) ;; LATIN SMALL LETTER N WITH TILDE
(?\,Cr(B . ?\x00F2) ;; LATIN SMALL LETTER O WITH GRAVE
(?\,Cs(B . ?\x00F3) ;; LATIN SMALL LETTER O WITH ACUTE
(?\,Ct(B . ?\x00F4) ;; LATIN SMALL LETTER O WITH CIRCUMFLEX
(?\,Cu(B . ?\x0121) ;; LATIN SMALL LETTER G WITH DOT ABOVE
(?\,Cv(B . ?\x00F6) ;; LATIN SMALL LETTER O WITH DIAERESIS
(?\,Cw(B . ?\x00F7) ;; DIVISION SIGN
(?\,Cx(B . ?\x011D) ;; LATIN SMALL LETTER G WITH CIRCUMFLEX
(?\,Cy(B . ?\x00F9) ;; LATIN SMALL LETTER U WITH GRAVE
(?\,Cz(B . ?\x00FA) ;; LATIN SMALL LETTER U WITH ACUTE
(?\,C{(B . ?\x00FB) ;; LATIN SMALL LETTER U WITH CIRCUMFLEX
(?\,C|(B . ?\x00FC) ;; LATIN SMALL LETTER U WITH DIAERESIS
(?\,C}(B . ?\x016D) ;; LATIN SMALL LETTER U WITH BREVE
(?\,C~(B . ?\x015D) ;; LATIN SMALL LETTER S WITH CIRCUMFLEX
(?\,C(B . ?\x02D9) ;; DOT ABOVE
))
(ucs-8859-4-alist
'((?\,D (B . ?\x00A0) ;; NO-BREAK SPACE
(?\,D!(B . ?\x0104) ;; LATIN CAPITAL LETTER A WITH OGONEK
(?\,D"(B . ?\x0138) ;; LATIN SMALL LETTER KRA
(?\,D#(B . ?\x0156) ;; LATIN CAPITAL LETTER R WITH CEDILLA
(?\,D$(B . ?\x00A4) ;; CURRENCY SIGN
(?\,D%(B . ?\x0128) ;; LATIN CAPITAL LETTER I WITH TILDE
(?\,D&(B . ?\x013B) ;; LATIN CAPITAL LETTER L WITH CEDILLA
(?\,D'(B . ?\x00A7) ;; SECTION SIGN
(?\,D((B . ?\x00A8) ;; DIAERESIS
(?\,D)(B . ?\x0160) ;; LATIN CAPITAL LETTER S WITH CARON
(?\,D*(B . ?\x0112) ;; LATIN CAPITAL LETTER E WITH MACRON
(?\,D+(B . ?\x0122) ;; LATIN CAPITAL LETTER G WITH CEDILLA
(?\,D,(B . ?\x0166) ;; LATIN CAPITAL LETTER T WITH STROKE
(?\,D-(B . ?\x00AD) ;; SOFT HYPHEN
(?\,D.(B . ?\x017D) ;; LATIN CAPITAL LETTER Z WITH CARON
(?\,D/(B . ?\x00AF) ;; MACRON
(?\,D0(B . ?\x00B0) ;; DEGREE SIGN
(?\,D1(B . ?\x0105) ;; LATIN SMALL LETTER A WITH OGONEK
(?\,D2(B . ?\x02DB) ;; OGONEK
(?\,D3(B . ?\x0157) ;; LATIN SMALL LETTER R WITH CEDILLA
(?\,D4(B . ?\x00B4) ;; ACUTE ACCENT
(?\,D5(B . ?\x0129) ;; LATIN SMALL LETTER I WITH TILDE
(?\,D6(B . ?\x013C) ;; LATIN SMALL LETTER L WITH CEDILLA
(?\,D7(B . ?\x02C7) ;; CARON
(?\,D8(B . ?\x00B8) ;; CEDILLA
(?\,D9(B . ?\x0161) ;; LATIN SMALL LETTER S WITH CARON
(?\,D:(B . ?\x0113) ;; LATIN SMALL LETTER E WITH MACRON
(?\,D;(B . ?\x0123) ;; LATIN SMALL LETTER G WITH CEDILLA
(?\,D<(B . ?\x0167) ;; LATIN SMALL LETTER T WITH STROKE
(?\,D=(B . ?\x014A) ;; LATIN CAPITAL LETTER ENG
(?\,D>(B . ?\x017E) ;; LATIN SMALL LETTER Z WITH CARON
(?\,D?(B . ?\x014B) ;; LATIN SMALL LETTER ENG
(?\,D@(B . ?\x0100) ;; LATIN CAPITAL LETTER A WITH MACRON
(?\,DA(B . ?\x00C1) ;; LATIN CAPITAL LETTER A WITH ACUTE
(?\,DB(B . ?\x00C2) ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX
(?\,DC(B . ?\x00C3) ;; LATIN CAPITAL LETTER A WITH TILDE
(?\,DD(B . ?\x00C4) ;; LATIN CAPITAL LETTER A WITH DIAERESIS
(?\,DE(B . ?\x00C5) ;; LATIN CAPITAL LETTER A WITH RING ABOVE
(?\,DF(B . ?\x00C6) ;; LATIN CAPITAL LETTER AE
(?\,DG(B . ?\x012E) ;; LATIN CAPITAL LETTER I WITH OGONEK
(?\,DH(B . ?\x010C) ;; LATIN CAPITAL LETTER C WITH CARON
(?\,DI(B . ?\x00C9) ;; LATIN CAPITAL LETTER E WITH ACUTE
(?\,DJ(B . ?\x0118) ;; LATIN CAPITAL LETTER E WITH OGONEK
(?\,DK(B . ?\x00CB) ;; LATIN CAPITAL LETTER E WITH DIAERESIS
(?\,DL(B . ?\x0116) ;; LATIN CAPITAL LETTER E WITH DOT ABOVE
(?\,DM(B . ?\x00CD) ;; LATIN CAPITAL LETTER I WITH ACUTE
(?\,DN(B . ?\x00CE) ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX
(?\,DO(B . ?\x012A) ;; LATIN CAPITAL LETTER I WITH MACRON
(?\,DP(B . ?\x0110) ;; LATIN CAPITAL LETTER D WITH STROKE
(?\,DQ(B . ?\x0145) ;; LATIN CAPITAL LETTER N WITH CEDILLA
(?\,DR(B . ?\x014C) ;; LATIN CAPITAL LETTER O WITH MACRON
(?\,DS(B . ?\x0136) ;; LATIN CAPITAL LETTER K WITH CEDILLA
(?\,DT(B . ?\x00D4) ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX
(?\,DU(B . ?\x00D5) ;; LATIN CAPITAL LETTER O WITH TILDE
(?\,DV(B . ?\x00D6) ;; LATIN CAPITAL LETTER O WITH DIAERESIS
(?\,DW(B . ?\x00D7) ;; MULTIPLICATION SIGN
(?\,DX(B . ?\x00D8) ;; LATIN CAPITAL LETTER O WITH STROKE
(?\,DY(B . ?\x0172) ;; LATIN CAPITAL LETTER U WITH OGONEK
(?\,DZ(B . ?\x00DA) ;; LATIN CAPITAL LETTER U WITH ACUTE
(?\,D[(B . ?\x00DB) ;; LATIN CAPITAL LETTER U WITH CIRCUMFLEX
(?\,D\(B . ?\x00DC) ;; LATIN CAPITAL LETTER U WITH DIAERESIS
(?\,D](B . ?\x0168) ;; LATIN CAPITAL LETTER U WITH TILDE
(?\,D^(B . ?\x016A) ;; LATIN CAPITAL LETTER U WITH MACRON
(?\,D_(B . ?\x00DF) ;; LATIN SMALL LETTER SHARP S
(?\,D`(B . ?\x0101) ;; LATIN SMALL LETTER A WITH MACRON
(?\,Da(B . ?\x00E1) ;; LATIN SMALL LETTER A WITH ACUTE
(?\,Db(B . ?\x00E2) ;; LATIN SMALL LETTER A WITH CIRCUMFLEX
(?\,Dc(B . ?\x00E3) ;; LATIN SMALL LETTER A WITH TILDE
(?\,Dd(B . ?\x00E4) ;; LATIN SMALL LETTER A WITH DIAERESIS
(?\,De(B . ?\x00E5) ;; LATIN SMALL LETTER A WITH RING ABOVE
(?\,Df(B . ?\x00E6) ;; LATIN SMALL LETTER AE
(?\,Dg(B . ?\x012F) ;; LATIN SMALL LETTER I WITH OGONEK
(?\,Dh(B . ?\x010D) ;; LATIN SMALL LETTER C WITH CARON
(?\,Di(B . ?\x00E9) ;; LATIN SMALL LETTER E WITH ACUTE
(?\,Dj(B . ?\x0119) ;; LATIN SMALL LETTER E WITH OGONEK
(?\,Dk(B . ?\x00EB) ;; LATIN SMALL LETTER E WITH DIAERESIS
(?\,Dl(B . ?\x0117) ;; LATIN SMALL LETTER E WITH DOT ABOVE
(?\,Dm(B . ?\x00ED) ;; LATIN SMALL LETTER I WITH ACUTE
(?\,Dn(B . ?\x00EE) ;; LATIN SMALL LETTER I WITH CIRCUMFLEX
(?\,Do(B . ?\x012B) ;; LATIN SMALL LETTER I WITH MACRON
(?\,Dp(B . ?\x0111) ;; LATIN SMALL LETTER D WITH STROKE
(?\,Dq(B . ?\x0146) ;; LATIN SMALL LETTER N WITH CEDILLA
(?\,Dr(B . ?\x014D) ;; LATIN SMALL LETTER O WITH MACRON
(?\,Ds(B . ?\x0137) ;; LATIN SMALL LETTER K WITH CEDILLA
(?\,Dt(B . ?\x00F4) ;; LATIN SMALL LETTER O WITH CIRCUMFLEX
(?\,Du(B . ?\x00F5) ;; LATIN SMALL LETTER O WITH TILDE
(?\,Dv(B . ?\x00F6) ;; LATIN SMALL LETTER O WITH DIAERESIS
(?\,Dw(B . ?\x00F7) ;; DIVISION SIGN
(?\,Dx(B . ?\x00F8) ;; LATIN SMALL LETTER O WITH STROKE
(?\,Dy(B . ?\x0173) ;; LATIN SMALL LETTER U WITH OGONEK
(?\,Dz(B . ?\x00FA) ;; LATIN SMALL LETTER U WITH ACUTE
(?\,D{(B . ?\x00FB) ;; LATIN SMALL LETTER U WITH CIRCUMFLEX
(?\,D|(B . ?\x00FC) ;; LATIN SMALL LETTER U WITH DIAERESIS
(?\,D}(B . ?\x0169) ;; LATIN SMALL LETTER U WITH TILDE
(?\,D~(B . ?\x016B) ;; LATIN SMALL LETTER U WITH MACRON
(?\,D(B . ?\x02D9) ;; DOT ABOVE
))
(ucs-8859-5-alist
'((?\,L (B . ?\x00A0) ;; NO-BREAK SPACE
(?\,L!(B . ?\x0401) ;; CYRILLIC CAPITAL LETTER IO
(?\,L"(B . ?\x0402) ;; CYRILLIC CAPITAL LETTER DJE
(?\,L#(B . ?\x0403) ;; CYRILLIC CAPITAL LETTER GJE
(?\,L$(B . ?\x0404) ;; CYRILLIC CAPITAL LETTER UKRAINIAN IE
(?\,L%(B . ?\x0405) ;; CYRILLIC CAPITAL LETTER DZE
(?\,L&(B . ?\x0406) ;; CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I
(?\,L'(B . ?\x0407) ;; CYRILLIC CAPITAL LETTER YI
(?\,L((B . ?\x0408) ;; CYRILLIC CAPITAL LETTER JE
(?\,L)(B . ?\x0409) ;; CYRILLIC CAPITAL LETTER LJE
(?\,L*(B . ?\x040A) ;; CYRILLIC CAPITAL LETTER NJE
(?\,L+(B . ?\x040B) ;; CYRILLIC CAPITAL LETTER TSHE
(?\,L,(B . ?\x040C) ;; CYRILLIC CAPITAL LETTER KJE
(?\,L-(B . ?\x00AD) ;; SOFT HYPHEN
(?\,L.(B . ?\x040E) ;; CYRILLIC CAPITAL LETTER SHORT U
(?\,L/(B . ?\x040F) ;; CYRILLIC CAPITAL LETTER DZHE
(?\,L0(B . ?\x0410) ;; CYRILLIC CAPITAL LETTER A
(?\,L1(B . ?\x0411) ;; CYRILLIC CAPITAL LETTER BE
(?\,L2(B . ?\x0412) ;; CYRILLIC CAPITAL LETTER VE
(?\,L3(B . ?\x0413) ;; CYRILLIC CAPITAL LETTER GHE
(?\,L4(B . ?\x0414) ;; CYRILLIC CAPITAL LETTER DE
(?\,L5(B . ?\x0415) ;; CYRILLIC CAPITAL LETTER IE
(?\,L6(B . ?\x0416) ;; CYRILLIC CAPITAL LETTER ZHE
(?\,L7(B . ?\x0417) ;; CYRILLIC CAPITAL LETTER ZE
(?\,L8(B . ?\x0418) ;; CYRILLIC CAPITAL LETTER I
(?\,L9(B . ?\x0419) ;; CYRILLIC CAPITAL LETTER SHORT I
(?\,L:(B . ?\x041A) ;; CYRILLIC CAPITAL LETTER KA
(?\,L;(B . ?\x041B) ;; CYRILLIC CAPITAL LETTER EL
(?\,L<(B . ?\x041C) ;; CYRILLIC CAPITAL LETTER EM
(?\,L=(B . ?\x041D) ;; CYRILLIC CAPITAL LETTER EN
(?\,L>(B . ?\x041E) ;; CYRILLIC CAPITAL LETTER O
(?\,L?(B . ?\x041F) ;; CYRILLIC CAPITAL LETTER PE
(?\,L@(B . ?\x0420) ;; CYRILLIC CAPITAL LETTER ER
(?\,LA(B . ?\x0421) ;; CYRILLIC CAPITAL LETTER ES
(?\,LB(B . ?\x0422) ;; CYRILLIC CAPITAL LETTER TE
(?\,LC(B . ?\x0423) ;; CYRILLIC CAPITAL LETTER U
(?\,LD(B . ?\x0424) ;; CYRILLIC CAPITAL LETTER EF
(?\,LE(B . ?\x0425) ;; CYRILLIC CAPITAL LETTER HA
(?\,LF(B . ?\x0426) ;; CYRILLIC CAPITAL LETTER TSE
(?\,LG(B . ?\x0427) ;; CYRILLIC CAPITAL LETTER CHE
(?\,LH(B . ?\x0428) ;; CYRILLIC CAPITAL LETTER SHA
(?\,LI(B . ?\x0429) ;; CYRILLIC CAPITAL LETTER SHCHA
(?\,LJ(B . ?\x042A) ;; CYRILLIC CAPITAL LETTER HARD SIGN
(?\,LK(B . ?\x042B) ;; CYRILLIC CAPITAL LETTER YERU
(?\,LL(B . ?\x042C) ;; CYRILLIC CAPITAL LETTER SOFT SIGN
(?\,LM(B . ?\x042D) ;; CYRILLIC CAPITAL LETTER E
(?\,LN(B . ?\x042E) ;; CYRILLIC CAPITAL LETTER YU
(?\,LO(B . ?\x042F) ;; CYRILLIC CAPITAL LETTER YA
(?\,LP(B . ?\x0430) ;; CYRILLIC SMALL LETTER A
(?\,LQ(B . ?\x0431) ;; CYRILLIC SMALL LETTER BE
(?\,LR(B . ?\x0432) ;; CYRILLIC SMALL LETTER VE
(?\,LS(B . ?\x0433) ;; CYRILLIC SMALL LETTER GHE
(?\,LT(B . ?\x0434) ;; CYRILLIC SMALL LETTER DE
(?\,LU(B . ?\x0435) ;; CYRILLIC SMALL LETTER IE
(?\,LV(B . ?\x0436) ;; CYRILLIC SMALL LETTER ZHE
(?\,LW(B . ?\x0437) ;; CYRILLIC SMALL LETTER ZE
(?\,LX(B . ?\x0438) ;; CYRILLIC SMALL LETTER I
(?\,LY(B . ?\x0439) ;; CYRILLIC SMALL LETTER SHORT I
(?\,LZ(B . ?\x043A) ;; CYRILLIC SMALL LETTER KA
(?\,L[(B . ?\x043B) ;; CYRILLIC SMALL LETTER EL
(?\,L\(B . ?\x043C) ;; CYRILLIC SMALL LETTER EM
(?\,L](B . ?\x043D) ;; CYRILLIC SMALL LETTER EN
(?\,L^(B . ?\x043E) ;; CYRILLIC SMALL LETTER O
(?\,L_(B . ?\x043F) ;; CYRILLIC SMALL LETTER PE
(?\,L`(B . ?\x0440) ;; CYRILLIC SMALL LETTER ER
(?\,La(B . ?\x0441) ;; CYRILLIC SMALL LETTER ES
(?\,Lb(B . ?\x0442) ;; CYRILLIC SMALL LETTER TE
(?\,Lc(B . ?\x0443) ;; CYRILLIC SMALL LETTER U
(?\,Ld(B . ?\x0444) ;; CYRILLIC SMALL LETTER EF
(?\,Le(B . ?\x0445) ;; CYRILLIC SMALL LETTER HA
(?\,Lf(B . ?\x0446) ;; CYRILLIC SMALL LETTER TSE
(?\,Lg(B . ?\x0447) ;; CYRILLIC SMALL LETTER CHE
(?\,Lh(B . ?\x0448) ;; CYRILLIC SMALL LETTER SHA
(?\,Li(B . ?\x0449) ;; CYRILLIC SMALL LETTER SHCHA
(?\,Lj(B . ?\x044A) ;; CYRILLIC SMALL LETTER HARD SIGN
(?\,Lk(B . ?\x044B) ;; CYRILLIC SMALL LETTER YERU
(?\,Ll(B . ?\x044C) ;; CYRILLIC SMALL LETTER SOFT SIGN
(?\,Lm(B . ?\x044D) ;; CYRILLIC SMALL LETTER E
(?\,Ln(B . ?\x044E) ;; CYRILLIC SMALL LETTER YU
(?\,Lo(B . ?\x044F) ;; CYRILLIC SMALL LETTER YA
(?\,Lp(B . ?\x2116) ;; NUMERO SIGN
(?\,Lq(B . ?\x0451) ;; CYRILLIC SMALL LETTER IO
(?\,Lr(B . ?\x0452) ;; CYRILLIC SMALL LETTER DJE
(?\,Ls(B . ?\x0453) ;; CYRILLIC SMALL LETTER GJE
(?\,Lt(B . ?\x0454) ;; CYRILLIC SMALL LETTER UKRAINIAN IE
(?\,Lu(B . ?\x0455) ;; CYRILLIC SMALL LETTER DZE
(?\,Lv(B . ?\x0456) ;; CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I
(?\,Lw(B . ?\x0457) ;; CYRILLIC SMALL LETTER YI
(?\,Lx(B . ?\x0458) ;; CYRILLIC SMALL LETTER JE
(?\,Ly(B . ?\x0459) ;; CYRILLIC SMALL LETTER LJE
(?\,Lz(B . ?\x045A) ;; CYRILLIC SMALL LETTER NJE
(?\,L{(B . ?\x045B) ;; CYRILLIC SMALL LETTER TSHE
(?\,L|(B . ?\x045C) ;; CYRILLIC SMALL LETTER KJE
(?\,L}(B . ?\x00A7) ;; SECTION SIGN
(?\,L~(B . ?\x045E) ;; CYRILLIC SMALL LETTER SHORT U
(?\,L(B . ?\x045F) ;; CYRILLIC SMALL LETTER DZHE
))
;; Arabic probably isn't so useful in the absence of Arabic
;; language support.
(ucs-8859-6-alist
'((?,G (B . ?\x00A0) ;; NO-BREAK SPACE
(?,G$(B . ?\x00A4) ;; CURRENCY SIGN
(?,G,(B . ?\x060C) ;; ARABIC COMMA
(?,G-(B . ?\x00AD) ;; SOFT HYPHEN
(?,G;(B . ?\x061B) ;; ARABIC SEMICOLON
(?,G?(B . ?\x061F) ;; ARABIC QUESTION MARK
(?,GA(B . ?\x0621) ;; ARABIC LETTER HAMZA
(?,GB(B . ?\x0622) ;; ARABIC LETTER ALEF WITH MADDA ABOVE
(?,GC(B . ?\x0623) ;; ARABIC LETTER ALEF WITH HAMZA ABOVE
(?,GD(B . ?\x0624) ;; ARABIC LETTER WAW WITH HAMZA ABOVE
(?,GE(B . ?\x0625) ;; ARABIC LETTER ALEF WITH HAMZA BELOW
(?,GF(B . ?\x0626) ;; ARABIC LETTER YEH WITH HAMZA ABOVE
(?,GG(B . ?\x0627) ;; ARABIC LETTER ALEF
(?,GH(B . ?\x0628) ;; ARABIC LETTER BEH
(?,GI(B . ?\x0629) ;; ARABIC LETTER TEH MARBUTA
(?,GJ(B . ?\x062A) ;; ARABIC LETTER TEH
(?,GK(B . ?\x062B) ;; ARABIC LETTER THEH
(?,GL(B . ?\x062C) ;; ARABIC LETTER JEEM
(?,GM(B . ?\x062D) ;; ARABIC LETTER HAH
(?,GN(B . ?\x062E) ;; ARABIC LETTER KHAH
(?,GO(B . ?\x062F) ;; ARABIC LETTER DAL
(?,GP(B . ?\x0630) ;; ARABIC LETTER THAL
(?,GQ(B . ?\x0631) ;; ARABIC LETTER REH
(?,GR(B . ?\x0632) ;; ARABIC LETTER ZAIN
(?,GS(B . ?\x0633) ;; ARABIC LETTER SEEN
(?,GT(B . ?\x0634) ;; ARABIC LETTER SHEEN
(?,GU(B . ?\x0635) ;; ARABIC LETTER SAD
(?,GV(B . ?\x0636) ;; ARABIC LETTER DAD
(?,GW(B . ?\x0637) ;; ARABIC LETTER TAH
(?,GX(B . ?\x0638) ;; ARABIC LETTER ZAH
(?,GY(B . ?\x0639) ;; ARABIC LETTER AIN
(?,GZ(B . ?\x063A) ;; ARABIC LETTER GHAIN
(?,G`(B . ?\x0640) ;; ARABIC TATWEEL
(?,Ga(B . ?\x0641) ;; ARABIC LETTER FEH
(?,Gb(B . ?\x0642) ;; ARABIC LETTER QAF
(?,Gc(B . ?\x0643) ;; ARABIC LETTER KAF
(?,Gd(B . ?\x0644) ;; ARABIC LETTER LAM
(?,Ge(B . ?\x0645) ;; ARABIC LETTER MEEM
(?,Gf(B . ?\x0646) ;; ARABIC LETTER NOON
(?,Gg(B . ?\x0647) ;; ARABIC LETTER HEH
(?,Gh(B . ?\x0648) ;; ARABIC LETTER WAW
(?,Gi(B . ?\x0649) ;; ARABIC LETTER ALEF MAKSURA
(?,Gj(B . ?\x064A) ;; ARABIC LETTER YEH
(?,Gk(B . ?\x064B) ;; ARABIC FATHATAN
(?,Gl(B . ?\x064C) ;; ARABIC DAMMATAN
(?,Gm(B . ?\x064D) ;; ARABIC KASRATAN
(?,Gn(B . ?\x064E) ;; ARABIC FATHA
(?,Go(B . ?\x064F) ;; ARABIC DAMMA
(?,Gp(B . ?\x0650) ;; ARABIC KASRA
(?,Gq(B . ?\x0651) ;; ARABIC SHADDA
(?,Gr(B . ?\x0652) ;; ARABIC SUKUN
))
(ucs-8859-7-alist
'((?\,F (B . ?\x00A0) ;; NO-BREAK SPACE
(?\,F!(B . ?\x2018) ;; LEFT SINGLE QUOTATION MARK
(?\,F"(B . ?\x2019) ;; RIGHT SINGLE QUOTATION MARK
(?\,F#(B . ?\x00A3) ;; POUND SIGN
(?\,F&(B . ?\x00A6) ;; BROKEN BAR
(?\,F'(B . ?\x00A7) ;; SECTION SIGN
(?\,F((B . ?\x00A8) ;; DIAERESIS
(?\,F)(B . ?\x00A9) ;; COPYRIGHT SIGN
(?\,F+(B . ?\x00AB) ;; LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
(?\,F,(B . ?\x00AC) ;; NOT SIGN
(?\,F-(B . ?\x00AD) ;; SOFT HYPHEN
(?\,F/(B . ?\x2015) ;; HORIZONTAL BAR
(?\,F0(B . ?\x00B0) ;; DEGREE SIGN
(?\,F1(B . ?\x00B1) ;; PLUS-MINUS SIGN
(?\,F2(B . ?\x00B2) ;; SUPERSCRIPT TWO
(?\,F3(B . ?\x00B3) ;; SUPERSCRIPT THREE
(?\,F4(B . ?\x0384) ;; GREEK TONOS
(?\,F5(B . ?\x0385) ;; GREEK DIALYTIKA TONOS
(?\,F6(B . ?\x0386) ;; GREEK CAPITAL LETTER ALPHA WITH TONOS
(?\,F7(B . ?\x00B7) ;; MIDDLE DOT
(?\,F8(B . ?\x0388) ;; GREEK CAPITAL LETTER EPSILON WITH TONOS
(?\,F9(B . ?\x0389) ;; GREEK CAPITAL LETTER ETA WITH TONOS
(?\,F:(B . ?\x038A) ;; GREEK CAPITAL LETTER IOTA WITH TONOS
(?\,F;(B . ?\x00BB) ;; RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
(?\,F<(B . ?\x038C) ;; GREEK CAPITAL LETTER OMICRON WITH TONOS
(?\,F=(B . ?\x00BD) ;; VULGAR FRACTION ONE HALF
(?\,F>(B . ?\x038E) ;; GREEK CAPITAL LETTER UPSILON WITH TONOS
(?\,F?(B . ?\x038F) ;; GREEK CAPITAL LETTER OMEGA WITH TONOS
(?\,F@(B . ?\x0390) ;; GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS
(?\,FA(B . ?\x0391) ;; GREEK CAPITAL LETTER ALPHA
(?\,FB(B . ?\x0392) ;; GREEK CAPITAL LETTER BETA
(?\,FC(B . ?\x0393) ;; GREEK CAPITAL LETTER GAMMA
(?\,FD(B . ?\x0394) ;; GREEK CAPITAL LETTER DELTA
(?\,FE(B . ?\x0395) ;; GREEK CAPITAL LETTER EPSILON
(?\,FF(B . ?\x0396) ;; GREEK CAPITAL LETTER ZETA
(?\,FG(B . ?\x0397) ;; GREEK CAPITAL LETTER ETA
(?\,FH(B . ?\x0398) ;; GREEK CAPITAL LETTER THETA
(?\,FI(B . ?\x0399) ;; GREEK CAPITAL LETTER IOTA
(?\,FJ(B . ?\x039A) ;; GREEK CAPITAL LETTER KAPPA
(?\,FK(B . ?\x039B) ;; GREEK CAPITAL LETTER LAMDA
(?\,FL(B . ?\x039C) ;; GREEK CAPITAL LETTER MU
(?\,FM(B . ?\x039D) ;; GREEK CAPITAL LETTER NU
(?\,FN(B . ?\x039E) ;; GREEK CAPITAL LETTER XI
(?\,FO(B . ?\x039F) ;; GREEK CAPITAL LETTER OMICRON
(?\,FP(B . ?\x03A0) ;; GREEK CAPITAL LETTER PI
(?\,FQ(B . ?\x03A1) ;; GREEK CAPITAL LETTER RHO
(?\,FS(B . ?\x03A3) ;; GREEK CAPITAL LETTER SIGMA
(?\,FT(B . ?\x03A4) ;; GREEK CAPITAL LETTER TAU
(?\,FU(B . ?\x03A5) ;; GREEK CAPITAL LETTER UPSILON
(?\,FV(B . ?\x03A6) ;; GREEK CAPITAL LETTER PHI
(?\,FW(B . ?\x03A7) ;; GREEK CAPITAL LETTER CHI
(?\,FX(B . ?\x03A8) ;; GREEK CAPITAL LETTER PSI
(?\,FY(B . ?\x03A9) ;; GREEK CAPITAL LETTER OMEGA
(?\,FZ(B . ?\x03AA) ;; GREEK CAPITAL LETTER IOTA WITH DIALYTIKA
(?\,F[(B . ?\x03AB) ;; GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA
(?\,F\(B . ?\x03AC) ;; GREEK SMALL LETTER ALPHA WITH TONOS
(?\,F](B . ?\x03AD) ;; GREEK SMALL LETTER EPSILON WITH TONOS
(?\,F^(B . ?\x03AE) ;; GREEK SMALL LETTER ETA WITH TONOS
(?\,F_(B . ?\x03AF) ;; GREEK SMALL LETTER IOTA WITH TONOS
(?\,F`(B . ?\x03B0) ;; GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS
(?\,Fa(B . ?\x03B1) ;; GREEK SMALL LETTER ALPHA
(?\,Fb(B . ?\x03B2) ;; GREEK SMALL LETTER BETA
(?\,Fc(B . ?\x03B3) ;; GREEK SMALL LETTER GAMMA
(?\,Fd(B . ?\x03B4) ;; GREEK SMALL LETTER DELTA
(?\,Fe(B . ?\x03B5) ;; GREEK SMALL LETTER EPSILON
(?\,Ff(B . ?\x03B6) ;; GREEK SMALL LETTER ZETA
(?\,Fg(B . ?\x03B7) ;; GREEK SMALL LETTER ETA
(?\,Fh(B . ?\x03B8) ;; GREEK SMALL LETTER THETA
(?\,Fi(B . ?\x03B9) ;; GREEK SMALL LETTER IOTA
(?\,Fj(B . ?\x03BA) ;; GREEK SMALL LETTER KAPPA
(?\,Fk(B . ?\x03BB) ;; GREEK SMALL LETTER LAMDA
(?\,Fl(B . ?\x03BC) ;; GREEK SMALL LETTER MU
(?\,Fm(B . ?\x03BD) ;; GREEK SMALL LETTER NU
(?\,Fn(B . ?\x03BE) ;; GREEK SMALL LETTER XI
(?\,Fo(B . ?\x03BF) ;; GREEK SMALL LETTER OMICRON
(?\,Fp(B . ?\x03C0) ;; GREEK SMALL LETTER PI
(?\,Fq(B . ?\x03C1) ;; GREEK SMALL LETTER RHO
(?\,Fr(B . ?\x03C2) ;; GREEK SMALL LETTER FINAL SIGMA