(defvar ucs-mule-8859-to-ucs-table (make-translation-table)
"Char 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-mule-8859-to-mule-unicode (make-translation-table)
"Char 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-8859-1-encode-table nil
"Used as `translation-table-for-encode' for iso-8859-2.
Translates from the iso8859 charsets and `mule-unicode-0100-24ff'.")
(defvar ucs-8859-2-encode-table nil
"Used as `translation-table-for-encode' for iso-8859-2.
Translates from the iso8859 charsets and `mule-unicode-0100-24ff'.")
(defvar ucs-8859-3-encode-table nil
"Used as `translation-table-for-encode' for iso-8859-3.
Translates from the iso8859 charsets and `mule-unicode-0100-24ff'.")
(defvar ucs-8859-4-encode-table nil
"Used as `translation-table-for-encode' for iso-8859-4.
Translates from the iso8859 charsets and `mule-unicode-0100-24ff'.")
(defvar ucs-8859-5-encode-table nil
"Used as `translation-table-for-encode' for iso-8859-5.
Translates from the iso8859 charsets and `mule-unicode-0100-24ff'.")
(defvar ucs-8859-7-encode-table nil
"Used as `translation-table-for-encode' for iso-8859-7.
Translates from the iso8859 charsets and `mule-unicode-0100-24ff'.")
(defvar ucs-8859-8-encode-table nil
"Used as `translation-table-for-encode' for iso-8859-8.
Translates from the iso8859 charsets and `mule-unicode-0100-24ff'.")
(defvar ucs-8859-9-encode-table nil
"Used as `translation-table-for-encode' for iso-8859-9.
Translates from the iso8859 charsets and `mule-unicode-0100-24ff'.")
(defvar ucs-8859-14-encode-table nil
"Used as `translation-table-for-encode' for iso-8859-14.
Translates from the iso8859 charsets and `mule-unicode-0100-24ff'.")
(defvar ucs-8859-15-encode-table nil
"Used as `translation-table-for-encode' for iso-8859-15.
Translates from the iso8859 charsets and `mule-unicode-0100-24ff'.")
(setq translation-table-for-input (make-translation-table))
(put 'translation-table-for-input 'permanent-local t)
(define-translation-table 'ucs-translation-table-for-decode)
(let ((ucs-8859-2-alist
'((?\,B (B . ?\x00A0) (?\,B!(B . ?\x0104) (?\,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) (?\,C#(B . ?\x00A3) (?\,C$(B . ?\x00A4) (?\,C&(B . ?\x0124) (?\,C'(B . ?\x00A7) (?\,C((B . ?\x00A8) (?\,C)(B . ?\x0130) (?\,C*(B . ?\x015E) (?\,C+(B . ?\x011E) (?\,C,(B . ?\x0134) (?\,C-(B . ?\x00AD) (?\,C/(B . ?\x017B) (?\,C0(B . ?\x00B0) (?\,C1(B . ?\x0127) (?\,C2(B . ?\x00B2) (?\,C3(B . ?\x00B3) (?\,C4(B . ?\x00B4) (?\,C5(B . ?\x00B5) (?\,C6(B . ?\x0125) (?\,C7(B . ?\x00B7) (?\,C8(B . ?\x00B8) (?\,C9(B . ?\x0131) (?\,C:(B . ?\x015F) (?\,C (?\,C<(B . ?\x0135) (?\,C=(B . ?\x00BD) (?\,C?(B . ?\x017C) (?\,C@(B . ?\x00C0) (?\,CA(B . ?\x00C1) (?\,CB(B . ?\x00C2) (?\,CD(B . ?\x00C4) (?\,CE(B . ?\x010A) (?\,CF(B . ?\x0108) (?\,CG(B . ?\x00C7) (?\,CH(B . ?\x00C8) (?\,CI(B . ?\x00C9) (?\,CJ(B . ?\x00CA) (?\,CK(B . ?\x00CB) (?\,CL(B . ?\x00CC) (?\,CM(B . ?\x00CD) (?\,CN(B . ?\x00CE) (?\,CO(B . ?\x00CF) (?\,CQ(B . ?\x00D1) (?\,CR(B . ?\x00D2) (?\,CS(B . ?\x00D3) (?\,CT(B . ?\x00D4) (?\,CU(B . ?\x0120) (?\,CV(B . ?\x00D6) (?\,CW(B . ?\x00D7) (?\,CX(B . ?\x011C) (?\,CY(B . ?\x00D9) (?\,CZ(B . ?\x00DA) (?\,C[(B . ?\x00DB) (?\,C\(B . ?\x00DC) (?\,C](B . ?\x016C) (?\,C^(B . ?\x015C) (?\,C_(B . ?\x00DF) (?\,C`(B . ?\x00E0) (?\,Ca(B . ?\x00E1) (?\,Cb(B . ?\x00E2) (?\,Cd(B . ?\x00E4) (?\,Ce(B . ?\x010B) (?\,Cf(B . ?\x0109) (?\,Cg(B . ?\x00E7) (?\,Ch(B . ?\x00E8) (?\,Ci(B . ?\x00E9) (?\,Cj(B . ?\x00EA) (?\,Ck(B . ?\x00EB) (?\,Cl(B . ?\x00EC) (?\,Cm(B . ?\x00ED) (?\,Cn(B . ?\x00EE) (?\,Co(B . ?\x00EF) (?\,Cq(B . ?\x00F1) (?\,Cr(B . ?\x00F2) (?\,Cs(B . ?\x00F3) (?\,Ct(B . ?\x00F4) (?\,Cu(B . ?\x0121) (?\,Cv(B . ?\x00F6) (?\,Cw(B . ?\x00F7) (?\,Cx(B . ?\x011D) (?\,Cy(B . ?\x00F9) (?\,Cz(B . ?\x00FA) (?\,C{(B . ?\x00FB) (?\,C|(B . ?\x00FC) (?\,C}(B . ?\x016D) (?\,C~(B . ?\x015D) (?\,C(B . ?\x02D9) ))
(ucs-8859-4-alist
'((?\,D (B . ?\x00A0) (?\,D!(B . ?\x0104) (?\,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) (?\,L#(B . ?\x0403) (?\,L$(B . ?\x0404) (?\,L%(B . ?\x0405) (?\,L&(B . ?\x0406) (?\,L'(B . ?\x0407) (?\,L((B . ?\x0408) (?\,L)(B . ?\x0409) (?\,L*(B . ?\x040A) (?\,L+(B . ?\x040B) (?\,L,(B . ?\x040C) (?\,L-(B . ?\x00AD) (?\,L.(B . ?\x040E) (?\,L/(B . ?\x040F) (?\,L0(B . ?\x0410) (?\,L1(B . ?\x0411) (?\,L2(B . ?\x0412) (?\,L3(B . ?\x0413) (?\,L4(B . ?\x0414) (?\,L5(B . ?\x0415) (?\,L6(B . ?\x0416) (?\,L7(B . ?\x0417) (?\,L8(B . ?\x0418) (?\,L9(B . ?\x0419) (?\,L:(B . ?\x041A) (?\,L (?\,L<(B . ?\x041C) (?\,L=(B . ?\x041D) (?\,L>(B . ?\x041E) (?\,L?(B . ?\x041F) (?\,L@(B . ?\x0420) (?\,LA(B . ?\x0421) (?\,LB(B . ?\x0422) (?\,LC(B . ?\x0423) (?\,LD(B . ?\x0424) (?\,LE(B . ?\x0425) (?\,LF(B . ?\x0426) (?\,LG(B . ?\x0427) (?\,LH(B . ?\x0428) (?\,LI(B . ?\x0429) (?\,LJ(B . ?\x042A) (?\,LK(B . ?\x042B) (?\,LL(B . ?\x042C) (?\,LM(B . ?\x042D) (?\,LN(B . ?\x042E) (?\,LO(B . ?\x042F) (?\,LP(B . ?\x0430) (?\,LQ(B . ?\x0431) (?\,LR(B . ?\x0432) (?\,LS(B . ?\x0433) (?\,LT(B . ?\x0434) (?\,LU(B . ?\x0435) (?\,LV(B . ?\x0436) (?\,LW(B . ?\x0437) (?\,LX(B . ?\x0438) (?\,LY(B . ?\x0439) (?\,LZ(B . ?\x043A) (?\,L[(B . ?\x043B) (?\,L\(B . ?\x043C) (?\,L](B . ?\x043D) (?\,L^(B . ?\x043E) (?\,L_(B . ?\x043F) (?\,L`(B . ?\x0440) (?\,La(B . ?\x0441) (?\,Lb(B . ?\x0442) (?\,Lc(B . ?\x0443) (?\,Ld(B . ?\x0444) (?\,Le(B . ?\x0445) (?\,Lf(B . ?\x0446) (?\,Lg(B . ?\x0447) (?\,Lh(B . ?\x0448) (?\,Li(B . ?\x0449) (?\,Lj(B . ?\x044A) (?\,Lk(B . ?\x044B) (?\,Ll(B . ?\x044C) (?\,Lm(B . ?\x044D) (?\,Ln(B . ?\x044E) (?\,Lo(B . ?\x044F) (?\,Lp(B . ?\x2116) (?\,Lq(B . ?\x0451) (?\,Lr(B . ?\x0452) (?\,Ls(B . ?\x0453) (?\,Lt(B . ?\x0454) (?\,Lu(B . ?\x0455) (?\,Lv(B . ?\x0456) (?\,Lw(B . ?\x0457) (?\,Lx(B . ?\x0458) (?\,Ly(B . ?\x0459) (?\,Lz(B . ?\x045A) (?\,L{(B . ?\x045B) (?\,L|(B . ?\x045C) (?\,L}(B . ?\x00A7) (?\,L~(B . ?\x045E) (?\,L(B . ?\x045F) ))
(ucs-8859-6-alist
'((?,G (B . ?\x00A0) (?,G$(B . ?\x00A4) (?,G,(B . ?\x060C) (?,G-(B . ?\x00AD) (?,G (?,G?(B . ?\x061F) (?,GA(B . ?\x0621) (?,GB(B . ?\x0622) (?,GC(B . ?\x0623) (?,GD(B . ?\x0624) (?,GE(B . ?\x0625) (?,GF(B . ?\x0626) (?,GG(B . ?\x0627) (?,GH(B . ?\x0628) (?,GI(B . ?\x0629) (?,GJ(B . ?\x062A) (?,GK(B . ?\x062B) (?,GL(B . ?\x062C) (?,GM(B . ?\x062D) (?,GN(B . ?\x062E) (?,GO(B . ?\x062F) (?,GP(B . ?\x0630) (?,GQ(B . ?\x0631) (?,GR(B . ?\x0632) (?,GS(B . ?\x0633) (?,GT(B . ?\x0634) (?,GU(B . ?\x0635) (?,GV(B . ?\x0636) (?,GW(B . ?\x0637) (?,GX(B . ?\x0638) (?,GY(B . ?\x0639) (?,GZ(B . ?\x063A) (?,G`(B . ?\x0640) (?,Ga(B . ?\x0641) (?,Gb(B . ?\x0642) (?,Gc(B . ?\x0643) (?,Gd(B . ?\x0644) (?,Ge(B . ?\x0645) (?,Gf(B . ?\x0646) (?,Gg(B . ?\x0647) (?,Gh(B . ?\x0648) (?,Gi(B . ?\x0649) (?,Gj(B . ?\x064A) (?,Gk(B . ?\x064B) (?,Gl(B . ?\x064C) (?,Gm(B . ?\x064D) (?,Gn(B . ?\x064E) (?,Go(B . ?\x064F) (?,Gp(B . ?\x0650) (?,Gq(B . ?\x0651) (?,Gr(B . ?\x0652) ))
(ucs-8859-7-alist
'((?\,F (B . ?\x00A0) (?\,F!(B . ?\x2018) (?\,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
(?\,Fs(B . ?\x03C3) ;; GREEK SMALL LETTER SIGMA
(?\,Ft(B . ?\x03C4) ;; GREEK SMALL LETTER TAU
(?\,Fu(B . ?\x03C5) ;; GREEK SMALL LETTER UPSILON
(?\,Fv(B . ?\x03C6) ;; GREEK SMALL LETTER PHI
(?\,Fw(B . ?\x03C7) ;; GREEK SMALL LETTER CHI
(?\,Fx(B . ?\x03C8) ;; GREEK SMALL LETTER PSI
(?\,Fy(B . ?\x03C9) ;; GREEK SMALL LETTER OMEGA
(?\,Fz(B . ?\x03CA) ;; GREEK SMALL LETTER IOTA WITH DIALYTIKA
(?\,F{(B . ?\x03CB) ;; GREEK SMALL LETTER UPSILON WITH DIALYTIKA
(?\,F|(B . ?\x03CC) ;; GREEK SMALL LETTER OMICRON WITH TONOS
(?\,F}(B . ?\x03CD) ;; GREEK SMALL LETTER UPSILON WITH TONOS
(?\,F~(B . ?\x03CE) ;; GREEK SMALL LETTER OMEGA WITH TONOS
))
(ucs-8859-8-alist
'((?\,H (B . ?\x00A0) ;; NO-BREAK SPACE
(?\,H"(B . ?\x00A2) (?\,H#(B . ?\x00A3) (?\,H$(B . ?\x00A4) (?\,H%(B . ?\x00A5) (?\,H&(B . ?\x00A6) (?\,H'(B . ?\x00A7) (?\,H((B . ?\x00A8) (?\,H)(B . ?\x00A9) (?\,H*(B . ?\x00D7) (?\,H+(B . ?\x00AB) (?\,H,(B . ?\x00AC) (?\,H-(B . ?\x00AD) (?\,H.(B . ?\x00AE) (?\,H/(B . ?\x00AF) (?\,H0(B . ?\x00B0) (?\,H1(B . ?\x00B1) (?\,H2(B . ?\x00B2) (?\,H3(B . ?\x00B3) (?\,H4(B . ?\x00B4) (?\,H5(B . ?\x00B5) (?\,H6(B . ?\x00B6) (?\,H7(B . ?\x00B7) (?\,H8(B . ?\x00B8) (?\,H9(B . ?\x00B9) (?\,H:(B . ?\x00F7) (?\,H (?\,H<(B . ?\x00BC) (?\,H=(B . ?\x00BD) (?\,H>(B . ?\x00BE) (?\,H[(B . ?\x202D) (?\,H\(B . ?\x202E) (?\,H](B . ?\x202C) (?\,H_(B . ?\x2017) (?\,H`(B . ?\x05D0) (?\,Ha(B . ?\x05D1) (?\,Hb(B . ?\x05D2) (?\,Hc(B . ?\x05D3) (?\,Hd(B . ?\x05D4) (?\,He(B . ?\x05D5) (?\,Hf(B . ?\x05D6) (?\,Hg(B . ?\x05D7) (?\,Hh(B . ?\x05D8) (?\,Hi(B . ?\x05D9) (?\,Hj(B . ?\x05DA) (?\,Hk(B . ?\x05DB) (?\,Hl(B . ?\x05DC) (?\,Hm(B . ?\x05DD) (?\,Hn(B . ?\x05DE) (?\,Ho(B . ?\x05DF) (?\,Hp(B . ?\x05E0) (?\,Hq(B . ?\x05E1) (?\,Hr(B . ?\x05E2) (?\,Hs(B . ?\x05E3) (?\,Ht(B . ?\x05E4) (?\,Hu(B . ?\x05E5) (?\,Hv(B . ?\x05E6) (?\,Hw(B . ?\x05E7) (?\,Hx(B . ?\x05E8) (?\,Hy(B . ?\x05E9) (?\,Hz(B . ?\x05EA) (?\,H{(B . ?\x202A) (?\,H|(B . ?\x202B) (?\,H}(B . ?\x200E) (?\,H~(B . ?\x200F) ))
(ucs-8859-9-alist
'((?\,M (B . ?\x00A0) (?\,M!(B . ?\x00A1) (?\,M"(B . ?\x00A2) ;; CENT SIGN
(?\,M#(B . ?\x00A3) ;; POUND SIGN
(?\,M$(B . ?\x00A4) ;; CURRENCY SIGN
(?\,M%(B . ?\x00A5) ;; YEN SIGN
(?\,M&(B . ?\x00A6) ;; BROKEN BAR
(?\,M'(B . ?\x00A7) ;; SECTION SIGN
(?\,M((B . ?\x00A8) ;; DIAERESIS
(?\,M)(B . ?\x00A9) ;; COPYRIGHT SIGN
(?\,M*(B . ?\x00AA) ;; FEMININE ORDINAL INDICATOR
(?\,M+(B . ?\x00AB) ;; LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
(?\,M,(B . ?\x00AC) ;; NOT SIGN
(?\,M-(B . ?\x00AD) ;; SOFT HYPHEN
(?\,M.(B . ?\x00AE) ;; REGISTERED SIGN
(?\,M/(B . ?\x00AF) ;; MACRON
(?\,M0(B . ?\x00B0) ;; DEGREE SIGN
(?\,M1(B . ?\x00B1) ;; PLUS-MINUS SIGN
(?\,M2(B . ?\x00B2) ;; SUPERSCRIPT TWO
(?\,M3(B . ?\x00B3) ;; SUPERSCRIPT THREE
(?\,M4(B . ?\x00B4) ;; ACUTE ACCENT
(?\,M5(B . ?\x00B5) ;; MICRO SIGN
(?\,M6(B . ?\x00B6) ;; PILCROW SIGN
(?\,M7(B . ?\x00B7) ;; MIDDLE DOT
(?\,M8(B . ?\x00B8) ;; CEDILLA
(?\,M9(B . ?\x00B9) ;; SUPERSCRIPT ONE
(?\,M:(B . ?\x00BA) ;; MASCULINE ORDINAL INDICATOR
(?\,M;(B . ?\x00BB) ;; RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
(?\,M<(B . ?\x00BC) ;; VULGAR FRACTION ONE QUARTER
(?\,M=(B . ?\x00BD) ;; VULGAR FRACTION ONE HALF
(?\,M>(B . ?\x00BE) ;; VULGAR FRACTION THREE QUARTERS
(?\,M?(B . ?\x00BF) ;; INVERTED QUESTION MARK
(?\,M@(B . ?\x00C0) ;; LATIN CAPITAL LETTER A WITH GRAVE
(?\,MA(B . ?\x00C1) ;; LATIN CAPITAL LETTER A WITH ACUTE
(?\,MB(B . ?\x00C2) ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX
(?\,MC(B . ?\x00C3) ;; LATIN CAPITAL LETTER A WITH TILDE
(?\,MD(B . ?\x00C4) ;; LATIN CAPITAL LETTER A WITH DIAERESIS
(?\,ME(B . ?\x00C5) ;; LATIN CAPITAL LETTER A WITH RING ABOVE
(?\,MF(B . ?\x00C6) ;; LATIN CAPITAL LETTER AE
(?\,MG(B . ?\x00C7) ;; LATIN CAPITAL LETTER C WITH CEDILLA
(?\,MH(B . ?\x00C8) ;; LATIN CAPITAL LETTER E WITH GRAVE
(?\,MI(B . ?\x00C9) ;; LATIN CAPITAL LETTER E WITH ACUTE
(?\,MJ(B . ?\x00CA) ;; LATIN CAPITAL LETTER E WITH CIRCUMFLEX
(?\,MK(B . ?\x00CB) ;; LATIN CAPITAL LETTER E WITH DIAERESIS
(?\,ML(B . ?\x00CC) ;; LATIN CAPITAL LETTER I WITH GRAVE
(?\,MM(B . ?\x00CD) ;; LATIN CAPITAL LETTER I WITH ACUTE
(?\,MN(B . ?\x00CE) ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX
(?\,MO(B . ?\x00CF) ;; LATIN CAPITAL LETTER I WITH DIAERESIS
(?\,MP(B . ?\x011E) ;; LATIN CAPITAL LETTER G WITH BREVE
(?\,MQ(B . ?\x00D1) ;; LATIN CAPITAL LETTER N WITH TILDE
(?\,MR(B . ?\x00D2) ;; LATIN CAPITAL LETTER O WITH GRAVE
(?\,MS(B . ?\x00D3) ;; LATIN CAPITAL LETTER O WITH ACUTE
(?\,MT(B . ?\x00D4) ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX
(?\,MU(B . ?\x00D5) ;; LATIN CAPITAL LETTER O WITH TILDE
(?\,MV(B . ?\x00D6) ;; LATIN CAPITAL LETTER O WITH DIAERESIS
(?\,MW(B . ?\x00D7) ;; MULTIPLICATION SIGN
(?\,MX(B . ?\x00D8) ;; LATIN CAPITAL LETTER O WITH STROKE
(?\,MY(B . ?\x00D9) ;; LATIN CAPITAL LETTER U WITH GRAVE
(?\,MZ(B . ?\x00DA) ;; LATIN CAPITAL LETTER U WITH ACUTE
(?\,M[(B . ?\x00DB) ;; LATIN CAPITAL LETTER U WITH CIRCUMFLEX
(?\,M\(B . ?\x00DC) ;; LATIN CAPITAL LETTER U WITH DIAERESIS
(?\,M](B . ?\x0130) ;; LATIN CAPITAL LETTER I WITH DOT ABOVE
(?\,M^(B . ?\x015E) ;; LATIN CAPITAL LETTER S WITH CEDILLA
(?\,M_(B . ?\x00DF) ;; LATIN SMALL LETTER SHARP S
(?\,M`(B . ?\x00E0) ;; LATIN SMALL LETTER A WITH GRAVE
(?\,Ma(B . ?\x00E1) ;; LATIN SMALL LETTER A WITH ACUTE
(?\,Mb(B . ?\x00E2) ;; LATIN SMALL LETTER A WITH CIRCUMFLEX
(?\,Mc(B . ?\x00E3) ;; LATIN SMALL LETTER A WITH TILDE
(?\,Md(B . ?\x00E4) ;; LATIN SMALL LETTER A WITH DIAERESIS
(?\,Me(B . ?\x00E5) ;; LATIN SMALL LETTER A WITH RING ABOVE
(?\,Mf(B . ?\x00E6) ;; LATIN SMALL LETTER AE
(?\,Mg(B . ?\x00E7) ;; LATIN SMALL LETTER C WITH CEDILLA
(?\,Mh(B . ?\x00E8) ;; LATIN SMALL LETTER E WITH GRAVE
(?\,Mi(B . ?\x00E9) ;; LATIN SMALL LETTER E WITH ACUTE
(?\,Mj(B . ?\x00EA) ;; LATIN SMALL LETTER E WITH CIRCUMFLEX
(?\,Mk(B . ?\x00EB) ;; LATIN SMALL LETTER E WITH DIAERESIS
(?\,Ml(B . ?\x00EC) ;; LATIN SMALL LETTER I WITH GRAVE
(?\,Mm(B . ?\x00ED) ;; LATIN SMALL LETTER I WITH ACUTE
(?\,Mn(B . ?\x00EE) ;; LATIN SMALL LETTER I WITH CIRCUMFLEX
(?\,Mo(B . ?\x00EF) ;; LATIN SMALL LETTER I WITH DIAERESIS
(?\,Mp(B . ?\x011F) ;; LATIN SMALL LETTER G WITH BREVE
(?\,Mq(B . ?\x00F1) ;; LATIN SMALL LETTER N WITH TILDE
(?\,Mr(B . ?\x00F2) ;; LATIN SMALL LETTER O WITH GRAVE
(?\,Ms(B . ?\x00F3) ;; LATIN SMALL LETTER O WITH ACUTE
(?\,Mt(B . ?\x00F4) ;; LATIN SMALL LETTER O WITH CIRCUMFLEX
(?\,Mu(B . ?\x00F5) ;; LATIN SMALL LETTER O WITH TILDE
(?\,Mv(B . ?\x00F6) ;; LATIN SMALL LETTER O WITH DIAERESIS
(?\,Mw(B . ?\x00F7) ;; DIVISION SIGN
(?\,Mx(B . ?\x00F8) ;; LATIN SMALL LETTER O WITH STROKE
(?\,My(B . ?\x00F9) ;; LATIN SMALL LETTER U WITH GRAVE
(?\,Mz(B . ?\x00FA) ;; LATIN SMALL LETTER U WITH ACUTE
(?\,M{(B . ?\x00FB) ;; LATIN SMALL LETTER U WITH CIRCUMFLEX
(?\,M|(B . ?\x00FC) ;; LATIN SMALL LETTER U WITH DIAERESIS
(?\,M}(B . ?\x0131) ;; LATIN SMALL LETTER DOTLESS I
(?\,M~(B . ?\x015F) ;; LATIN SMALL LETTER S WITH CEDILLA
(?\,M(B . ?\x00FF) ;; LATIN SMALL LETTER Y WITH DIAERESIS
))
(ucs-8859-14-alist
'((?\,_ (B . ?\x00A0) ;; NO-BREAK SPACE
(?\,_!(B . ?\x1E02) ;; LATIN CAPITAL LETTER B WITH DOT ABOVE
(?\,_"(B . ?\x1E03) (?\,_#(B . ?\x00A3) (?\,_$(B . ?\x010A) (?\,_%(B . ?\x010B) (?\,_&(B . ?\x1E0A) (?\,_'(B . ?\x00A7) (?\,_((B . ?\x1E80) (?\,_)(B . ?\x00A9) (?\,_*(B . ?\x1E82) (?\,_+(B . ?\x1E0B) (?\,_,(B . ?\x1EF2) (?\,_-(B . ?\x00AD) (?\,_.(B . ?\x00AE) (?\,_/(B . ?\x0178) (?\,_0(B . ?\x1E1E) (?\,_1(B . ?\x1E1F) (?\,_2(B . ?\x0120) (?\,_3(B . ?\x0121) (?\,_4(B . ?\x1E40) (?\,_5(B . ?\x1E41) (?\,_6(B . ?\x00B6) (?\,_7(B . ?\x1E56) (?\,_8(B . ?\x1E81) (?\,_9(B . ?\x1E57) (?\,_:(B . ?\x1E83) (?\,_ (?\,_<(B . ?\x1EF3) (?\,_=(B . ?\x1E84) (?\,_>(B . ?\x1E85) (?\,_?(B . ?\x1E61) (?\,_@(B . ?\x00C0) (?\,_A(B . ?\x00C1) (?\,_B(B . ?\x00C2) (?\,_C(B . ?\x00C3) (?\,_D(B . ?\x00C4) (?\,_E(B . ?\x00C5) (?\,_F(B . ?\x00C6) (?\,_G(B . ?\x00C7) (?\,_H(B . ?\x00C8) (?\,_I(B . ?\x00C9) (?\,_J(B . ?\x00CA) (?\,_K(B . ?\x00CB) (?\,_L(B . ?\x00CC) (?\,_M(B . ?\x00CD) (?\,_N(B . ?\x00CE) (?\,_O(B . ?\x00CF) (?\,_P(B . ?\x0174) (?\,_Q(B . ?\x00D1) (?\,_R(B . ?\x00D2) (?\,_S(B . ?\x00D3) (?\,_T(B . ?\x00D4) (?\,_U(B . ?\x00D5) (?\,_V(B . ?\x00D6) (?\,_W(B . ?\x1E6A) (?\,_X(B . ?\x00D8) (?\,_Y(B . ?\x00D9) (?\,_Z(B . ?\x00DA) (?\,_[(B . ?\x00DB) (?\,_\(B . ?\x00DC) (?\,_](B . ?\x00DD) (?\,_^(B . ?\x0176) (?\,__(B . ?\x00DF) (?\,_`(B . ?\x00E0) (?\,_a(B . ?\x00E1) (?\,_b(B . ?\x00E2) (?\,_c(B . ?\x00E3) (?\,_d(B . ?\x00E4) (?\,_e(B . ?\x00E5) (?\,_f(B . ?\x00E6) (?\,_g(B . ?\x00E7) (?\,_h(B . ?\x00E8) (?\,_i(B . ?\x00E9) (?\,_j(B . ?\x00EA) (?\,_k(B . ?\x00EB) (?\,_l(B . ?\x00EC) (?\,_m(B . ?\x00ED) (?\,_n(B . ?\x00EE) (?\,_o(B . ?\x00EF) (?\,_p(B . ?\x0175) (?\,_q(B . ?\x00F1) (?\,_r(B . ?\x00F2) (?\,_s(B . ?\x00F3) (?\,_t(B . ?\x00F4) (?\,_u(B . ?\x00F5) (?\,_v(B . ?\x00F6) (?\,_w(B . ?\x1E6B) (?\,_x(B . ?\x00F8) (?\,_y(B . ?\x00F9) (?\,_z(B . ?\x00FA) (?\,_{(B . ?\x00FB) (?\,_|(B . ?\x00FC) (?\,_}(B . ?\x00FD) (?\,_~(B . ?\x0177) (?\,_(B . ?\x00FF) ))
(ucs-8859-15-alist
'((?\,b (B . ?\x00A0) (?\,b!(B . ?\x00A1) (?\,b"(B . ?\x00A2) ;; CENT SIGN
(?\,b#(B . ?\x00A3) ;; POUND SIGN
(?\,b$(B . ?\x20AC) ;; EURO SIGN
(?\,b%(B . ?\x00A5) ;; YEN SIGN
(?\,b&(B . ?\x0160) ;; LATIN CAPITAL LETTER S WITH CARON
(?\,b'(B . ?\x00A7) ;; SECTION SIGN
(?\,b((B . ?\x0161) ;; LATIN SMALL LETTER S WITH CARON
(?\,b)(B . ?\x00A9) ;; COPYRIGHT SIGN
(?\,b*(B . ?\x00AA) ;; FEMININE ORDINAL INDICATOR
(?\,b+(B . ?\x00AB) ;; LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
(?\,b,(B . ?\x00AC) ;; NOT SIGN
(?\,b-(B . ?\x00AD) ;; SOFT HYPHEN
(?\,b.(B . ?\x00AE) ;; REGISTERED SIGN
(?\,b/(B . ?\x00AF) ;; MACRON
(?\,b0(B . ?\x00B0) ;; DEGREE SIGN
(?\,b1(B . ?\x00B1) ;; PLUS-MINUS SIGN
(?\,b2(B . ?\x00B2) ;; SUPERSCRIPT TWO
(?\,b3(B . ?\x00B3) ;; SUPERSCRIPT THREE
(?\,b4(B . ?\x017D) ;; LATIN CAPITAL LETTER Z WITH CARON
(?\,b5(B . ?\x00B5) ;; MICRO SIGN
(?\,b6(B . ?\x00B6) ;; PILCROW SIGN
(?\,b7(B . ?\x00B7) ;; MIDDLE DOT
(?\,b8(B . ?\x017E) ;; LATIN SMALL LETTER Z WITH CARON
(?\,b9(B . ?\x00B9) ;; SUPERSCRIPT ONE
(?\,b:(B . ?\x00BA) ;; MASCULINE ORDINAL INDICATOR
(?\,b;(B . ?\x00BB) ;; RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
(?\,b<(B . ?\x0152) ;; LATIN CAPITAL LIGATURE OE
(?\,b=(B . ?\x0153) ;; LATIN SMALL LIGATURE OE
(?\,b>(B . ?\x0178) ;; LATIN CAPITAL LETTER Y WITH DIAERESIS
(?\,b?(B . ?\x00BF) ;; INVERTED QUESTION MARK
(?\,b@(B . ?\x00C0) ;; LATIN CAPITAL LETTER A WITH GRAVE
(?\,bA(B . ?\x00C1) ;; LATIN CAPITAL LETTER A WITH ACUTE
(?\,bB(B . ?\x00C2) ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX
(?\,bC(B . ?\x00C3) ;; LATIN CAPITAL LETTER A WITH TILDE
(?\,bD(B . ?\x00C4) ;; LATIN CAPITAL LETTER A WITH DIAERESIS
(?\,bE(B . ?\x00C5) ;; LATIN CAPITAL LETTER A WITH RING ABOVE
(?\,bF(B . ?\x00C6) ;; LATIN CAPITAL LETTER AE
(?\,bG(B . ?\x00C7) ;; LATIN CAPITAL LETTER C WITH CEDILLA
(?\,bH(B . ?\x00C8) ;; LATIN CAPITAL LETTER E WITH GRAVE
(?\,bI(B . ?\x00C9) ;; LATIN CAPITAL LETTER E WITH ACUTE
(?\,bJ(B . ?\x00CA) ;; LATIN CAPITAL LETTER E WITH CIRCUMFLEX
(?\,bK(B . ?\x00CB) ;; LATIN CAPITAL LETTER E WITH DIAERESIS
(?\,bL(B . ?\x00CC) ;; LATIN CAPITAL LETTER I WITH GRAVE
(?\,bM(B . ?\x00CD) ;; LATIN CAPITAL LETTER I WITH ACUTE
(?\,bN(B . ?\x00CE) ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX
(?\,bO(B . ?\x00CF) ;; LATIN CAPITAL LETTER I WITH DIAERESIS
(?\,bP(B . ?\x00D0) ;; LATIN CAPITAL LETTER ETH
(?\,bQ(B . ?\x00D1) ;; LATIN CAPITAL LETTER N WITH TILDE
(?\,bR(B . ?\x00D2) ;; LATIN CAPITAL LETTER O WITH GRAVE
(?\,bS(B . ?\x00D3) ;; LATIN CAPITAL LETTER O WITH ACUTE
(?\,bT(B . ?\x00D4) ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX
(?\,bU(B . ?\x00D5) ;; LATIN CAPITAL LETTER O WITH TILDE
(?\,bV(B . ?\x00D6) ;; LATIN CAPITAL LETTER O WITH DIAERESIS
(?\,bW(B . ?\x00D7) ;; MULTIPLICATION SIGN
(?\,bX(B . ?\x00D8) ;; LATIN CAPITAL LETTER O WITH STROKE
(?\,bY(B . ?\x00D9) ;; LATIN CAPITAL LETTER U WITH GRAVE
(?\,bZ(B . ?\x00DA) ;; LATIN CAPITAL LETTER U WITH ACUTE
(?\,b[(B . ?\x00DB) ;; LATIN CAPITAL LETTER U WITH CIRCUMFLEX
(?\,b\(B . ?\x00DC) ;; LATIN CAPITAL LETTER U WITH DIAERESIS
(?\,b](B . ?\x00DD) ;; LATIN CAPITAL LETTER Y WITH ACUTE
(?\,b^(B . ?\x00DE) ;; LATIN CAPITAL LETTER THORN
(?\,b_(B . ?\x00DF) ;; LATIN SMALL LETTER SHARP S
(?\,b`(B . ?\x00E0) ;; LATIN SMALL LETTER A WITH GRAVE
(?\,ba(B . ?\x00E1) ;; LATIN SMALL LETTER A WITH ACUTE
(?\,bb(B . ?\x00E2) ;; LATIN SMALL LETTER A WITH CIRCUMFLEX
(?\,bc(B . ?\x00E3) ;; LATIN SMALL LETTER A WITH TILDE
(?\,bd(B . ?\x00E4) ;; LATIN SMALL LETTER A WITH DIAERESIS
(?\,be(B . ?\x00E5) ;; LATIN SMALL LETTER A WITH RING ABOVE
(?\,bf(B . ?\x00E6) ;; LATIN SMALL LETTER AE
(?\,bg(B . ?\x00E7) ;; LATIN SMALL LETTER C WITH CEDILLA
(?\,bh(B . ?\x00E8) ;; LATIN SMALL LETTER E WITH GRAVE
(?\,bi(B . ?\x00E9) ;; LATIN SMALL LETTER E WITH ACUTE
(?\,bj(B . ?\x00EA) ;; LATIN SMALL LETTER E WITH CIRCUMFLEX
(?\,bk(B . ?\x00EB) ;; LATIN SMALL LETTER E WITH DIAERESIS
(?\,bl(B . ?\x00EC) ;; LATIN SMALL LETTER I WITH GRAVE
(?\,bm(B . ?\x00ED) ;; LATIN SMALL LETTER I WITH ACUTE
(?\,bn(B . ?\x00EE) ;; LATIN SMALL LETTER I WITH CIRCUMFLEX
(?\,bo(B . ?\x00EF) ;; LATIN SMALL LETTER I WITH DIAERESIS
(?\,bp(B . ?\x00F0) ;; LATIN SMALL LETTER ETH
(?\,bq(B . ?\x00F1) ;; LATIN SMALL LETTER N WITH TILDE
(?\,br(B . ?\x00F2) ;; LATIN SMALL LETTER O WITH GRAVE
(?\,bs(B . ?\x00F3) ;; LATIN SMALL LETTER O WITH ACUTE
(?\,bt(B . ?\x00F4) ;; LATIN SMALL LETTER O WITH CIRCUMFLEX
(?\,bu(B . ?\x00F5) ;; LATIN SMALL LETTER O WITH TILDE
(?\,bv(B . ?\x00F6) ;; LATIN SMALL LETTER O WITH DIAERESIS
(?\,bw(B . ?\x00F7) ;; DIVISION SIGN
(?\,bx(B . ?\x00F8) ;; LATIN SMALL LETTER O WITH STROKE
(?\,by(B . ?\x00F9) ;; LATIN SMALL LETTER U WITH GRAVE
(?\,bz(B . ?\x00FA) ;; LATIN SMALL LETTER U WITH ACUTE
(?\,b{(B . ?\x00FB) ;; LATIN SMALL LETTER U WITH CIRCUMFLEX
(?\,b|(B . ?\x00FC) ;; LATIN SMALL LETTER U WITH DIAERESIS
(?\,b}(B . ?\x00FD) ;; LATIN SMALL LETTER Y WITH ACUTE
(?\,b~(B . ?\x00FE) ;; LATIN SMALL LETTER THORN
(?\,b(B . ?\x00FF) ;; LATIN SMALL LETTER Y WITH DIAERESIS
))
(ucs-8859-1-alist
(let ((i 160)
l)
(while (< i 256)
(push (cons (make-char 'latin-iso8859-1 (- i 128)) i)
l)
(setq i (1+ i)))
(nreverse l))))
;; Note: Here, using decode-char is safe because
;; utf-fragment-on-decoding is by default nil, thus the translation
;; table `utf-translation-table-for-decode' does nothing.
;; Convert the lists to the basic char tables.
(dolist (n (list 15 14 9 8 7 6 5 4 3 2 1))
(let ((alist (symbol-value (intern (format "ucs-8859-%d-alist" n)))))
(dolist (pair alist)
(let ((mule (car pair))
(uc (cdr pair))
(mu (decode-char 'ucs (cdr pair))))
(aset ucs-mule-8859-to-ucs-table mule uc)
;; (aset ucs-ucs-to-mule-8859-table uc mule)
;; (aset ucs-mule-unicode-to-mule-8859 mu mule)
(aset ucs-mule-8859-to-mule-unicode mule mu)
(aset ucs-mule-to-mule-unicode mule mu)))))
;; Derive tables that can be used as per-coding-system
;; `translation-table-for-encode's.
;; N.B., there's no 8859-6 coding system.
(dolist (n (list 15 14 9 8 7 5 4 3 2 1))
(let* ((alist (symbol-value (intern (format "ucs-8859-%d-alist" n))))
(encode-translator (set (intern (format "ucs-8859-%d-encode-table"
n))
(make-translation-table)))
(coding-system
(coding-system-base (intern (format "iso-8859-%d" n))))
(dependency (coding-system-get coding-system 'dependency))
elt)
;; Start with the mule-unicode component (except for latin-iso8859-1).
(if (/= n 1)
(dolist (pair alist)
(let ((mule (car pair))
(mu (decode-char 'ucs (cdr pair))))
(aset encode-translator mu mule))))
;; Find characters from other 8859 sets which map to the same
;; unicode as some character in this set.
(map-char-table (lambda (k v)
(if (and (setq elt (rassq v alist))
(not (assq k alist)))
(aset encode-translator k (car elt))))
ucs-mule-8859-to-ucs-table)
(optimize-char-table encode-translator)
(or (memq 'unify-8859-on-encoding-mode dependency)
(setq dependency (cons 'unify-8859-on-encoding-mode dependency)))
(or (memq 'unify-8859-on-decoding-mode dependency)
(setq dependency (cons 'unify-8859-on-decoding-mode dependency)))
(coding-system-put coding-system 'dependency dependency))))
(defun ucs-unify-8859 (for-encode for-decode)
"Set up translation-tables for unifying characters from ISO 8859.
On decoding, non-ASCII characters are mapped into the `iso-latin-1'
and `mule-unicode-0100-24ff' charsets. On encoding, these are mapped
back appropriate for the coding system.
With prefix arg, do unification on encoding only, i.e. don't unify
everything on input operations."
(when for-decode
;; Unify 8859 on decoding. (Non-CCL coding systems only.)
(if utf-fragment-on-decoding
(progn (map-char-table
(lambda (k v)
(if v (aset ucs-mule-8859-to-mule-unicode v nil)))
utf-fragmentation-table)
(optimize-char-table ucs-mule-8859-to-mule-unicode))
;; Reset in case it was changed.
(map-char-table
(lambda (k v)
(if v (aset ucs-mule-8859-to-mule-unicode v k)))
utf-fragmentation-table))
;; For non-CCL coding systems (e.g. iso-latin-2).
(set-char-table-parent standard-translation-table-for-decode
ucs-mule-8859-to-mule-unicode)
;; For CCL coding systems other than mule-utf-*
(define-translation-table 'ucs-translation-table-for-decode
ucs-mule-8859-to-mule-unicode)
;; Translate Quail input globally.
(setq-default translation-table-for-input ucs-mule-to-mule-unicode)
;; In case this is set up, but we should use the global
;; translation-table.
(remove-hook 'minibuffer-setup-hook 'ucs-minibuffer-setup))
(when for-encode
;; Make mule-utf-* encode all characters in ucs-mule-to-mule-unicode.
(let ((coding-list '(mule-utf-8 mule-utf-16be mule-utf-16le
mule-utf-16be-with-signature
mule-utf-16le-with-signature)))
(define-translation-table 'utf-translation-table-for-encode
ucs-mule-to-mule-unicode)
(dolist (coding coding-list)
(set-char-table-parent (coding-system-get coding 'safe-chars)
ucs-mule-to-mule-unicode)))
;; Adjust the 8859 coding systems to fragment the unified characters
;; on encoding.
(dolist (n '(1 2 3 4 5 7 8 9 14 15))
(let* ((coding-system
(coding-system-base (intern (format "iso-8859-%d" n))))
(table (symbol-value
(intern (format "ucs-8859-%d-encode-table" n))))
(safe (coding-system-get coding-system 'safe-chars)))
;; Actually, the coding system's safe-chars are not normally
;; used after they've been registered, but we might as well
;; record them. Setting the parent here is a convenience.
(set-char-table-parent safe table)
(coding-system-put coding-system 'translation-table-for-encode table)))
(add-hook 'minibuffer-setup-hook 'ucs-minibuffer-setup)))
(defun ucs-fragment-8859 (for-encode for-decode)
"Undo the unification done by `ucs-unify-8859'.
With prefix arg, undo unification on encoding only, i.e. don't undo
unification on input operations."
(when for-decode
;; Don't Unify 8859 on decoding.
;; For non-CCL coding systems (e.g. iso-latin-2).
(set-char-table-parent standard-translation-table-for-decode nil)
;; For CCL coding systems other than mule-utf-* (e.g. cyrillic-koi8).
(define-translation-table 'ucs-translation-table-for-decode)
(setq-default translation-table-for-input nil))
(when for-encode
;; Disable mule-utf-* encoding for all characters in
;; ucs-mule-to-mule-unicode except what was originally supported
;; and what is translated by utf-translation-table-for-decode when
;; `utf-fragment-on-decoding' is non-nil.
(let ((coding-list '(mule-utf-8 mule-utf-16be mule-utf-16le
mule-utf-16be-with-signature
mule-utf-16le-with-signature))
(safe (coding-system-get 'mule-utf-8 'safe-chars)))
(dolist (coding coding-list)
(set-char-table-parent (coding-system-get coding 'safe-chars) nil))
(if (not utf-fragment-on-decoding)
(define-translation-table 'utf-translation-table-for-encode)
(define-translation-table 'utf-translation-table-for-encode
utf-defragmentation-table)))
;; For each charset, remove the parent of `safe-chars' property of
;; the corresponding coding system.
(dolist (n '(1 2 3 4 5 7 8 9 14 15))
(let* ((coding-system
(coding-system-base (intern (format "iso-8859-%d" n))))
(safe (coding-system-get coding-system 'safe-chars)))
(if (char-table-parent safe)
(set-char-table-parent safe nil))
(coding-system-put coding-system 'translation-table-for-encode nil)))
(remove-hook 'minibuffer-setup-hook 'ucs-minibuffer-setup)))
(defun ucs-insert (arg)
"Insert the Emacs character representation of the given Unicode.
Interactively, prompts for a hex string giving the code."
(interactive "sUnicode (hex): ")
(or (integerp arg)
(setq arg (string-to-number arg 16)))
(let ((c (decode-char 'ucs arg)))
(if c
(insert c)
(if (or (< arg 0) (> arg #x10FFFF))
(error "Not a Unicode character code: 0x%X" arg)
(error "Character U+%04X is not yet supported" arg)))))
;;; Dealing with non-8859 character sets.
;; We only set up translation on encoding to utf-8. Also translation
;; tables ucs-CS-encode-table are constructed for some coding systems
;; CS which could be used as `translation-table-for-encode', currently
;; for indian-is13194, lao, thai, tibetan-iso-8bit and
;; vietnamese-viscii.
;; The alists here cover both coding systems (external charsets), like
;; VISCII, and individual Emacs charsets, like `ipa'.
(let ((vietnamese-viscii
'((?,1!(B . ?$,1o/(B)
(?,1"(B . ?$,1o1(B)
(?,1#(B . ?$,1o7(B)
(?,1$(B . ?$,1o%(B)
(?,1%(B . ?$,1o'(B)
(?,1&(B . ?$,1o)(B)
(?,1'(B . ?$,1o-(B)
(?,1((B . ?$,1o=(B)
(?,1)(B . ?$,1o9(B)
(?,1*(B . ?$,1o?(B)
(?,1+(B . ?$,1oA(B)
(?,1,(B . ?$,1oC(B)
(?,1-(B . ?$,1oE(B)
(?,1.(B . ?$,1oG(B)
(?,1/(B . ?$,1oQ(B)
(?,10(B . ?$,1oS(B)
(?,11(B . ?$,1oU(B)
(?,12(B . ?$,1oW(B)
(?,15(B . ?$,1oY(B)
(?,16(B . ?$,1o](B)
(?,17(B . ?$,1o_(B)
(?,18(B . ?$,1oK(B)
(?,1=(B . ?$,1!a(B)
(?,1>(B . ?$,1o[(B)
(?,1F(B . ?$,1o3(B)
(?,1G(B . ?$,1o5(B)
(?,1O(B . ?$,1os(B)
(?,1Q(B . ?$,1oi(B)
(?,1U(B . ?$,1o!(B)
(?,1V(B . ?$,1ow(B)
(?,1W(B . ?$,1ok(B)
(?,1X(B . ?$,1om(B)
(?,1[(B . ?$,1oy(B)
(?,1\(B . ?$,1ou(B)
(?,1^(B . ?$,1oa(B)
(?,1_(B . ?$,1!p(B)
(?,1`(B . ?,A`(B)
(?,1a(B . ?,Aa(B)
(?,1b(B . ?,Ab(B)
(?,1c(B . ?,Ac(B)
(?,1d(B . ?$,1o#(B)
(?,1e(B . ?$,1 #(B)
(?,1f(B . ?$,1oo(B)
(?,1g(B . ?$,1o+(B)
(?,1h(B . ?,Ah(B)
(?,1i(B . ?,Ai(B)
(?,1j(B . ?,Aj(B)
(?,1k(B . ?$,1o (?,1l(B . ?,Al(B)
(?,1m(B . ?,Am(B)
(?,1n(B . ?$,1 I(B)
(?,1o(B . ?$,1oI(B)
(?,1p(B . ?$,1 1(B)
(?,1q(B . ?$,1oq(B)
(?,1r(B . ?,Ar(B)
(?,1s(B . ?,As(B)
(?,1t(B . ?,At(B)
(?,1u(B . ?,Au(B)
(?,1v(B . ?$,1oO(B)
(?,1w(B . ?$,1oM(B)
(?,1x(B . ?$,1oe(B)
(?,1y(B . ?,Ay(B)
(?,1z(B . ?,Az(B)
(?,1{(B . ?$,1!)(B)
(?,1|(B . ?$,1og(B)
(?,1}(B . ?,A}(B)
(?,1~(B . ?$,1oc(B)
(?,2!(B . ?$,1o.(B)
(?,2"(B . ?$,1o0(B)
(?,2#(B . ?$,1o6(B)
(?,2$(B . ?$,1o$(B)
(?,2%(B . ?$,1o&(B)
(?,2&(B . ?$,1o((B)
(?,2'(B . ?$,1o,(B)
(?,2((B . ?$,1o<(B)
(?,2)(B . ?$,1o8(B)
(?,2*(B . ?$,1o>(B)
(?,2+(B . ?$,1o@(B)
(?,2,(B . ?$,1oB(B)
(?,2-(B . ?$,1oD(B)
(?,2.(B . ?$,1oF(B)
(?,2/(B . ?$,1oP(B)
(?,20(B . ?$,1oR(B)
(?,21(B . ?$,1oT(B)
(?,22(B . ?$,1oV(B)
(?,25(B . ?$,1oX(B)
(?,26(B . ?$,1o\(B)
(?,27(B . ?$,1o^(B)
(?,28(B . ?$,1oJ(B)
(?,2=(B . ?$,1!`(B)
(?,2>(B . ?$,1oZ(B)
(?,2F(B . ?$,1o2(B)
(?,2G(B . ?$,1o4(B)
(?,2O(B . ?$,1or(B)
(?,2Q(B . ?$,1oh(B)
(?,2U(B . ?$,1o (B)
(?,2V(B . ?$,1ov(B)
(?,2W(B . ?$,1oj(B)
(?,2X(B . ?$,1ol(B)
(?,2[(B . ?$,1ox(B)
(?,2\(B . ?$,1ot(B)
(?,2^(B . ?$,1o`(B)
(?,2_(B . ?$,1!o(B)
(?,2`(B . ?,A@(B)
(?,2a(B . ?,AA(B)
(?,2b(B . ?,AB(B)
(?,2c(B . ?,AC(B)
(?,2d(B . ?$,1o"(B)
(?,2e(B . ?$,1 "(B)
(?,2f(B . ?$,1on(B)
(?,2g(B . ?$,1o*(B)
(?,2h(B . ?,AH(B)
(?,2i(B . ?,AI(B)
(?,2j(B . ?,AJ(B)
(?,2k(B . ?$,1o:(B)
(?,2l(B . ?,AL(B)
(?,2m(B . ?,AM(B)
(?,2n(B . ?$,1 H(B)
(?,2o(B . ?$,1oH(B)
(?,2p(B . ?$,1 0(B)
(?,2q(B . ?$,1op(B)
(?,2r(B . ?,AR(B)
(?,2s(B . ?,AS(B)
(?,2t(B . ?,AT(B)
(?,2u(B . ?,AU(B)
(?,2v(B . ?$,1oN(B)
(?,2w(B . ?$,1oL(B)
(?,2x(B . ?$,1od(B)
(?,2y(B . ?,AY(B)
(?,2z(B . ?,AZ(B)
(?,2{(B . ?$,1!((B)
(?,2|(B . ?$,1of(B)
(?,2}(B . ?,A](B)
(?,2~(B . ?$,1ob(B)))
(thai-tis620
'((?,T!(B . ?$,1Ba(B)
(?,T"(B . ?$,1Bb(B)
(?,T#(B . ?$,1Bc(B)
(?,T$(B . ?$,1Bd(B)
(?,T%(B . ?$,1Be(B)
(?,T&(B . ?$,1Bf(B)
(?,T'(B . ?$,1Bg(B)
(?,T((B . ?$,1Bh(B)
(?,T)(B . ?$,1Bi(B)
(?,T*(B . ?$,1Bj(B)
(?,T+(B . ?$,1Bk(B)
(?,T,(B . ?$,1Bl(B)
(?,T-(B . ?$,1Bm(B)
(?,T.(B . ?$,1Bn(B)
(?,T/(B . ?$,1Bo(B)
(?,T0(B . ?$,1Bp(B)
(?,T1(B . ?$,1Bq(B)
(?,T2(B . ?$,1Br(B)
(?,T3(B . ?$,1Bs(B)
(?,T4(B . ?$,1Bt(B)
(?,T5(B . ?$,1Bu(B)
(?,T6(B . ?$,1Bv(B)
(?,T7(B . ?$,1Bw(B)
(?,T8(B . ?$,1Bx(B)
(?,T9(B . ?$,1By(B)
(?,T:(B . ?$,1Bz(B)
(?,T (?,T<(B . ?$,1B|(B)
(?,T=(B . ?$,1B}(B)
(?,T>(B . ?$,1B~(B)
(?,T?(B . ?$,1B(B)
(?,T@(B . ?$,1C (B)
(?,TA(B . ?$,1C!(B)
(?,TB(B . ?$,1C"(B)
(?,TC(B . ?$,1C#(B)
(?,TD(B . ?$,1C$(B)
(?,TE(B . ?$,1C%(B)
(?,TF(B . ?$,1C&(B)
(?,TG(B . ?$,1C'(B)
(?,TH(B . ?$,1C((B)
(?,TI(B . ?$,1C)(B)
(?,TJ(B . ?$,1C*(B)
(?,TK(B . ?$,1C+(B)
(?,TL(B . ?$,1C,(B)
(?,TM(B . ?$,1C-(B)
(?,TN(B . ?$,1C.(B)
(?,TO(B . ?$,1C/(B)
(?,TP(B . ?$,1C0(B)
(?,TQ(B . ?$,1C1(B)
(?,TR(B . ?$,1C2(B)
(?,TS(B . ?$,1C3(B)
(?,TT(B . ?$,1C4(B)
(?,TU(B . ?$,1C5(B)
(?,TV(B . ?$,1C6(B)
(?,TW(B . ?$,1C7(B)
(?,TX(B . ?$,1C8(B)
(?,TY(B . ?$,1C9(B)
(?,TZ(B . ?$,1C:(B)
(?,T_(B . ?$,1C?(B)
(?,T`(B . ?$,1C@(B)
(?,Ta(B . ?$,1CA(B)
(?,Tb(B . ?$,1CB(B)
(?,Tc(B . ?$,1CC(B)
(?,Td(B . ?$,1CD(B)
(?,Te(B . ?$,1CE(B)
(?,Tf(B . ?$,1CF(B)
(?,Tg(B . ?$,1CG(B)
(?,Th(B . ?$,1CH(B)
(?,Ti(B . ?$,1CI(B)
(?,Tj(B . ?$,1CJ(B)
(?,Tk(B . ?$,1CK(B)
(?,Tl(B . ?$,1CL(B)
(?,Tm(B . ?$,1CM(B)
(?,Tn(B . ?$,1CN(B)
(?,To(B . ?$,1CO(B)
(?,Tp(B . ?$,1CP(B)
(?,Tq(B . ?$,1CQ(B)
(?,Tr(B . ?$,1CR(B)
(?,Ts(B . ?$,1CS(B)
(?,Tt(B . ?$,1CT(B)
(?,Tu(B . ?$,1CU(B)
(?,Tv(B . ?$,1CV(B)
(?,Tw(B . ?$,1CW(B)
(?,Tx(B . ?$,1CX(B)
(?,Ty(B . ?$,1CY(B)
(?,Tz(B . ?$,1CZ(B)
(?,T{(B . ?$,1C[(B)))
(tibetan-iso-8bit
'((?$(7!0(B . ?$,1E@(B)
(?$(7!1(B . ?$,1EA(B)
(?$(7!2(B . ?$,1EB(B)
(?$(7!3(B . ?$,1EC(B)
(?$(7!4(B . ?$,1ED(B)
(?$(7!5(B . ?$,1EE(B)
(?$(7!6(B . ?$,1EF(B)
(?$(7!7(B . ?$,1EG(B)
(?$(7!8(B . ?$,1EH(B)
(?$(7!9(B . ?$,1EI(B)
(?$(7!:(B . ?$,1EJ(B)
(?$(7!;(B . ?$,1EK(B)
(?$(7!<(B . ?$,1EL(B)
(?$(7!=(B . ?$,1EM(B)
(?$(7!>(B . ?$,1EN(B)
(?$(7!?(B . ?$,1EO(B)
(?$(7!@(B . ?$,1EP(B)
(?$(7!A(B . ?$,1EQ(B)
(?$(7!B(B . ?$,1ER(B)
(?$(7!C(B . ?$,1ES(B)
(?$(7!D(B . ?$,1ET(B)
(?$(7!E(B . ?$,1EU(B)
(?$(7!F(B . ?$,1EV(B)
(?$(7!G(B . ?$,1EW(B)
(?$(7!H(B . ?$,1EX(B)
(?$(7!I(B . ?$,1EY(B)
(?$(7!J(B . ?$,1EZ(B)
(?$(7!K(B . ?$,1E[(B)
(?$(7!L(B . ?$,1E\(B)
(?$(7!M(B . ?$,1E](B)
(?$(7!N(B . ?$,1E^(B)
(?$(7!O(B . ?$,1E_(B)
(?$(7!P(B . ?$,1E`(B)
(?$(7!Q(B . ?$,1Ea(B)
(?$(7!R(B . ?$,1Eb(B)
(?$(7!S(B . ?$,1Ec(B)
(?$(7!T(B . ?$,1Ed(B)
(?$(7!U(B . ?$,1Ee(B)
(?$(7!V(B . ?$,1Ef(B)
(?$(7!W(B . ?$,1Eg(B)
(?$(7!X(B . ?$,1Eh(B)
(?$(7!Y(B . ?$,1Ei(B)
(?$(7!Z(B . ?$,1Ej(B)
(?$(7![(B . ?$,1Ek(B)
(?$(7!\(B . ?$,1El(B)
(?$(7!](B . ?$,1Em(B)
(?$(7!^(B . ?$,1En(B)
(?$(7!_(B . ?$,1Eo(B)
(?$(7!`(B . ?$,1Ep(B)
(?$(7!a(B . ?$,1Eq(B)
(?$(7!b(B . ?$,1Er(B)
(?$(7!c(B . ?$,1Es(B)
(?$(7!d(B . ?$,1Et(B)
(?$(7!e(B . ?$,1Eu(B)
(?$(7!f(B . ?$,1Ev(B)
(?$(7!g(B . ?$,1Ew(B)
(?$(7!h(B . ?$,1Ex(B)
(?$(7!i(B . ?$,1Ey(B)
(?$(7!j(B . ?$,1Ez(B)
(?$(7!k(B . ?$,1E{(B)
(?$(7!l(B . ?$,1E|(B)
(?$(7!m(B . ?$,1E}(B)
(?$(7!n(B . ?$,1E~(B)
(?$(7!o(B . ?$,1E(B)
(?$(7"!(B . ?$,1F (B)
(?$(7""(B . ?$,1F!(B)
(?$(7"#(B . ?$,1F"(B)
(?$(7"$(B . ?$,1F#(B)
(?$(7"%(B . ?$,1F$(B)
(?$(7"&(B . ?$,1F%(B)
(?$(7"'(B . ?$,1F&(B)
(?$(7"((B . ?$,1F'(B)
(?$(7"*(B . ?$,1F)(B)
(?$(7"+(B . ?$,1F*(B)
(?$(7",(B . ?$,1F+(B)
(?$(7"-(B . ?$,1F,(B)
(?$(7".(B . ?$,1F-(B)
(?$(7"/(B . ?$,1F.(B)
(?$(7"0(B . ?$,1F/(B)
(?$(7"1(B . ?$,1F0(B)
(?$(7"2(B . ?$,1F1(B)
(?$(7"3(B . ?$,1F2(B)
(?$(7"4(B . ?$,1F3(B)
(?$(7"5(B . ?$,1F4(B)
(?$(7"6(B . ?$,1F5(B)
(?$(7"7(B . ?$,1F6(B)
(?$(7"8(B . ?$,1F7(B)
(?$(7"9(B . ?$,1F8(B)
(?$(7":(B . ?$,1F9(B)
(?$(7";(B . ?$,1F:(B)
(?$(7"<(B . ?$,1F (?$(7"=(B . ?$,1F<(B)
(?$(7">(B . ?$,1F=(B)
(?$(7"?(B . ?$,1F>(B)
(?$(7"@(B . ?$,1F?(B)
(?$(7"A(B . ?$,1F@(B)
(?$(7"B(B . ?$,1FA(B)
(?$(7"C(B . ?$,1FB(B)
(?$(7"D(B . ?$,1FC(B)
(?$(7"E(B . ?$,1FD(B)
(?$(7"F(B . ?$,1FE(B)
(?$(7"G(B . ?$,1FF(B)
(?$(7"H(B . ?$,1FG(B)
(?$(7"I(B . ?$,1FH(B)
(?$(7"J(B . ?$,1FI(B)
(?$(7"K(B . ?$,1FJ(B)
(?$(7"R(B . ?$,1FQ(B)
(?$(7"S(B . ?$,1FR(B)
(?$(7"T(B . ?$,1FS(B)
(?$(7"U(B . ?$,1FT(B)
(?$(7"V(B . ?$,1FU(B)
(?$(7"W(B . ?$,1FV(B)
(?$(7"X(B . ?$,1FW(B)
(?$(7"Y(B . ?$,1FX(B)
(?$(7"Z(B . ?$,1FY(B)
(?$(7"[(B . ?$,1FZ(B)
(?$(7"\(B . ?$,1F[(B)
(?$(7"](B . ?$,1F\(B)
(?$(7"^(B . ?$,1F](B)
(?$(7"_(B . ?$,1F^(B)
(?$(7"`(B . ?$,1F_(B)
(?$(7"a(B . ?$,1F`(B)
(?$(7"b(B . ?$,1Fa(B)
(?$(7"c(B . ?$,1Fb(B)
(?$(7"d(B . ?$,1Fc(B)
(?$(7"e(B . ?$,1Fd(B)
(?$(7"f(B . ?$,1Fe(B)
(?$(7"g(B . ?$,1Ff(B)
(?$(7"h(B . ?$,1Fg(B)
(?$(7"i(B . ?$,1Fh(B)
(?$(7"j(B . ?$,1Fi(B)
(?$(7"k(B . ?$,1Fj(B)
(?$(7"l(B . ?$,1Fk(B)
(?$(7#!(B . ?$,1Fp(B)
(?$(7#"(B . ?$,1Fq(B)
(?$(7##(B . ?$,1Fr(B)
(?$(7#$(B . ?$,1Fs(B)
(?$(7#%(B . ?$,1Ft(B)
(?$(7#&(B . ?$,1Fu(B)
(?$(7#'(B . ?$,1Fv(B)
(?$(7#((B . ?$,1Fw(B)
(?$(7#*(B . ?$,1Fy(B)
(?$(7#+(B . ?$,1Fz(B)
(?$(7#,(B . ?$,1F{(B)
(?$(7#-(B . ?$,1F|(B)
(?$(7#.(B . ?$,1F}(B)
(?$(7#/(B . ?$,1F~(B)
(?$(7#0(B . ?$,1F(B)
(?$(7#1(B . ?$,1G (B)
(?$(7#2(B . ?$,1G!(B)
(?$(7#3(B . ?$,1G"(B)
(?$(7#4(B . ?$,1G#(B)
(?$(7#5(B . ?$,1G$(B)
(?$(7#6(B . ?$,1G%(B)
(?$(7#7(B . ?$,1G&(B)
(?$(7#8(B . ?$,1G'(B)
(?$(7#9(B . ?$,1G((B)
(?$(7#:(B . ?$,1G)(B)
(?$(7# (?$(7#<(B . ?$,1G+(B)
(?$(7#=(B . ?$,1G,(B)
(?$(7#>(B . ?$,1G-(B)
(?$(7#?(B . ?$,1G.(B)
(?$(7#@(B . ?$,1G/(B)
(?$(7#A(B . ?$,1G0(B)
(?$(7#B(B . ?$,1G1(B)
(?$(7#C(B . ?$,1G2(B)
(?$(7#D(B . ?$,1G3(B)
(?$(7#E(B . ?$,1G4(B)
(?$(7#F(B . ?$,1G5(B)
(?$(7#G(B . ?$,1G6(B)
(?$(7#H(B . ?$,1G7(B)
(?$(7#I(B . ?$,1G8(B)
(?$(7#J(B . ?$,1G9(B)
(?$(7#K(B . ?$,1G:(B)
(?$(7#L(B . ?$,1G (?$(7#M(B . ?$,1G<(B)
(?$(7#O(B . ?$,1G>(B)
(?$(7#P(B . ?$,1G?(B)
(?$(7#Q(B . ?$,1G@(B)
(?$(7#R(B . ?$,1GA(B)
(?$(7#S(B . ?$,1GB(B)
(?$(7#T(B . ?$,1GC(B)
(?$(7#U(B . ?$,1GD(B)
(?$(7#V(B . ?$,1GE(B)
(?$(7#W(B . ?$,1GF(B)
(?$(7#X(B . ?$,1GG(B)
(?$(7#Y(B . ?$,1GH(B)
(?$(7#Z(B . ?$,1GI(B)
(?$(7#[(B . ?$,1GJ(B)
(?$(7#\(B . ?$,1GK(B)
(?$(7#](B . ?$,1GL(B)
(?$(7#`(B . ?$,1GO(B)))
(ipa
'((?,0 (B . ?i)
(?,0!(B . ?$,1#j(B)
(?,0"(B . ?e)
(?,0#(B . ?$,1#[(B)
(?,0$(B . ?,Af(B)
(?,0%(B . ?a)
(?,0&(B . ?$,1#h(B)
(?,0'(B . ?$,1#Y(B)
(?,0((B . ?$,1#P(B)
(?,0)(B . ?$,1#o(B)
(?,0*(B . ?$,1#d(B)
(?,0+(B . ?$,1$,(B)
(?,0,(B . ?$,1#Q(B)
(?,0-(B . ?y)
(?,0.(B . ?$,1$/(B)
(?,0/(B . ?,Ax(B)
(?,00(B . ?$,1 s(B)
(?,01(B . ?$,1#v(B)
(?,02(B . ?$,1$)(B)
(?,03(B . ?$,1#u(B)
(?,04(B . ?u)
(?,05(B . ?$,1$*(B)
(?,06(B . ?o)
(?,07(B . ?$,1#T(B)
(?,08(B . ?$,1#R(B)
(?,0:(B . ?$,1#Z(B)
(?,0@(B . ?p)
(?,0A(B . ?b)
(?,0B(B . ?t)
(?,0C(B . ?d)
(?,0D(B . ?k)
(?,0E(B . ?g)
(?,0F(B . ?f)
(?,0G(B . ?v)
(?,0H(B . ?$,1'8(B)
(?,0I(B . ?,Ap(B)
(?,0J(B . ?s)
(?,0K(B . ?z)
(?,0L(B . ?$,1$#(B)
(?,0M(B . ?$,1$2(B)
(?,0N(B . ?,Ag(B)
(?,0O(B . ?x)
(?,0P(B . ?$,1$!(B)
(?,0Q(B . ?h)
(?,0R(B . ?m)
(?,0S(B . ?n)
(?,0T(B . ?$,1#r(B)
(?,0U(B . ?$,1 k(B)
(?,0V(B . ?r)
(?,0W(B . ?$,1$ (B)
(?,0X(B . ?$,1#y(B)
(?,0Y(B . ?j)
(?,0Z(B . ?l)
(?,0[(B . ?$,1$.(B)
(?,0\(B . ?$,1$?(B)
(?,0](B . ?$,1#e(B)
(?,0^(B . ?w)
(?,0_(B . ?$,1$-(B)
(?,0p(B . ?$,1$h(B)
(?,0q(B . ?$,1$l(B)
(?,0r(B . ?$,1$p(B)))
(ethiopic
'((?$(3!!(B . ?$,1M@(B)
(?$(3!"(B . ?$,1MA(B)
(?$(3!#(B . ?$,1MB(B)
(?$(3!$(B . ?$,1MC(B)
(?$(3!%(B . ?$,1MD(B)
(?$(3!&(B . ?$,1ME(B)
(?$(3!'(B . ?$,1MF(B)
(?$(3!)(B . ?$,1MH(B)
(?$(3!*(B . ?$,1MI(B)
(?$(3!+(B . ?$,1MJ(B)
(?$(3!,(B . ?$,1MK(B)
(?$(3!-(B . ?$,1ML(B)
(?$(3!.(B . ?$,1MM(B)
(?$(3!/(B . ?$,1MN(B)
(?$(3!0(B . ?$,1MO(B)
(?$(3!1(B . ?$,1MP(B)
(?$(3!2(B . ?$,1MQ(B)
(?$(3!3(B . ?$,1MR(B)
(?$(3!4(B . ?$,1MS(B)
(?$(3!5(B . ?$,1MT(B)
(?$(3!6(B . ?$,1MU(B)
(?$(3!7(B . ?$,1MV(B)
(?$(3!8(B . ?$,1MW(B)
(?$(3!9(B . ?$,1MX(B)
(?$(3!:(B . ?$,1MY(B)
(?$(3! (?$(3!<(B . ?$,1M[(B)
(?$(3!=(B . ?$,1M\(B)
(?$(3!>(B . ?$,1M](B)
(?$(3!?(B . ?$,1M^(B)
(?$(3!@(B . ?$,1M_(B)
(?$(3!A(B . ?$,1M`(B)
(?$(3!B(B . ?$,1Ma(B)
(?$(3!C(B . ?$,1Mb(B)
(?$(3!D(B . ?$,1Mc(B)
(?$(3!E(B . ?$,1Md(B)
(?$(3!F(B . ?$,1Me(B)
(?$(3!G(B . ?$,1Mf(B)
(?$(3!H(B . ?$,1Mg(B)
(?$(3!I(B . ?$,1Mh(B)
(?$(3!J(B . ?$,1Mi(B)
(?$(3!K(B . ?$,1Mj(B)
(?$(3!L(B . ?$,1Mk(B)
(?$(3!M(B . ?$,1Ml(B)
(?$(3!N(B . ?$,1Mm(B)
(?$(3!O(B . ?$,1Mn(B)
(?$(3!P(B . ?$,1Mo(B)
(?$(3!Q(B . ?$,1Mp(B)
(?$(3!R(B . ?$,1Mq(B)
(?$(3!S(B . ?$,1Mr(B)
(?$(3!T(B . ?$,1Ms(B)
(?$(3!U(B . ?$,1Mt(B)
(?$(3!V(B . ?$,1Mu(B)
(?$(3!W(B . ?$,1Mv(B)
(?$(3!X(B . ?$,1Mw(B)
(?$(3!Y(B . ?$,1Mx(B)
(?$(3!Z(B . ?$,1My(B)
(?$(3![(B . ?$,1Mz(B)
(?$(3!\(B . ?$,1M{(B)
(?$(3!](B . ?$,1M|(B)
(?$(3!^(B . ?$,1M}(B)
(?$(3!_(B . ?$,1M~(B)
(?$(3!`(B . ?$,1M(B)
(?$(3!a(B . ?$,1N (B)
(?$(3!b(B . ?$,1N!(B)
(?$(3!c(B . ?$,1N"(B)
(?$(3!d(B . ?$,1N#(B)
(?$(3!e(B . ?$,1N$(B)
(?$(3!f(B . ?$,1N%(B)
(?$(3!g(B . ?$,1N&(B)
(?$(3!i(B . ?$,1N((B)
(?$(3!k(B . ?$,1N*(B)
(?$(3!l(B . ?$,1N+(B)
(?$(3!m(B . ?$,1N,(B)
(?$(3!n(B . ?$,1N-(B)
(?$(3!q(B . ?$,1N0(B)
(?$(3!r(B . ?$,1N1(B)
(?$(3!s(B . ?$,1N2(B)
(?$(3!t(B . ?$,1N3(B)
(?$(3!u(B . ?$,1N4(B)
(?$(3!v(B . ?$,1N5(B)
(?$(3!w(B . ?$,1N6(B)
(?$(3!y(B . ?$,1N8(B)
(?$(3!{(B . ?$,1N:(B)
(?$(3!|(B . ?$,1N;(B)
(?$(3!}(B . ?$,1N<(B)
(?$(3!~(B . ?$,1N=(B)
(?$(3"#(B . ?$,1N@(B)
(?$(3"$(B . ?$,1NA(B)
(?$(3"%(B . ?$,1NB(B)
(?$(3"&(B . ?$,1NC(B)
(?$(3"'(B . ?$,1ND(B)
(?$(3"((B . ?$,1NE(B)
(?$(3")(B . ?$,1NF(B)
(?$(3"*(B . ?$,1NG(B)
(?$(3"+(B . ?$,1NH(B)
(?$(3",(B . ?$,1NI(B)
(?$(3"-(B . ?$,1NJ(B)
(?$(3".(B . ?$,1NK(B)
(?$(3"/(B . ?$,1NL(B)
(?$(3"0(B . ?$,1NM(B)
(?$(3"1(B . ?$,1NN(B)
(?$(3"2(B . ?$,1NO(B)
(?$(3"3(B . ?$,1NP(B)
(?$(3"4(B . ?$,1NQ(B)
(?$(3"5(B . ?$,1NR(B)
(?$(3"6(B . ?$,1NS(B)
(?$(3"7(B . ?$,1NT(B)
(?$(3"8(B . ?$,1NU(B)
(?$(3"9(B . ?$,1NV(B)
(?$(3":(B . ?$,1NW(B)
(?$(3" (?$(3"<(B . ?$,1NY(B)
(?$(3"=(B . ?$,1NZ(B)
(?$(3">(B . ?$,1N[(B)
(?$(3"?(B . ?$,1N\(B)
(?$(3"@(B . ?$,1N](B)
(?$(3"A(B . ?$,1N^(B)
(?$(3"B(B . ?$,1N_(B)
(?$(3"C(B . ?$,1N`(B)
(?$(3"D(B . ?$,1Na(B)
(?$(3"E(B . ?$,1Nb(B)
(?$(3"F(B . ?$,1Nc(B)
(?$(3"G(B . ?$,1Nd(B)
(?$(3"H(B . ?$,1Ne(B)
(?$(3"I(B . ?$,1Nf(B)
(?$(3"K(B . ?$,1Nh(B)
(?$(3"M(B . ?$,1Nj(B)
(?$(3"N(B . ?$,1Nk(B)
(?$(3"O(B . ?$,1Nl(B)
(?$(3"P(B . ?$,1Nm(B)
(?$(3"S(B . ?$,1Np(B)
(?$(3"T(B . ?$,1Nq(B)
(?$(3"U(B . ?$,1Nr(B)
(?$(3"V(B . ?$,1Ns(B)
(?$(3"W(B . ?$,1Nt(B)
(?$(3"X(B . ?$,1Nu(B)
(?$(3"Y(B . ?$,1Nv(B)
(?$(3"Z(B . ?$,1Nw(B)
(?$(3"[(B . ?$,1Nx(B)
(?$(3"\(B . ?$,1Ny(B)
(?$(3"](B . ?$,1Nz(B)
(?$(3"^(B . ?$,1N{(B)
(?$(3"_(B . ?$,1N|(B)
(?$(3"`(B . ?$,1N}(B)
(?$(3"a(B . ?$,1N~(B)
(?$(3"b(B . ?$,1N(B)
(?$(3"c(B . ?$,1O (B)
(?$(3"d(B . ?$,1O!(B)
(?$(3"e(B . ?$,1O"(B)
(?$(3"f(B . ?$,1O#(B)
(?$(3"g(B . ?$,1O$(B)
(?$(3"h(B . ?$,1O%(B)
(?$(3"i(B . ?$,1O&(B)
(?$(3"j(B . ?$,1O'(B)
(?$(3"k(B . ?$,1O((B)
(?$(3"l(B . ?$,1O)(B)
(?$(3"m(B . ?$,1O*(B)
(?$(3"n(B . ?$,1O+(B)
(?$(3"o(B . ?$,1O,(B)
(?$(3"p(B . ?$,1O-(B)
(?$(3"q(B . ?$,1O.(B)
(?$(3"s(B . ?$,1O0(B)
(?$(3"u(B . ?$,1O2(B)
(?$(3"v(B . ?$,1O3(B)
(?$(3"w(B . ?$,1O4(B)
(?$(3"x(B . ?$,1O5(B)
(?$(3"{(B . ?$,1O8(B)
(?$(3"|(B . ?$,1O9(B)
(?$(3"}(B . ?$,1O:(B)
(?$(3"~(B . ?$,1O (?$(3#!(B . ?$,1O<(B)
(?$(3#"(B . ?$,1O=(B)
(?$(3##(B . ?$,1O>(B)
(?$(3#%(B . ?$,1O@(B)
(?$(3#'(B . ?$,1OB(B)
(?$(3#((B . ?$,1OC(B)
(?$(3#)(B . ?$,1OD(B)
(?$(3#*(B . ?$,1OE(B)
(?$(3#-(B . ?$,1OH(B)
(?$(3#.(B . ?$,1OI(B)
(?$(3#/(B . ?$,1OJ(B)
(?$(3#0(B . ?$,1OK(B)
(?$(3#1(B . ?$,1OL(B)
(?$(3#2(B . ?$,1OM(B)
(?$(3#3(B . ?$,1ON(B)
(?$(3#5(B . ?$,1OP(B)
(?$(3#6(B . ?$,1OQ(B)
(?$(3#7(B . ?$,1OR(B)
(?$(3#8(B . ?$,1OS(B)
(?$(3#9(B . ?$,1OT(B)
(?$(3#:(B . ?$,1OU(B)
(?$(3#;(B . ?$,1OV(B)
(?$(3#=(B . ?$,1OX(B)
(?$(3#>(B . ?$,1OY(B)
(?$(3#?(B . ?$,1OZ(B)
(?$(3#@(B . ?$,1O[(B)
(?$(3#A(B . ?$,1O\(B)
(?$(3#B(B . ?$,1O](B)
(?$(3#C(B . ?$,1O^(B)
(?$(3#D(B . ?$,1O_(B)
(?$(3#E(B . ?$,1O`(B)
(?$(3#F(B . ?$,1Oa(B)
(?$(3#G(B . ?$,1Ob(B)
(?$(3#H(B . ?$,1Oc(B)
(?$(3#I(B . ?$,1Od(B)
(?$(3#J(B . ?$,1Oe(B)
(?$(3#K(B . ?$,1Of(B)
(?$(3#L(B . ?$,1Og(B)
(?$(3#M(B . ?$,1Oh(B)
(?$(3#N(B . ?$,1Oi(B)
(?$(3#O(B . ?$,1Oj(B)
(?$(3#P(B . ?$,1Ok(B)
(?$(3#Q(B . ?$,1Ol(B)
(?$(3#R(B . ?$,1Om(B)
(?$(3#S(B . ?$,1On(B)
(?$(3#U(B . ?$,1Op(B)
(?$(3#V(B . ?$,1Oq(B)
(?$(3#W(B . ?$,1Or(B)
(?$(3#X(B . ?$,1Os(B)
(?$(3#Y(B . ?$,1Ot(B)
(?$(3#Z(B . ?$,1Ou(B)
(?$(3#[(B . ?$,1Ov(B)
(?$(3#\(B . ?$,1Ow(B)
(?$(3#](B . ?$,1Ox(B)
(?$(3#^(B . ?$,1Oy(B)
(?$(3#_(B . ?$,1Oz(B)
(?$(3#`(B . ?$,1O{(B)
(?$(3#a(B . ?$,1O|(B)
(?$(3#b(B . ?$,1O}(B)
(?$(3#c(B . ?$,1O~(B)
(?$(3#d(B . ?$,1O(B)
(?$(3#e(B . ?$,1P (B)
(?$(3#f(B . ?$,1P!(B)
(?$(3#g(B . ?$,1P"(B)
(?$(3#h(B . ?$,1P#(B)
(?$(3#i(B . ?$,1P$(B)
(?$(3#j(B . ?$,1P%(B)
(?$(3#k(B . ?$,1P&(B)
(?$(3#l(B . ?$,1P'(B)
(?$(3#m(B . ?$,1P((B)
(?$(3#n(B . ?$,1P)(B)
(?$(3#o(B . ?$,1P*(B)
(?$(3#p(B . ?$,1P+(B)
(?$(3#q(B . ?$,1P,(B)
(?$(3#r(B . ?$,1P-(B)
(?$(3#s(B . ?$,1P.(B)
(?$(3#u(B . ?$,1P0(B)
(?$(3#w(B . ?$,1P2(B)
(?$(3#x(B . ?$,1P3(B)
(?$(3#y(B . ?$,1P4(B)
(?$(3#z(B . ?$,1P5(B)
(?$(3#}(B . ?$,1P8(B)
(?$(3#~(B . ?$,1P9(B)
(?$(3$!(B . ?$,1P:(B)
(?$(3$"(B . ?$,1P;(B)
(?$(3$#(B . ?$,1P<(B)
(?$(3$$(B . ?$,1P=(B)
(?$(3$%(B . ?$,1P>(B)
(?$(3$'(B . ?$,1P@(B)
(?$(3$((B . ?$,1PA(B)
(?$(3$)(B . ?$,1PB(B)
(?$(3$*(B . ?$,1PC(B)
(?$(3$+(B . ?$,1PD(B)
(?$(3$,(B . ?$,1PE(B)
(?$(3$-(B . ?$,1PF(B)
(?$(3$.(B . ?$,1PG(B)
(?$(3$/(B . ?$,1PH(B)
(?$(3$0(B . ?$,1PI(B)
(?$(3$1(B . ?$,1PJ(B)
(?$(3$2(B . ?$,1PK(B)
(?$(3$3(B . ?$,1PL(B)
(?$(3$4(B . ?$,1PM(B)
(?$(3$5(B . ?$,1PN(B)
(?$(3$6(B . ?$,1PO(B)
(?$(3$7(B . ?$,1PP(B)
(?$(3$8(B . ?$,1PQ(B)
(?$(3$9(B . ?$,1PR(B)
(?$(3$:(B . ?$,1PS(B)
(?$(3$;(B . ?$,1PT(B)
(?$(3$<(B . ?$,1PU(B)
(?$(3$=(B . ?$,1PV(B)
(?$(3$>(B . ?$,1PW(B)
(?$(3$?(B . ?$,1PX(B)
(?$(3$@(B . ?$,1PY(B)
(?$(3$A(B . ?$,1PZ(B)
(?$(3$B(B . ?$,1P[(B)
(?$(3$C(B . ?$,1P\(B)
(?$(3$D(B . ?$,1P](B)
(?$(3$E(B . ?$,1P^(B)
(?$(3$F(B . ?$,1P_(B)
(?$(3$G(B . ?$,1P`(B)
(?$(3$H(B . ?$,1Pa(B)
(?$(3$I(B . ?$,1Pb(B)
(?$(3$J(B . ?$,1Pc(B)
(?$(3$K(B . ?$,1Pd(B)
(?$(3$L(B . ?$,1Pe(B)
(?$(3$M(B . ?$,1Pf(B)
(?$(3$O(B . ?$,1Ph(B)
(?$(3$P(B . ?$,1Pi(B)
(?$(3$Q(B . ?$,1Pj(B)
(?$(3$R(B . ?$,1Pk(B)
(?$(3$S(B . ?$,1Pl(B)
(?$(3$T(B . ?$,1Pm(B)
(?$(3$U(B . ?$,1Pn(B)
(?$(3$V(B . ?$,1Po(B)
(?$(3$W(B . ?$,1Pp(B)
(?$(3$X(B . ?$,1Pq(B)
(?$(3$Y(B . ?$,1Pr(B)
(?$(3$Z(B . ?$,1Ps(B)
(?$(3$[(B . ?$,1Pt(B)
(?$(3$\(B . ?$,1Pu(B)
(?$(3$](B . ?$,1Pv(B)
(?$(3$^(B . ?$,1Pw(B)
(?$(3$_(B . ?$,1Px(B)
(?$(3$`(B . ?$,1Py(B)
(?$(3$a(B . ?$,1Pz(B)
(?$(3$h(B . ?$,1Q!(B)
(?$(3$i(B . ?$,1Q"(B)
(?$(3$j(B . ?$,1Q#(B)
(?$(3$k(B . ?$,1Q$(B)
(?$(3$l(B . ?$,1Q%(B)
(?$(3$m(B . ?$,1Q&(B)
(?$(3$n(B . ?$,1Q'(B)
(?$(3$o(B . ?$,1Q((B)
(?$(3$p(B . ?$,1Q)(B)
(?$(3$q(B . ?$,1Q*(B)
(?$(3$r(B . ?$,1Q+(B)
(?$(3$s(B . ?$,1Q,(B)
(?$(3$t(B . ?$,1Q-(B)
(?$(3$u(B . ?$,1Q.(B)
(?$(3$v(B . ?$,1Q/(B)
(?$(3$w(B . ?$,1Q0(B)
(?$(3$x(B . ?$,1Q1(B)
(?$(3$y(B . ?$,1Q2(B)
(?$(3$z(B . ?$,1Q3(B)
(?$(3${(B . ?$,1Q4(B)
(?$(3$|(B . ?$,1Q5(B)
(?$(3$}(B . ?$,1Q6(B)
(?$(3$~(B . ?$,1Q7(B)
(?$(3%!(B . ?$,1Q8(B)
(?$(3%"(B . ?$,1Q9(B)
(?$(3%#(B . ?$,1Q:(B)
(?$(3%$(B . ?$,1Q;(B)
(?$(3%%(B . ?$,1Q<(B)))
(indian-is13194
'((?(5!(B . ?$,15A(B)
(?(5"(B . ?$,15B(B)
(?(5#(B . ?$,15C(B)
(?(5$(B . ?$,15E(B)
(?(5%(B . ?$,15F(B)
(?(5&(B . ?$,15G(B)
(?(5'(B . ?$,15H(B)
(?(5((B . ?$,15I(B)
(?(5)(B . ?$,15J(B)
(?(5*(B . ?$,15K(B)
(?(5+(B . ?$,15N(B)
(?(5,(B . ?$,15O(B)
(?(5-(B . ?$,15P(B)
(?(5.(B . ?$,15M(B)
(?(5/(B . ?$,15R(B)
(?(50(B . ?$,15S(B)
(?(51(B . ?$,15T(B)
(?(52(B . ?$,15M(B)
(?(53(B . ?$,15U(B)
(?(54(B . ?$,15V(B)
(?(55(B . ?$,15W(B)
(?(56(B . ?$,15X(B)
(?(57(B . ?$,15Y(B)
(?(58(B . ?$,15Z(B)
(?(59(B . ?$,15[(B)
(?(5:(B . ?$,15\(B)
(?(5 (?(5<(B . ?$,15^(B)
(?(5=(B . ?$,15_(B)
(?(5>(B . ?$,15`(B)
(?(5?(B . ?$,15a(B)
(?(5@(B . ?$,15b(B)
(?(5A(B . ?$,15c(B)
(?(5B(B . ?$,15d(B)
(?(5C(B . ?$,15e(B)
(?(5D(B . ?$,15f(B)
(?(5E(B . ?$,15g(B)
(?(5F(B . ?$,15h(B)
(?(5G(B . ?$,15i(B)
(?(5H(B . ?$,15j(B)
(?(5I(B . ?$,15k(B)
(?(5J(B . ?$,15l(B)
(?(5K(B . ?$,15m(B)
(?(5L(B . ?$,15n(B)
(?(5M(B . ?$,15o(B)
(?(5N(B . ?$,16?(B)
(?(5O(B . ?$,15p(B)
(?(5P(B . ?$,15q(B)
(?(5Q(B . ?$,15r(B)
(?(5R(B . ?$,15s(B)
(?(5S(B . ?$,15t(B)
(?(5T(B . ?$,15u(B)
(?(5U(B . ?$,15v(B)
(?(5V(B . ?$,15w(B)
(?(5W(B . ?$,15x(B)
(?(5X(B . ?$,15y(B)
(?(5Z(B . ?$,15~(B)
(?(5[(B . ?$,15(B)
(?(5\(B . ?$,16 (B)
(?(5](B . ?$,16!(B)
(?(5^(B . ?$,16"(B)
(?(5_(B . ?$,16#(B)
(?(5`(B . ?$,16&(B)
(?(5a(B . ?$,16'(B)
(?(5b(B . ?$,16((B)
(?(5c(B . ?$,16%(B)
(?(5d(B . ?$,16*(B)
(?(5e(B . ?$,16+(B)
(?(5f(B . ?$,16,(B)
(?(5g(B . ?$,16)(B)
(?(5h(B . ?$,16-(B)
(?(5i(B . ?$,15|(B)
(?(5j(B . ?$,16D(B)
(?(5q(B . ?$,16F(B)
(?(5r(B . ?$,16G(B)
(?(5s(B . ?$,16H(B)
(?(5t(B . ?$,16I(B)
(?(5u(B . ?$,16J(B)
(?(5v(B . ?$,16K(B)
(?(5w(B . ?$,16L(B)
(?(5x(B . ?$,16M(B)
(?(5y(B . ?$,16N(B)
(?(5z(B . ?$,16O(B)))
(katakana-jisx0201
'((?(I!(B . ?$,3sa(B)
(?\(I"(B . ?\$,3sb(B)
(?\(I#(B . ?\$,3sc(B)
(?(I$(B . ?$,3sd(B)
(?(I%(B . ?$,3se(B)
(?(I&(B . ?$,3sf(B)
(?(I'(B . ?$,3sg(B)
(?(I((B . ?$,3sh(B)
(?(I)(B . ?$,3si(B)
(?(I*(B . ?$,3sj(B)
(?(I+(B . ?$,3sk(B)
(?(I,(B . ?$,3sl(B)
(?(I-(B . ?$,3sm(B)
(?(I.(B . ?$,3sn(B)
(?(I/(B . ?$,3so(B)
(?(I0(B . ?$,3sp(B)
(?(I1(B . ?$,3sq(B)
(?(I2(B . ?$,3sr(B)
(?(I3(B . ?$,3ss(B)
(?(I4(B . ?$,3st(B)
(?(I5(B . ?$,3su(B)
(?(I6(B . ?$,3sv(B)
(?(I7(B . ?$,3sw(B)
(?(I8(B . ?$,3sx(B)
(?(I9(B . ?$,3sy(B)
(?(I:(B . ?$,3sz(B)
(?(I (?(I<(B . ?$,3s|(B)
(?(I=(B . ?$,3s}(B)
(?(I>(B . ?$,3s~(B)
(?(I?(B . ?$,3s(B)
(?(I@(B . ?$,3t (B)
(?(IA(B . ?$,3t!(B)
(?(IB(B . ?$,3t"(B)
(?(IC(B . ?$,3t#(B)
(?(ID(B . ?$,3t$(B)
(?(IE(B . ?$,3t%(B)
(?(IF(B . ?$,3t&(B)
(?(IG(B . ?$,3t'(B)
(?(IH(B . ?$,3t((B)
(?(II(B . ?$,3t)(B)
(?(IJ(B . ?$,3t*(B)
(?(IK(B . ?$,3t+(B)
(?(IL(B . ?$,3t,(B)
(?(IM(B . ?$,3t-(B)
(?(IN(B . ?$,3t.(B)
(?(IO(B . ?$,3t/(B)
(?(IP(B . ?$,3t0(B)
(?(IQ(B . ?$,3t1(B)
(?(IR(B . ?$,3t2(B)
(?(IS(B . ?$,3t3(B)
(?(IT(B . ?$,3t4(B)
(?(IU(B . ?$,3t5(B)
(?(IV(B . ?$,3t6(B)
(?(IW(B . ?$,3t7(B)
(?(IX(B . ?$,3t8(B)
(?(IY(B . ?$,3t9(B)
(?(IZ(B . ?$,3t:(B)
(?(I[(B . ?$,3t;(B)
(?(I\(B . ?$,3t<(B)
(?(I](B . ?$,3t=(B)
(?(I^(B . ?$,3t>(B)
(?(I_(B . ?$,3t?(B)))
(chinese-sisheng
'((?(0!(B . ?$,1 !(B)
(?(0"(B . ?,Aa(B)
(?(0#(B . ?$,1".(B)
(?(0$(B . ?,A`(B)
(?(0%(B . ?$,1 3(B)
(?(0&(B . ?,Ai(B)
(?(0'(B . ?$,1 ;(B)
(?(0((B . ?,Ah(B)
(?(0)(B . ?$,1 K(B)
(?(0*(B . ?,Am(B)
(?(0+(B . ?$,1"0(B)
(?(0,(B . ?,Al(B)
(?(0-(B . ?$,1 m(B)
(?(0.(B . ?,As(B)
(?(0/(B . ?$,1"2(B)
(?(00(B . ?,Ar(B)
(?(01(B . ?$,1!+(B)
(?(02(B . ?,Az(B)
(?(03(B . ?$,1"4(B)
(?(04(B . ?,Ay(B)
(?(05(B . ?$,1"6(B)
(?(06(B . ?$,1"8(B)
(?(07(B . ?$,1":(B)
(?(08(B . ?$,1"<(B)
(?(09(B . ?,A|(B)
(?(0:(B . ?,Aj(B)
(?(0<(B . ?$,1m(B)
(?(0=(B . ?$,1 d(B)
(?(0>(B . ?$,1 h(B)
(?(0?(B . ?$,1"Y(B)
(?(0A(B . ?$,1$i(B)
(?(0B(B . ?$,1$j(B)
(?(0C(B . ?$,1$g(B)
(?(0D(B . ?$,1$k(B)
(?(0E(B . ?$,2@%(B)
(?(0F(B . ?$,2@&(B)
(?(0G(B . ?$,2@'(B)
(?(0H(B . ?$,2@((B)
(?(0I(B . ?$,2@)(B)
(?(0J(B . ?$,2@*(B)
(?(0K(B . ?$,2@+(B)
(?(0L(B . ?$,2@,(B)
(?(0M(B . ?$,2@-(B)
(?(0N(B . ?$,2@.(B)
(?(0O(B . ?$,2@/(B)
(?(0P(B . ?$,2@0(B)
(?(0Q(B . ?$,2@1(B)
(?(0R(B . ?$,2@2(B)
(?(0S(B . ?$,2@3(B)
(?(0T(B . ?$,2@4(B)
(?(0U(B . ?$,2@5(B)
(?(0V(B . ?$,2@6(B)
(?(0W(B . ?$,2@7(B)
(?(0X(B . ?$,2@8(B)
(?(0Y(B . ?$,2@9(B)
(?(0Z(B . ?$,2@:(B)
(?(0[(B . ?$,2@;(B)
(?(0\(B . ?$,2@<(B)
(?(0](B . ?$,2@=(B)
(?(0^(B . ?$,2@>(B)
(?(0_(B . ?$,2@?(B)
(?(0`(B . ?$,2@@(B)
(?(0a(B . ?$,2@A(B)
(?(0b(B . ?$,2@B(B)
(?(0c(B . ?$,2@C(B)
(?(0d(B . ?$,2@D(B)
(?(0e(B . ?$,2@E(B)
(?(0f(B . ?$,2@F(B)
(?(0g(B . ?$,2@G(B)
(?(0h(B . ?$,2@H(B)
(?(0i(B . ?$,2@I(B)))
(lao
'((?(1!(B . ?$,1D!(B)
(?(1"(B . ?$,1D"(B)
(?(1$(B . ?$,1D$(B)
(?(1'(B . ?$,1D'(B)
(?(1((B . ?$,1D((B)
(?(1*(B . ?$,1D*(B)
(?(1-(B . ?$,1D-(B)
(?(14(B . ?$,1D4(B)
(?(15(B . ?$,1D5(B)
(?(16(B . ?$,1D6(B)
(?(17(B . ?$,1D7(B)
(?(19(B . ?$,1D9(B)
(?(1:(B . ?$,1D:(B)
(?(1;(B . ?$,1D;(B)
(?(1<(B . ?$,1D<(B)
(?(1=(B . ?$,1D=(B)
(?(1>(B . ?$,1D>(B)
(?(1?(B . ?$,1D?(B)
(?(1A(B . ?$,1DA(B)
(?(1B(B . ?$,1DB(B)
(?(1C(B . ?$,1DC(B)
(?(1E(B . ?$,1DE(B)
(?(1G(B . ?$,1DG(B)
(?(1J(B . ?$,1DJ(B)
(?(1K(B . ?$,1DK(B)
(?(1M(B . ?$,1DM(B)
(?(1N(B . ?$,1DN(B)
(?(1O(B . ?$,1DO(B)
(?(1P(B . ?$,1DP(B)
(?(1Q(B . ?$,1DQ(B)
(?(1R(B . ?$,1DR(B)
(?(1S(B . ?$,1DS(B)
(?(1T(B . ?$,1DT(B)
(?(1U(B . ?$,1DU(B)
(?(1V(B . ?$,1DV(B)
(?(1W(B . ?$,1DW(B)
(?(1X(B . ?$,1DX(B)
(?(1Y(B . ?$,1DY(B)
(?(1[(B . ?$,1D[(B)
(?(1\(B . ?$,1D\(B)
(?(1](B . ?$,1D](B)
(?(1`(B . ?$,1D`(B)
(?(1a(B . ?$,1Da(B)
(?(1b(B . ?$,1Db(B)
(?(1c(B . ?$,1Dc(B)
(?(1d(B . ?$,1Dd(B)
(?(1f(B . ?$,1Df(B)
(?(1h(B . ?$,1Dh(B)
(?(1i(B . ?$,1Di(B)
(?(1j(B . ?$,1Dj(B)
(?(1k(B . ?$,1Dk(B)
(?(1l(B . ?$,1Dl(B)
(?(1m(B . ?$,1Dm(B)
(?(1p(B . ?$,1Dp(B)
(?(1q(B . ?$,1Dq(B)
(?(1r(B . ?$,1Dr(B)
(?(1s(B . ?$,1Ds(B)
(?(1t(B . ?$,1Dt(B)
(?(1u(B . ?$,1Du(B)
(?(1v(B . ?$,1Dv(B)
(?(1w(B . ?$,1Dw(B)
(?(1x(B . ?$,1Dx(B)
(?(1y(B . ?$,1Dy(B)
(?(1|(B . ?$,1D|(B)
(?(1}(B . ?$,1D}(B)))
(other
'(
;; latin-jisx0201 is mostly decoded to ascii, with these
;; exceptions, so we don't bother with tables for the whole
;; thing.
(?(J\(B . ?,A%(B)
(?(J~(B . ?$,1s>(B))))
(let ((table (make-char-table 'safe-chars))
safe-charsets)
(dolist (cs '(vietnamese-viscii lao chinese-sisheng ipa
katakana-jisx0201 thai-tis620 tibetan-iso-8bit
indian-is13194 ethiopic other))
;; These tables could be used as translation-table-for-encode by
;; the relevant coding systems.
(let ((encode-translator
(if (coding-system-p cs)
(set (intern (format "ucs-%s-encode-table" cs))
(make-translation-table)))))
(dolist (pair (symbol-value cs))
(aset ucs-mule-to-mule-unicode (car pair) (cdr pair))
(if encode-translator
(aset encode-translator (cdr pair) (car pair))))
(if encode-translator
(optimize-char-table encode-translator))
(if (charsetp cs)
(push cs safe-charsets)
(if (coding-system-p cs)
(setq safe-charsets
(append (delq 'ascii (coding-system-get cs 'safe-charsets))
safe-charsets))))
(cond ((eq cs 'vietnamese-viscii)
(coding-system-put 'vietnamese-viscii
'translation-table-for-input
encode-translator)
(coding-system-put 'vietnamese-viqr
'translation-table-for-input
encode-translator))
((memq cs '(lao thai-tis620 tibetan-iso-8bit))
(coding-system-put cs 'translation-table-for-input
encode-translator)))))
(dolist (c safe-charsets)
(aset table (make-char c) t))))
(define-minor-mode unify-8859-on-encoding-mode
"Set up translation-tables for unifying ISO 8859 characters on encoding.
The ISO 8859 characters sets overlap, e.g. 8859-1 (Latin-1) and
8859-15 (Latin-9) differ only in a few characters. Emacs normally
distinguishes equivalent characters from those ISO-8859 character sets
which are built in to Emacs. This behavior is essentially inherited
from the European-originated international standards. Treating them
equivalently, by translating to and from a single representation is
called `unification'. (The `utf-8' coding system treats the
characters of European scripts in a unified manner.)
In this mode, on encoding -- i.e. output operations -- non-ASCII
characters from the built-in ISO 8859 and `mule-unicode-0100-24ff'
charsets are handled automatically by the coding system used if it can
represent them. Thus, say, an e-acute from the Latin-1 charset (the
unified representation) in a buffer saved as Latin-9 will be encoded
directly to a byte value 233. By default, in contrast, you would be
prompted for a general coding system to use for saving the file, which
can cope with separate Latin-1 and Latin-9 representations of e-acute.
Also sets hooks that arrange `translation-table-for-input' to be set
up locally. This will often allow input generated by Quail input
methods to conform with what the buffer's file coding system can
encode. Thus you could use a Latin-2 input method to search for
e-acute in a Latin-1 buffer.
See also command `unify-8859-on-decoding-mode'."
:group 'mule
:global t
:init-value t
(if unify-8859-on-encoding-mode
(ucs-unify-8859 t nil)
(ucs-fragment-8859 t nil)))
(custom-add-version 'unify-8859-on-encoding-mode "21.3")
(define-minor-mode unify-8859-on-decoding-mode
"Set up translation-tables for unifying ISO 8859 characters on decoding.
On decoding, i.e. input operations, non-ASCII characters from the
built-in ISO 8859 charsets are unified by mapping them into the
`iso-latin-1' and `mule-unicode-0100-24ff' charsets.
Also sets `translation-table-for-input' globally, so that keyboard input
produces unified characters.
See also command `unify-8859-on-encoding-mode' and the user option
`utf-fragment-on-decoding'."
:group 'mule
:global t
:init-value nil
(if unify-8859-on-decoding-mode
(ucs-unify-8859 nil t)
(ucs-fragment-8859 nil t)))
(custom-add-version 'unify-8859-on-decoding-mode "21.3")
;; Synchronize the status with the initial value of
;; unify-8859-on-encoding-mode and unify-8859-on-decoding-mode.
(ucs-unify-8859 t nil)
;; Arrange to set up the translation-table for keyboard input. This
;; is called from get-buffer-create, set-buffer-file-coding-system,
;; normal-mode and minibuffer-setup-hook.
(defun ucs-set-table-for-input (&optional buffer)
"Set up an appropriate `translation-table-for-input' for BUFFER.
BUFFER defaults to the current buffer. This function is
automatically called directly at the end of `get-buffer-create'."
(when (and unify-8859-on-encoding-mode
(not unify-8859-on-decoding-mode)
(char-table-p translation-table-for-input))
(let ((cs (and buffer-file-coding-system
(coding-system-base buffer-file-coding-system)))
table)
(if (or (null cs)
(eq cs 'undecided))
(setq cs
(and default-buffer-file-coding-system
(coding-system-base default-buffer-file-coding-system))))
(when cs
(setq table (coding-system-get cs 'translation-table-for-encode))
(if (and table (symbolp table))
(setq table (get table 'translation-table)))
(unless (char-table-p table)
(setq table (coding-system-get cs 'translation-table-for-input))
(if (and table (symbolp table))
(setq table (get table 'translation-table))))
(when (char-table-p table)
(if buffer
(with-current-buffer buffer
(set (make-local-variable 'translation-table-for-input)
table))
(set (make-local-variable 'translation-table-for-input)
table)))))))
;; The minibuffer needs to acquire a `buffer-file-coding-system' for
;; the above to work in it.
(defun ucs-minibuffer-setup ()
"Set up an appropriate `buffer-file-coding-system' for current buffer.
Intended to be added to `minibuffer-setup-hook'."
(set (make-local-variable 'buffer-file-coding-system)
(with-current-buffer (let ((win (minibuffer-selected-window)))
(if (window-live-p win) (window-buffer win)
(cadr (buffer-list))))
buffer-file-coding-system))
(ucs-set-table-for-input))
(provide 'ucs-tables)
;; arch-tag: b497e22b-7fe1-486a-9352-e2d7f7d76a76
;;; ucs-tables.el ends here