diff options
Diffstat (limited to 'lisp/language/ind-util.el')
| -rw-r--r-- | lisp/language/ind-util.el | 1098 |
1 files changed, 549 insertions, 549 deletions
diff --git a/lisp/language/ind-util.el b/lisp/language/ind-util.el index 8964da1ea13..c8df282e6e9 100644 --- a/lisp/language/ind-util.el +++ b/lisp/language/ind-util.el @@ -1,4 +1,4 @@ -;;; ind-util.el --- Transliteration and Misc. Tools for Indian Languages -*- coding: iso-2022-7bit; -*- +;;; ind-util.el --- Transliteration and Misc. Tools for Indian Languages -*- coding: utf-8-emacs; -*- ;; Copyright (C) 2001-2013 Free Software Foundation, Inc. @@ -47,233 +47,233 @@ (defvar indian-dev-base-table '( (;; VOWELS (18) - (?$,15E(B nil) (?$,15F(B ?$,15~(B) (?$,15G(B ?$,15(B) (?$,15H(B ?$,16 (B) (?$,15I(B ?$,16!(B) (?$,15J(B ?$,16"(B) - (?$,15K(B ?$,16#(B) (?$,15L(B ?$,16B(B) (?$,15M(B ?$,16%(B) (?$,15N(B ?$,16&(B) (?$,15O(B ?$,16'(B) (?$,15P(B ?$,16((B) - (?$,15Q(B ?$,16)(B) (?$,15R(B ?$,16*(B) (?$,15S(B ?$,16+(B) (?$,15T(B ?$,16,(B) (?$,16@(B ?$,16$(B) (?$,16A(B ?$,16C(B)) + (?अ nil) (?आ ?ा) (?इ ?ि) (?ई ?ी) (?उ ?ु) (?ऊ ?ू) + (?ऋ ?ृ) (?ऌ ?ॢ) (?ऍ ?ॅ) (?ऎ ?ॆ) (?ए ?े) (?ऐ ?ै) + (?ऑ ?ॉ) (?ऒ ?ॊ) (?ओ ?ो) (?औ ?ौ) (?ॠ ?ॄ) (?ॡ ?ॣ)) (;; CONSONANTS (currently 42, including special cases) - ?$,15U(B ?$,15V(B ?$,15W(B ?$,15X(B ?$,15Y(B ;; GUTTRULS - ?$,15Z(B ?$,15[(B ?$,15\(B ?$,15](B ?$,15^(B ;; PALATALS - ?$,15_(B ?$,15`(B ?$,15a(B ?$,15b(B ?$,15c(B ;; CEREBRALS - ?$,15d(B ?$,15e(B ?$,15f(B ?$,15g(B ?$,15h(B ?$,15i(B ;; DENTALS - ?$,15j(B ?$,15k(B ?$,15l(B ?$,15m(B ?$,15n(B ;; LABIALS - ?$,15o(B ?$,15p(B ?$,15q(B ?$,15r(B ?$,15s(B ?$,15t(B ?$,15u(B ;; SEMIVOWELS - ?$,15v(B ?$,15w(B ?$,15x(B ?$,15y(B ;; SIBILANTS - ?$,168(B ?$,169(B ?$,16:(B ?$,16;(B ?$,16<(B ?$,16=(B ?$,16>(B ?$,16?(B ;; NUKTAS - "$,15\6-5^(B" "$,15U6-5w(B") + ?क ?ख ?ग ?घ ?ङ ;; GUTTRULS + ?च ?छ ?ज ?झ ?ञ ;; PALATALS + ?ट ?ठ ?ड ?ढ ?ण ;; CEREBRALS + ?त ?थ ?द ?ध ?न ?ऩ ;; DENTALS + ?प ?फ ?ब ?भ ?म ;; LABIALS + ?य ?र ?ऱ ?ल ?ळ ?ऴ ?व ;; SEMIVOWELS + ?श ?ष ?स ?ह ;; SIBILANTS + ?क़ ?ख़ ?ग़ ?ज़ ?ड़ ?ढ़ ?फ़ ?य़ ;; NUKTAS + "ज्ञ" "क्ष") (;; Misc Symbols (7) - ?$,15A(B ?$,15B(B ?$,15C(B ?$,15}(B ?$,16-(B ?$,160(B ?$,16D(B) + ?ँ ?ं ?ः ?ऽ ?् ?ॐ ?।) (;; Digits (10) - ?$,16F(B ?$,16G(B ?$,16H(B ?$,16I(B ?$,16J(B ?$,16K(B ?$,16L(B ?$,16M(B ?$,16N(B ?$,16O(B) + ?० ?१ ?२ ?३ ?४ ?५ ?६ ?७ ?८ ?९) (;; Inscript-extra (4) (#, $, ^, *, ]) - "$,16-5p(B" "$,15p6-(B" "$,15d6-5p(B" "$,15v6-5p(B" "$,15|(B"))) + "्र" "र्" "त्र" "श्र" "़"))) ;; Punjabi is also known as Gurmukhi. (defvar indian-pnj-base-table '( (;; VOWELS - (?$,18%(B nil) (?$,18&(B ?$,18^(B) (?$,18'(B ?$,18_(B) (?$,18((B ?$,18`(B) (?$,18)(B ?$,18a(B) (?$,18*(B ?$,18b(B) - nil nil nil nil (?$,18/(B ?$,18g(B) (?$,180(B ?$,18h(B) - nil nil (?$,183(B ?$,18k(B) (?$,184(B ?$,18l(B) nil nil) + (?ਅ nil) (?ਆ ?ਾ) (?ਇ ?ਿ) (?ਈ ?ੀ) (?ਉ ?ੁ) (?ਊ ?ੂ) + nil nil nil nil (?ਏ ?ੇ) (?ਐ ?ੈ) + nil nil (?ਓ ?ੋ) (?ਔ ?ੌ) nil nil) (;; CONSONANTS - ?$,185(B ?$,186(B ?$,187(B ?$,188(B ?$,189(B ;; GUTTRULS - ?$,18:(B ?$,18;(B ?$,18<(B ?$,18=(B ?$,18>(B ;; PALATALS - ?$,18?(B ?$,18@(B ?$,18A(B ?$,18B(B ?$,18C(B ;; CEREBRALS - ?$,18D(B ?$,18E(B ?$,18F(B ?$,18G(B ?$,18H(B nil ;; DENTALS - ?$,18J(B ?$,18K(B ?$,18L(B ?$,18M(B ?$,18N(B ;; LABIALS - ?$,18O(B ?$,18P(B nil ?$,18R(B ?$,18S(B nil ?$,18U(B ;; SEMIVOWELS - ?$,18V(B nil ?$,18X(B ?$,18Y(B ;; SIBILANTS - nil ?$,18y(B ?$,18z(B ?$,18{(B ?$,18|(B nil ?$,18~(B nil ;; NUKTAS - "$,18<8m8>(B" nil) + ?ਕ ?ਖ ?ਗ ?ਘ ?ਙ ;; GUTTRULS + ?ਚ ?ਛ ?ਜ ?ਝ ?ਞ ;; PALATALS + ?ਟ ?ਠ ?ਡ ?ਢ ?ਣ ;; CEREBRALS + ?ਤ ?ਥ ?ਦ ?ਧ ?ਨ nil ;; DENTALS + ?ਪ ?ਫ ?ਬ ?ਭ ?ਮ ;; LABIALS + ?ਯ ?ਰ nil ?ਲ ?ਲ਼ nil ?ਵ ;; SEMIVOWELS + ?ਸ਼ nil ?ਸ ?ਹ ;; SIBILANTS + nil ?ਖ਼ ?ਗ਼ ?ਜ਼ ?ੜ nil ?ਫ਼ nil ;; NUKTAS + "ਜ੍ਞ" nil) (;; Misc Symbols (7) - nil ?$,18"(B nil nil ?$,18m(B nil nil) ;; ek onkar, etc. + nil ?ਂ nil nil ?੍ nil nil) ;; ek onkar, etc. (;; Digits - ?$,19&(B ?$,19'(B ?$,19((B ?$,19)(B ?$,19*(B ?$,19+(B ?$,19,(B ?$,19-(B ?$,19.(B ?$,19/(B) + ?੦ ?੧ ?੨ ?੩ ?੪ ?੫ ?੬ ?੭ ?੮ ?੯) (;; Inscript-extra (4) (#, $, ^, *, ]) - "$,18m8P(B" "$,18P8m(B" "$,18D8m8P(B" "$,18V8m8P(B" "$,18\(B"))) + "੍ਰ" "ਰ੍" "ਤ੍ਰ" "ਸ਼੍ਰ" "਼"))) (defvar indian-gjr-base-table '( (;; VOWELS - (?$,19E(B nil) (?$,19F(B ?$,19~(B) (?$,19G(B ?$,19(B) (?$,19H(B ?$,1: (B) (?$,19I(B ?$,1:!(B) (?$,19J(B ?$,1:"(B) - (?$,19K(B ?$,1:#(B) nil (?$,19M(B ?$,1:%(B) nil (?$,19O(B ?$,1:'(B) (?$,19P(B ?$,1:((B) - (?$,19Q(B ?$,1:)(B) nil (?$,19S(B ?$,1:+(B) (?$,19T(B ?$,1:,(B) (?$,1:@(B ?$,1:$(B) nil) + (?અ nil) (?આ ?ા) (?ઇ ?િ) (?ઈ ?ી) (?ઉ ?ુ) (?ઊ ?ૂ) + (?ઋ ?ૃ) nil (?ઍ ?ૅ) nil (?એ ?ે) (?ઐ ?ૈ) + (?ઑ ?ૉ) nil (?ઓ ?ો) (?ઔ ?ૌ) (?ૠ ?ૄ) nil) (;; CONSONANTS - ?$,19U(B ?$,19V(B ?$,19W(B ?$,19X(B ?$,19Y(B ;; GUTTRULS - ?$,19Z(B ?$,19[(B ?$,19\(B ?$,19](B ?$,19^(B ;; PALATALS - ?$,19_(B ?$,19`(B ?$,19a(B ?$,19b(B ?$,19c(B ;; CEREBRALS - ?$,19d(B ?$,19e(B ?$,19f(B ?$,19g(B ?$,19h(B nil ;; DENTALS - ?$,19j(B ?$,19k(B ?$,19l(B ?$,19m(B ?$,19n(B ;; LABIALS - ?$,19o(B ?$,19p(B nil ?$,19r(B ?$,19s(B nil ?$,19u(B ;; SEMIVOWELS - ?$,19v(B ?$,19w(B ?$,19x(B ?$,19y(B ;; SIBILANTS + ?ક ?ખ ?ગ ?ઘ ?ઙ ;; GUTTRULS + ?ચ ?છ ?જ ?ઝ ?ઞ ;; PALATALS + ?ટ ?ઠ ?ડ ?ઢ ?ણ ;; CEREBRALS + ?ત ?થ ?દ ?ધ ?ન nil ;; DENTALS + ?પ ?ફ ?બ ?ભ ?મ ;; LABIALS + ?ય ?ર nil ?લ ?ળ nil ?વ ;; SEMIVOWELS + ?શ ?ષ ?સ ?હ ;; SIBILANTS nil nil nil nil nil nil nil nil ;; NUKTAS - "$,19\:-9^(B" "$,19U:-9w(B") + "જ્ઞ" "ક્ષ") (;; Misc Symbols (7) - ?$,19A(B ?$,19B(B ?$,19C(B ?$,19}(B ?$,1:-(B ?$,1:0(B nil) + ?ઁ ?ં ?ઃ ?ઽ ?્ ?ૐ nil) (;; Digits - ?$,1:F(B ?$,1:G(B ?$,1:H(B ?$,1:I(B ?$,1:J(B ?$,1:K(B ?$,1:L(B ?$,1:M(B ?$,1:N(B ?$,1:O(B) + ?૦ ?૧ ?૨ ?૩ ?૪ ?૫ ?૬ ?૭ ?૮ ?૯) (;; Inscript-extra (4) (#, $, ^, *, ]) - "$,1:-9p(B" "$,19p:-(B" "$,19d:-9p(B" "$,19v:-9p(B" "$,19|(B"))) + "્ર" "ર્" "ત્ર" "શ્ર" "઼"))) (defvar indian-ori-base-table '( (;; VOWELS - (?$,1:e(B nil) (?$,1:f(B ?$,1;>(B) (?$,1:g(B ?$,1;?(B) (?$,1:h(B ?$,1;@(B) (?$,1:i(B ?$,1;A(B) (?$,1:j(B ?$,1;B(B) - (?$,1:k(B ?$,1;C(B) (?$,1:l(B nil) nil nil (?$,1:o(B ?$,1;G(B) (?$,1:p(B ?$,1;H(B) - nil nil (?$,1:s(B ?$,1;K(B) (?$,1:t(B ?$,1;L(B) (?$,1;`(B nil) (?$,1;a(B nil)) + (?ଅ nil) (?ଆ ?ା) (?ଇ ?ି) (?ଈ ?ୀ) (?ଉ ?ୁ) (?ଊ ?ୂ) + (?ଋ ?ୃ) (?ଌ nil) nil nil (?ଏ ?େ) (?ଐ ?ୈ) + nil nil (?ଓ ?ୋ) (?ଔ ?ୌ) (?ୠ nil) (?ୡ nil)) (;; CONSONANTS - ?$,1:u(B ?$,1:v(B ?$,1:w(B ?$,1:x(B ?$,1:y(B ;; GUTTRULS - ?$,1:z(B ?$,1:{(B ?$,1:|(B ?$,1:}(B ?$,1:~(B ;; PALATALS - ?$,1:(B ?$,1; (B ?$,1;!(B ?$,1;"(B ?$,1;#(B ;; CEREBRALS - ?$,1;$(B ?$,1;%(B ?$,1;&(B ?$,1;'(B ?$,1;((B nil ;; DENTALS - ?$,1;*(B ?$,1;+(B ?$,1;,(B ?$,1;-(B ?$,1;.(B ;; LABIALS - ?$,1;/(B ?$,1;0(B nil ?$,1;2(B ?$,1;3(B nil nil ;; SEMIVOWELS - ?$,1;6(B ?$,1;7(B ?$,1;8(B ?$,1;9(B ;; SIBILANTS - nil nil nil nil ?$,1;\(B ?$,1;](B nil ?$,1;_(B ;; NUKTAS - "$,1:|;M:~(B" "$,1:u;M;7(B") + ?କ ?ଖ ?ଗ ?ଘ ?ଙ ;; GUTTRULS + ?ଚ ?ଛ ?ଜ ?ଝ ?ଞ ;; PALATALS + ?ଟ ?ଠ ?ଡ ?ଢ ?ଣ ;; CEREBRALS + ?ତ ?ଥ ?ଦ ?ଧ ?ନ nil ;; DENTALS + ?ପ ?ଫ ?ବ ?ଭ ?ମ ;; LABIALS + ?ଯ ?ର nil ?ଲ ?ଳ nil nil ;; SEMIVOWELS + ?ଶ ?ଷ ?ସ ?ହ ;; SIBILANTS + nil nil nil nil ?ଡ଼ ?ଢ଼ nil ?ୟ ;; NUKTAS + "ଜ୍ଞ" "କ୍ଷ") (;; Misc Symbols - ?$,1:a(B ?$,1:b(B ?$,1:c(B ?$,1;=(B ?$,1;M(B nil nil) + ?ଁ ?ଂ ?ଃ ?ଽ ?୍ nil nil) (;; Digits - ?$,1;f(B ?$,1;g(B ?$,1;h(B ?$,1;i(B ?$,1;j(B ?$,1;k(B ?$,1;l(B ?$,1;m(B ?$,1;n(B ?$,1;o(B) + ?୦ ?୧ ?୨ ?୩ ?୪ ?୫ ?୬ ?୭ ?୮ ?୯) (;; Inscript-extra (4) (#, $, ^, *, ]) - "$,1;M;0(B" "$,1;0;M(B" "$,1;$;M;0(B" "$,1;6;M;0(B" "$,1;<(B"))) + "୍ର" "ର୍" "ତ୍ର" "ଶ୍ର" "଼"))) (defvar indian-bng-base-table '( (;; VOWELS - (?$,16e(B nil) (?$,16f(B ?$,17>(B) (?$,16g(B ?$,17?(B) (?$,16h(B ?$,17@(B) (?$,16i(B ?$,17A(B) (?$,16j(B ?$,17B(B) - (?$,16k(B ?$,17C(B) (?$,16l(B ?$,17b(B) nil nil (?$,16o(B ?$,17G(B) (?$,16p(B ?$,17H(B) - nil nil (?$,16s(B ?$,17K(B) (?$,16t(B ?$,17L(B) (?$,17`(B ?$,17D(B) (?$,17a(B ?$,17c(B)) + (?অ nil) (?আ ?া) (?ই ?ি) (?ঈ ?ী) (?উ ?ু) (?ঊ ?ূ) + (?ঋ ?ৃ) (?ঌ ?ৢ) nil nil (?এ ?ে) (?ঐ ?ৈ) + nil nil (?ও ?ো) (?ঔ ?ৌ) (?ৠ ?ৄ) (?ৡ ?ৣ)) (;; CONSONANTS - ?$,16u(B ?$,16v(B ?$,16w(B ?$,16x(B ?$,16y(B ;; GUTTRULS - ?$,16z(B ?$,16{(B ?$,16|(B ?$,16}(B ?$,16~(B ;; PALATALS - ?$,16(B ?$,17 (B ?$,17!(B ?$,17"(B ?$,17#(B ;; CEREBRALS - ?$,17$(B ?$,17%(B ?$,17&(B ?$,17'(B ?$,17((B nil ;; DENTALS - ?$,17*(B ?$,17+(B ?$,17,(B ?$,17-(B ?$,17.(B ;; LABIALS - ?$,17/(B ?$,170(B nil ?$,172(B nil nil nil ;; SEMIVOWELS - ?$,176(B ?$,177(B ?$,178(B ?$,179(B ;; SIBILANTS - nil nil nil nil ?$,17\(B ?$,17](B nil ?$,17_(B ;; NUKTAS - "$,16|7M6~(B" "$,16u7M77(B") + ?ক ?খ ?গ ?ঘ ?ঙ ;; GUTTRULS + ?চ ?ছ ?জ ?ঝ ?ঞ ;; PALATALS + ?ট ?ঠ ?ড ?ঢ ?ণ ;; CEREBRALS + ?ত ?থ ?দ ?ধ ?ন nil ;; DENTALS + ?প ?ফ ?ব ?ভ ?ম ;; LABIALS + ?য ?র nil ?ল nil nil nil ;; SEMIVOWELS + ?শ ?ষ ?স ?হ ;; SIBILANTS + nil nil nil nil ?ড় ?ঢ় nil ?য় ;; NUKTAS + "জ্ঞ" "ক্ষ") (;; Misc Symbols - ?$,16a(B ?$,16b(B ?$,16c(B nil ?$,17M(B nil nil) + ?ঁ ?ং ?ঃ nil ?্ nil nil) (;; Digits - ?$,17f(B ?$,17g(B ?$,17h(B ?$,17i(B ?$,17j(B ?$,17k(B ?$,17l(B ?$,17m(B ?$,17n(B ?$,17o(B) + ?০ ?১ ?২ ?৩ ?৪ ?৫ ?৬ ?৭ ?৮ ?৯) (;; Inscript-extra (4) (#, $, ^, *, ]) - "$,17M70(B" "$,1707M(B" "$,17$7M70(B" "$,1767M70(B" "$,17<(B"))) + "্র" "র্" "ত্র" "শ্র" "়"))) (defvar indian-asm-base-table '( (;; VOWELS - (?$,16e(B nil) (?$,16f(B ?$,17>(B) (?$,16g(B ?$,17?(B) (?$,16h(B ?$,17@(B) (?$,16i(B ?$,17A(B) (?$,16j(B ?$,17B(B) - (?$,16k(B ?$,17C(B) (?$,16l(B ?$,17b(B) nil nil (?$,16o(B ?$,17G(B) (?$,16p(B ?$,17H(B) - nil nil (?$,16s(B ?$,17K(B) (?$,16t(B ?$,17L(B) (?$,17`(B ?$,17D(B) (?$,17a(B ?$,17c(B)) + (?অ nil) (?আ ?া) (?ই ?ি) (?ঈ ?ী) (?উ ?ু) (?ঊ ?ূ) + (?ঋ ?ৃ) (?ঌ ?ৢ) nil nil (?এ ?ে) (?ঐ ?ৈ) + nil nil (?ও ?ো) (?ঔ ?ৌ) (?ৠ ?ৄ) (?ৡ ?ৣ)) (;; CONSONANTS - ?$,16u(B ?$,16v(B ?$,16w(B ?$,16x(B ?$,16y(B ;; GUTTRULS - ?$,16z(B ?$,16{(B ?$,16|(B ?$,16}(B ?$,16~(B ;; PALATALS - ?$,16(B ?$,17 (B ?$,17!(B ?$,17"(B ?$,17#(B ;; CEREBRALS - ?$,17$(B ?$,17%(B ?$,17&(B ?$,17'(B ?$,17((B nil ;; DENTALS - ?$,17*(B ?$,17+(B ?$,17,(B ?$,17-(B ?$,17.(B ;; LABIALS - ?$,17/(B ?$,17p(B nil ?$,172(B nil nil ?$,17q(B ;; SEMIVOWELS - ?$,176(B ?$,177(B ?$,178(B ?$,179(B ;; SIBILANTS - nil nil nil nil ?$,17\(B ?$,17](B nil ?$,17_(B ;; NUKTAS - "$,16|7M6~(B" "$,16u7M77(B") + ?ক ?খ ?গ ?ঘ ?ঙ ;; GUTTRULS + ?চ ?ছ ?জ ?ঝ ?ঞ ;; PALATALS + ?ট ?ঠ ?ড ?ঢ ?ণ ;; CEREBRALS + ?ত ?থ ?দ ?ধ ?ন nil ;; DENTALS + ?প ?ফ ?ব ?ভ ?ম ;; LABIALS + ?য ?ৰ nil ?ল nil nil ?ৱ ;; SEMIVOWELS + ?শ ?ষ ?স ?হ ;; SIBILANTS + nil nil nil nil ?ড় ?ঢ় nil ?য় ;; NUKTAS + "জ্ঞ" "ক্ষ") (;; Misc Symbols - ?$,16a(B ?$,16b(B ?$,16c(B nil ?$,17M(B nil nil) + ?ঁ ?ং ?ঃ nil ?্ nil nil) (;; Digits - ?$,17f(B ?$,17g(B ?$,17h(B ?$,17i(B ?$,17j(B ?$,17k(B ?$,17l(B ?$,17m(B ?$,17n(B ?$,17o(B) + ?০ ?১ ?২ ?৩ ?৪ ?৫ ?৬ ?৭ ?৮ ?৯) (;; Inscript-extra (4) (#, $, ^, *, ]) - "$,17M7p(B" "$,17p7M(B" "$,17$7M7p(B" "$,1767M7p(B" "$,17<(B"))) + "্ৰ" "ৰ্" "ত্ৰ" "শ্ৰ" "়"))) (defvar indian-tlg-base-table '( (;; VOWELS - (?$,1=E(B nil) (?$,1=F(B ?$,1=~(B) (?$,1=G(B ?$,1=(B) (?$,1=H(B ?$,1> (B) (?$,1=I(B ?$,1>!(B) (?$,1=J(B ?$,1>"(B) - (?$,1=K(B ?$,1>#(B) (?$,1=L(B nil) nil (?$,1=O(B ?$,1>'(B) (?$,1=N(B ?$,1>&(B) (?$,1=P(B ?$,1>((B) - nil (?$,1=S(B ?$,1>+(B) (?$,1=R(B ?$,1>*(B) (?$,1=T(B ?$,1>,(B) (?$,1>@(B ?$,1>$(B) (?$,1>A(B nil)) + (?అ nil) (?ఆ ?ా) (?ఇ ?ి) (?ఈ ?ీ) (?ఉ ?ు) (?ఊ ?ూ) + (?ఋ ?ృ) (?ఌ nil) nil (?ఏ ?ే) (?ఎ ?ె) (?ఐ ?ై) + nil (?ఓ ?ో) (?ఒ ?ొ) (?ఔ ?ౌ) (?ౠ ?ౄ) (?ౡ nil)) (;; CONSONANTS - ?$,1=U(B ?$,1=V(B ?$,1=W(B ?$,1=X(B ?$,1=Y(B ;; GUTTRULS - ?$,1=Z(B ?$,1=[(B ?$,1=\(B ?$,1=](B ?$,1=^(B ;; PALATALS - ?$,1=_(B ?$,1=`(B ?$,1=a(B ?$,1=b(B ?$,1=c(B ;; CEREBRALS - ?$,1=d(B ?$,1=e(B ?$,1=f(B ?$,1=g(B ?$,1=h(B nil ;; DENTALS - ?$,1=j(B ?$,1=k(B ?$,1=l(B ?$,1=m(B ?$,1=n(B ;; LABIALS - ?$,1=o(B ?$,1=p(B ?$,1=q(B ?$,1=r(B ?$,1=s(B nil ?$,1=u(B ;; SEMIVOWELS - ?$,1=v(B ?$,1=w(B ?$,1=x(B ?$,1=y(B ;; SIBILANTS + ?క ?ఖ ?గ ?ఘ ?ఙ ;; GUTTRULS + ?చ ?ఛ ?జ ?ఝ ?ఞ ;; PALATALS + ?ట ?ఠ ?డ ?ఢ ?ణ ;; CEREBRALS + ?త ?థ ?ద ?ధ ?న nil ;; DENTALS + ?ప ?ఫ ?బ ?భ ?మ ;; LABIALS + ?య ?ర ?ఱ ?ల ?ళ nil ?వ ;; SEMIVOWELS + ?శ ?ష ?స ?హ ;; SIBILANTS nil nil nil nil nil nil nil nil ;; NUKTAS - "$,1=\>-=^(B" "$,1=U>-=w(B") + "జ్ఞ" "క్ష") (;; Misc Symbols - ?$,1=A(B ?$,1=B(B ?$,1=C(B nil ?$,1>-(B nil nil) + ?ఁ ?ం ?ః nil ?్ nil nil) (;; Digits - ?$,1>F(B ?$,1>G(B ?$,1>H(B ?$,1>I(B ?$,1>J(B ?$,1>K(B ?$,1>L(B ?$,1>M(B ?$,1>N(B ?$,1>O(B) + ?౦ ?౧ ?౨ ?౩ ?౪ ?౫ ?౬ ?౭ ?౮ ?౯) (;; Inscript-extra (4) (#, $, ^, *, ]) - "$,1>-=p(B" "$,1=p>-(B" "$,1=d>-=p(B" "$,1=v>-=p(B" nil))) + "్ర" "ర్" "త్ర" "శ్ర" nil))) (defvar indian-knd-base-table '( (;; VOWELS - (?$,1>e(B nil) (?$,1>f(B ?$,1?>(B) (?$,1>g(B ?$,1??(B) (?$,1>h(B ?$,1?@(B) (?$,1>i(B ?$,1?A(B) (?$,1>j(B ?$,1?B(B) - (?$,1>k(B ?$,1?C(B) (?$,1>l(B nil) nil (?$,1>o(B ?$,1?G(B) (?$,1>n(B ?$,1?F(B) (?$,1>p(B ?$,1?H(B) - nil (?$,1>s(B ?$,1?K(B) (?$,1>r(B ?$,1?J(B) (?$,1>t(B ?$,1?L(B) (?$,1?`(B ?$,1?D(B) (?$,1?a(B nil)) + (?ಅ nil) (?ಆ ?ಾ) (?ಇ ?ಿ) (?ಈ ?ೀ) (?ಉ ?ು) (?ಊ ?ೂ) + (?ಋ ?ೃ) (?ಌ nil) nil (?ಏ ?ೇ) (?ಎ ?ೆ) (?ಐ ?ೈ) + nil (?ಓ ?ೋ) (?ಒ ?ೊ) (?ಔ ?ೌ) (?ೠ ?ೄ) (?ೡ nil)) (;; CONSONANTS - ?$,1>u(B ?$,1>v(B ?$,1>w(B ?$,1>x(B ?$,1>y(B ;; GUTTRULS - ?$,1>z(B ?$,1>{(B ?$,1>|(B ?$,1>}(B ?$,1>~(B ;; PALATALS - ?$,1>(B ?$,1? (B ?$,1?!(B ?$,1?"(B ?$,1?#(B ;; CEREBRALS - ?$,1?$(B ?$,1?%(B ?$,1?&(B ?$,1?'(B ?$,1?((B nil ;; DENTALS - ?$,1?*(B ?$,1?+(B ?$,1?,(B ?$,1?-(B ?$,1?.(B ;; LABIALS - ?$,1?/(B ?$,1?0(B ?$,1?1(B ?$,1?2(B ?$,1?3(B nil ?$,1?5(B ;; SEMIVOWELS - ?$,1?6(B ?$,1?7(B ?$,1?8(B ?$,1?9(B ;; SIBILANTS - nil nil nil nil nil nil ?$,1?^(B nil ;; NUKTAS - "$,1>|?M>~(B" "$,1>u?M?7(B") + ?ಕ ?ಖ ?ಗ ?ಘ ?ಙ ;; GUTTRULS + ?ಚ ?ಛ ?ಜ ?ಝ ?ಞ ;; PALATALS + ?ಟ ?ಠ ?ಡ ?ಢ ?ಣ ;; CEREBRALS + ?ತ ?ಥ ?ದ ?ಧ ?ನ nil ;; DENTALS + ?ಪ ?ಫ ?ಬ ?ಭ ?ಮ ;; LABIALS + ?ಯ ?ರ ?ಱ ?ಲ ?ಳ nil ?ವ ;; SEMIVOWELS + ?ಶ ?ಷ ?ಸ ?ಹ ;; SIBILANTS + nil nil nil nil nil nil ?ೞ nil ;; NUKTAS + "ಜ್ಞ" "ಕ್ಷ") (;; Misc Symbols - nil ?$,1>b(B ?$,1>c(B nil ?$,1?M(B nil nil) + nil ?ಂ ?ಃ nil ?್ nil nil) (;; Digits - ?$,1?f(B ?$,1?g(B ?$,1?h(B ?$,1?i(B ?$,1?j(B ?$,1?k(B ?$,1?l(B ?$,1?m(B ?$,1?n(B ?$,1?o(B) + ?೦ ?೧ ?೨ ?೩ ?೪ ?೫ ?೬ ?೭ ?೮ ?೯) (;; Inscript-extra (4) (#, $, ^, *, ]) - "$,1?M?0(B" "$,1?0?M(B" "$,1?$?M?0(B" "$,1?6?M?0(B" nil))) + "್ರ" "ರ್" "ತ್ರ" "ಶ್ರ" nil))) (defvar indian-mlm-base-table '( (;; VOWELS - (?$,1@%(B nil) (?$,1@&(B ?$,1@^(B) (?$,1@'(B ?$,1@_(B) (?$,1@((B ?$,1@`(B) (?$,1@)(B ?$,1@a(B) (?$,1@*(B ?$,1@b(B) - (?$,1@+(B ?$,1@c(B) (?$,1@,(B nil) nil (?$,1@/(B ?$,1@g(B) (?$,1@.(B ?$,1@f(B) (?$,1@0(B ?$,1@h(B) - nil (?$,1@3(B ?$,1@k(B) (?$,1@2(B ?$,1@j(B) (?$,1@4(B ?$,1@l(B) nil nil) + (?അ nil) (?ആ ?ാ) (?ഇ ?ി) (?ഈ ?ീ) (?ഉ ?ു) (?ഊ ?ൂ) + (?ഋ ?ൃ) (?ഌ nil) nil (?ഏ ?േ) (?എ ?െ) (?ഐ ?ൈ) + nil (?ഓ ?ോ) (?ഒ ?ൊ) (?ഔ ?ൌ) nil nil) (;; CONSONANTS - ?$,1@5(B ?$,1@6(B ?$,1@7(B ?$,1@8(B ?$,1@9(B ;; GUTTRULS - ?$,1@:(B ?$,1@;(B ?$,1@<(B ?$,1@=(B ?$,1@>(B ;; PALATALS - ?$,1@?(B ?$,1@@(B ?$,1@A(B ?$,1@B(B ?$,1@C(B ;; CEREBRALS - ?$,1@D(B ?$,1@E(B ?$,1@F(B ?$,1@G(B ?$,1@H(B nil ;; DENTALS - ?$,1@J(B ?$,1@K(B ?$,1@L(B ?$,1@M(B ?$,1@N(B ;; LABIALS - ?$,1@O(B ?$,1@P(B ?$,1@Q(B ?$,1@R(B ?$,1@S(B ?$,1@T(B ?$,1@U(B ;; SEMIVOWELS - ?$,1@V(B ?$,1@W(B ?$,1@X(B ?$,1@Y(B ;; SIBILANTS + ?ക ?ഖ ?ഗ ?ഘ ?ങ ;; GUTTRULS + ?ച ?ഛ ?ജ ?ഝ ?ഞ ;; PALATALS + ?ട ?ഠ ?ഡ ?ഢ ?ണ ;; CEREBRALS + ?ത ?ഥ ?ദ ?ധ ?ന nil ;; DENTALS + ?പ ?ഫ ?ബ ?ഭ ?മ ;; LABIALS + ?യ ?ര ?റ ?ല ?ള ?ഴ ?വ ;; SEMIVOWELS + ?ശ ?ഷ ?സ ?ഹ ;; SIBILANTS nil nil nil nil nil nil nil nil ;; NUKTAS - "$,1@<@m@>(B" "$,1@5@m@W(B") + "ജ്ഞ" "ക്ഷ") (;; Misc Symbols - nil ?$,1@"(B ?$,1@#(B nil ?$,1@m(B nil nil) + nil ?ം ?ഃ nil ?് nil nil) (;; Digits - ?$,1A&(B ?$,1A'(B ?$,1A((B ?$,1A)(B ?$,1A*(B ?$,1A+(B ?$,1A,(B ?$,1A-(B ?$,1A.(B ?$,1A/(B) + ?൦ ?൧ ?൨ ?൩ ?൪ ?൫ ?൬ ?൭ ?൮ ?൯) (;; Inscript-extra (4) (#, $, ^, *, ]) - "$,1@m@P(B" "$,1@P@m(B" "$,1@D@m@P(B" "$,1@V@m@P(B" nil))) + "്ര" "ര്" "ത്ര" "ശ്ര" nil))) (defvar indian-tml-base-table '( (;; VOWELS - (?$,1<%(B nil) (?$,1<&(B ?$,1<^(B) (?$,1<'(B ?$,1<_(B) (?$,1<((B ?$,1<`(B) (?$,1<)(B ?$,1<a(B) (?$,1<*(B ?$,1<b(B) - nil nil nil (?$,1</(B ?$,1<g(B) (?$,1<.(B ?$,1<f(B) (?$,1<0(B ?$,1<h(B) - nil (?$,1<3(B ?$,1<k(B) (?$,1<2(B ?$,1<j(B) (?$,1<4(B ?$,1<l(B) nil nil) + (?அ nil) (?ஆ ?ா) (?இ ?ி) (?ஈ ?ீ) (?உ ?ு) (?ஊ ?ூ) + nil nil nil (?ஏ ?ே) (?எ ?ெ) (?ஐ ?ை) + nil (?ஓ ?ோ) (?ஒ ?ொ) (?ஔ ?ௌ) nil nil) (;; CONSONANTS - ?$,1<5(B nil nil nil ?$,1<9(B ;; GUTTRULS - ?$,1<:(B nil ?$,1<<(B nil ?$,1<>(B ;; PALATALS - ?$,1<?(B nil nil nil ?$,1<C(B ;; CEREBRALS - ?$,1<D(B nil nil nil ?$,1<H(B ?$,1<I(B ;; DENTALS - ?$,1<J(B nil nil nil ?$,1<N(B ;; LABIALS - ?$,1<O(B ?$,1<P(B ?$,1<Q(B ?$,1<R(B ?$,1<S(B ?$,1<T(B ?$,1<U(B ;; SEMIVOWELS - nil ?$,1<W(B ?$,1<X(B ?$,1<Y(B ;; SIBILANTS + ?க nil nil nil ?ங ;; GUTTRULS + ?ச nil ?ஜ nil ?ஞ ;; PALATALS + ?ட nil nil nil ?ண ;; CEREBRALS + ?த nil nil nil ?ந ?ன ;; DENTALS + ?ப nil nil nil ?ம ;; LABIALS + ?ய ?ர ?ற ?ல ?ள ?ழ ?வ ;; SEMIVOWELS + nil ?ஷ ?ஸ ?ஹ ;; SIBILANTS nil nil nil nil nil nil nil nil ;; NUKTAS - "$,1<<<m<>(B" "$,1<5<m<W(B") + "ஜ்ஞ" "க்ஷ") (;; Misc Symbols - nil ?$,1<"(B ?$,1<#(B nil ?$,1<m(B nil nil) + nil ?ஂ ?ஃ nil ?் nil nil) (;; Digits - ?$,1=&(B ?$,1='(B ?$,1=((B ?$,1=)(B ?$,1=*(B ?$,1=+(B ?$,1=,(B ?$,1=-(B ?$,1=.(B ?$,1=/(B) + ?௦ ?௧ ?௨ ?௩ ?௪ ?௫ ?௬ ?௭ ?௮ ?௯) (;; Inscript-extra (4) (#, $, ^, *, ]) - "$,1<m<P(B" "$,1<P<m(B" "$,1<D<m<P(B" nil nil))) + "்ர" "ர்" "த்ர" nil nil))) (defvar indian-base-table-to-language-alist '((indian-dev-base-table . "Devanagari") @@ -588,117 +588,117 @@ ;;Unicode vs IS13194 ;; only Devanagari is supported now. ((ucs-devanagari-to-is13194-alist '((?\x0900 . "[U+0900]") - (?\x0901 . "(5!(B") - (?\x0902 . "(5"(B") - (?\x0903 . "(5#(B") + (?\x0901 . "") + (?\x0902 . "") + (?\x0903 . "") (?\x0904 . "[U+0904]") - (?\x0905 . "(5$(B") - (?\x0906 . "(5%(B") - (?\x0907 . "(5&(B") - (?\x0908 . "(5'(B") - (?\x0909 . "(5((B") - (?\x090a . "(5)(B") - (?\x090b . "(5*(B") - (?\x090c . "(5&i(B") - (?\x090d . "(5.(B") - (?\x090e . "(5+(B") - (?\x090f . "(5,(B") - (?\x0910 . "(5-(B") - (?\x0911 . "(52(B") - (?\x0912 . "(5/(B") - (?\x0913 . "(50(B") - (?\x0914 . "(51(B") - (?\x0915 . "(53(B") - (?\x0916 . "(54(B") - (?\x0917 . "(55(B") - (?\x0918 . "(56(B") - (?\x0919 . "(57(B") - (?\x091a . "(58(B") - (?\x091b . "(59(B") - (?\x091c . "(5:(B") - (?\x091d . "(5;(B") - (?\x091e . "(5<(B") - (?\x091f . "(5=(B") - (?\x0920 . "(5>(B") - (?\x0921 . "(5?(B") - (?\x0922 . "(5@(B") - (?\x0923 . "(5A(B") - (?\x0924 . "(5B(B") - (?\x0925 . "(5C(B") - (?\x0926 . "(5D(B") - (?\x0927 . "(5E(B") - (?\x0928 . "(5F(B") - (?\x0929 . "(5G(B") - (?\x092a . "(5H(B") - (?\x092b . "(5I(B") - (?\x092c . "(5J(B") - (?\x092d . "(5K(B") - (?\x092e . "(5L(B") - (?\x092f . "(5M(B") - (?\x0930 . "(5O(B") - (?\x0931 . "(5P(B") - (?\x0932 . "(5Q(B") - (?\x0933 . "(5R(B") - (?\x0934 . "(5S(B") - (?\x0935 . "(5T(B") - (?\x0936 . "(5U(B") - (?\x0937 . "(5V(B") - (?\x0938 . "(5W(B") - (?\x0939 . "(5X(B") + (?\x0905 . "") + (?\x0906 . "") + (?\x0907 . "") + (?\x0908 . "") + (?\x0909 . "") + (?\x090a . "") + (?\x090b . "") + (?\x090c . "") + (?\x090d . "") + (?\x090e . "") + (?\x090f . "") + (?\x0910 . "") + (?\x0911 . "") + (?\x0912 . "") + (?\x0913 . "") + (?\x0914 . "") + (?\x0915 . "") + (?\x0916 . "") + (?\x0917 . "") + (?\x0918 . "") + (?\x0919 . "") + (?\x091a . "") + (?\x091b . "") + (?\x091c . "") + (?\x091d . "") + (?\x091e . "") + (?\x091f . "") + (?\x0920 . "") + (?\x0921 . "") + (?\x0922 . "") + (?\x0923 . "") + (?\x0924 . "") + (?\x0925 . "") + (?\x0926 . "") + (?\x0927 . "") + (?\x0928 . "") + (?\x0929 . "") + (?\x092a . "") + (?\x092b . "") + (?\x092c . "") + (?\x092d . "") + (?\x092e . "") + (?\x092f . "") + (?\x0930 . "") + (?\x0931 . "") + (?\x0932 . "") + (?\x0933 . "") + (?\x0934 . "") + (?\x0935 . "") + (?\x0936 . "") + (?\x0937 . "") + (?\x0938 . "") + (?\x0939 . "") (?\x093a . "[U+093a]") (?\x093b . "[U+093b]") - (?\x093c . "(5i(B") - (?\x093d . "(5ji(B") - (?\x093e . "(5Z(B") - (?\x093f . "(5[(B") - (?\x0940 . "(5\(B") - (?\x0941 . "(5](B") - (?\x0942 . "(5^(B") - (?\x0943 . "(5_(B") - (?\x0944 . "(5_i(B") - (?\x0945 . "(5c(B") - (?\x0946 . "(5`(B") - (?\x0947 . "(5a(B") - (?\x0948 . "(5b(B") - (?\x0949 . "(5g(B") - (?\x094a . "(5d(B") - (?\x094b . "(5e(B") - (?\x094c . "(5f(B") - (?\x094d . "(5h(B") + (?\x093c . "") + (?\x093d . "") + (?\x093e . "") + (?\x093f . "") + (?\x0940 . "") + (?\x0941 . "") + (?\x0942 . "") + (?\x0943 . "") + (?\x0944 . "") + (?\x0945 . "") + (?\x0946 . "") + (?\x0947 . "") + (?\x0948 . "") + (?\x0949 . "") + (?\x094a . "") + (?\x094b . "") + (?\x094c . "") + (?\x094d . "") (?\x094e . "[U+094e]") (?\x094f . "[U+094f]") - (?\x0950 . "(5!i(B") - (?\x0951 . "(5p5(B") - (?\x0952 . "(5p8(B") + (?\x0950 . "") + (?\x0951 . "") + (?\x0952 . "") (?\x0953 . "[DEVANAGARI GRAVE ACCENT]") (?\x0954 . "[DEVANAGARI ACUTE ACCENT]") (?\x0955 . "[U+0955]") (?\x0956 . "[U+0956]") (?\x0957 . "[U+0957]") - (?\x0958 . "(53i(B") - (?\x0959 . "(54i(B") - (?\x095a . "(55i(B") - (?\x095b . "(5:i(B") - (?\x095c . "(5?i(B") - (?\x095d . "(5@i(B") - (?\x095e . "(5Ii(B") - (?\x095f . "(5N(B") - (?\x0960 . "(5*i(B") - (?\x0961 . "(5'i(B") - (?\x0962 . "(5[i(B") - (?\x0963 . "(5ei(B") - (?\x0964 . "(5j(B") - (?\x0965 . "(5jj(B") - (?\x0966 . "(5q(B") - (?\x0967 . "(5r(B") - (?\x0968 . "(5s(B") - (?\x0969 . "(5t(B") - (?\x096a . "(5u(B") - (?\x096b . "(5v(B") - (?\x096c . "(5w(B") - (?\x096d . "(5x(B") - (?\x096e . "(5y(B") - (?\x096f . "(5z(B") + (?\x0958 . "") + (?\x0959 . "") + (?\x095a . "") + (?\x095b . "") + (?\x095c . "") + (?\x095d . "") + (?\x095e . "") + (?\x095f . "") + (?\x0960 . "") + (?\x0961 . "") + (?\x0962 . "") + (?\x0963 . "") + (?\x0964 . "") + (?\x0965 . "") + (?\x0966 . "") + (?\x0967 . "") + (?\x0968 . "") + (?\x0969 . "") + (?\x096a . "") + (?\x096b . "") + (?\x096c . "") + (?\x096d . "") + (?\x096e . "") + (?\x096f . "") (?\x0970 . "[U+0970]") (?\x0971 . "[U+0971]") (?\x0972 . "[U+0972]") @@ -870,332 +870,332 @@ Returns new end position." (defconst indian-2-colum-to-ucs '( ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2120 $(6!!!"!#!$!%!&!'!(!)!*!+!,!-!.!/(B - ("$(6!!(B" . "$,15A(B") - ("$(6!"(B" . "$,15B(B") - ("$(6!#(B" . "$,15C(B") - ("$(6!$(B" . "$,15E(B") - ("$(6!%(B" . "$,15F(B") - ("$(6!&(B" . "$,15G(B") - ("$(6!'(B" . "$,15H(B") - ("$(6!((B" . "$,15I(B") - ("$(6!)(B" . "$,15J(B") - ("$(6!*(B" . "$,15K(B") - ("$(6!*"p(B" . "$,15p6#(B") - ("$(6!+(B" . "$,15N(B") - ("$(6!,(B" . "$,15O(B") - ("$(6!-(B" . "$,15P(B") - ("$(6!.(B" . "$,15M(B") - ("$(6!/(B" . "$,15R(B") + ;;2120 + ("" . "ँ") + ("" . "ं") + ("" . "ः") + ("" . "अ") + ("" . "आ") + ("" . "इ") + ("" . "ई") + ("" . "उ") + ("" . "ऊ") + ("" . "ऋ") + ("" . "रृ") + ("" . "ऎ") + ("" . "ए") + ("" . "ऐ") + ("" . "ऍ") + ("" . "ऒ") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2130 $(6!0!1!2!3!4!5!6!7!8!9!:!;!<!=!>!?(B - ("$(6!0(B" . "$,15S(B") - ("$(6!1(B" . "$,15T(B") - ("$(6!2(B" . "$,15Q(B") - ("$(6!3(B" . "$,15U(B") - ("$(6!4(B" . "$,15V(B") - ("$(6!5(B" . "$,15W(B") - ("$(6!6(B" . "$,15X(B") - ("$(6!7(B" . "$,15Y(B") - ("$(6!8(B" . "$,15Z(B") - ("$(6!9(B" . "$,15[(B") - ("$(6!:(B" . "$,15\(B") - ("$(6!;(B" . "$,15](B") - ("$(6!<(B" . "$,15^(B") - ("$(6!=(B" . "$,15_(B") - ("$(6!>(B" . "$,15`(B") - ("$(6!?(B" . "$,15a(B") + ;;2130 + ("" . "ओ") + ("" . "औ") + ("" . "ऑ") + ("" . "क") + ("" . "ख") + ("" . "ग") + ("" . "घ") + ("" . "ङ") + ("" . "च") + ("" . "छ") + ("" . "ज") + ("" . "झ") + ("" . "ञ") + ("" . "ट") + ("" . "ठ") + ("" . "ड") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2140 $(6!@!A!B!C!D!E!F!G!H!I!J!K!L!M!N!O(B - ("$(6!@(B" . "$,15b(B") - ("$(6!A(B" . "$,15c(B") - ("$(6!B(B" . "$,15d(B") - ("$(6!C(B" . "$,15e(B") - ("$(6!D(B" . "$,15f(B") - ("$(6!E(B" . "$,15g(B") - ("$(6!F(B" . "$,15h(B") - ("$(6!G(B" . "$,15i(B") - ("$(6!H(B" . "$,15j(B") - ("$(6!I(B" . "$,15k(B") - ("$(6!J(B" . "$,15l(B") - ("$(6!K(B" . "$,15m(B") - ("$(6!L(B" . "$,15n(B") - ("$(6!M(B" . "$,15o(B") - ("$(6!N(B" . "$,16?(B") - ("$(6!O(B" . "$,15p(B") + ;;2140 + ("" . "ढ") + ("" . "ण") + ("" . "त") + ("" . "थ") + ("" . "द") + ("" . "ध") + ("" . "न") + ("" . "ऩ") + ("" . "प") + ("" . "फ") + ("" . "ब") + ("" . "भ") + ("" . "म") + ("" . "य") + ("" . "य़") + ("" . "र") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2150 $(6!P!Q!R!S!T!U!V!W!X!Y!Z![!\!]!^!_(B - ("$(6!P(B" . "$,15q(B") - ("$(6!Q(B" . "$,15r(B") - ("$(6!R(B" . "$,15s(B") - ("$(6!S(B" . "$,15t(B") - ("$(6!T(B" . "$,15u(B") - ("$(6!U(B" . "$,15v(B") - ("$(6!V(B" . "$,15w(B") - ("$(6!W(B" . "$,15x(B") - ("$(6!X(B" . "$,15y(B") - ("$(6!Z(B" . "$,15~(B") - ("$(6![(B" . "$,15(B") - ("$(6!\(B" . "$,16 (B") - ("$(6!](B" . "$,16!(B") - ("$(6!^(B" . "$,16"(B") - ("$(6!_(B" . "$,16#(B") + ;;2150 + ("" . "ऱ") + ("" . "ल") + ("" . "ळ") + ("" . "ऴ") + ("" . "व") + ("" . "श") + ("" . "ष") + ("" . "स") + ("" . "ह") + ("" . "ा") + ("" . "ि") + ("" . "ी") + ("" . "ु") + ("" . "ू") + ("" . "ृ") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2160 $(6!`!a!b!c!d!e!f!g!h!i!j!k!l!m!n!o(B - ("$(6!`(B" . "$,16&(B") - ("$(6!a(B" . "$,16'(B") - ("$(6!b(B" . "$,16((B") - ("$(6!c(B" . "$,16%(B") - ("$(6!d(B" . "$,16*(B") - ("$(6!e(B" . "$,16+(B") - ("$(6!f(B" . "$,16,(B") - ("$(6!g(B" . "$,16)(B") - ("$(6!h(B" . "$,16-(B") - ("$(6!i(B" . "$,15|(B") - ("$(6!j(B" . "$,16D(B") - ("$(6!j!j(B" . "$,16E(B") + ;;2160 + ("" . "ॆ") + ("" . "े") + ("" . "ै") + ("" . "ॅ") + ("" . "ॊ") + ("" . "ो") + ("" . "ौ") + ("" . "ॉ") + ("" . "्") + ("" . "़") + ("" . "।") + ("" . "॥") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2170 $(6!p!q!r!s!t!u!v!w!x!y!z!{!|!}!~(B - ("$(6!q(B" . "$,16F(B") - ("$(6!r(B" . "$,16G(B") - ("$(6!s(B" . "$,16H(B") - ("$(6!t(B" . "$,16I(B") - ("$(6!u(B" . "$,16J(B") - ("$(6!v(B" . "$,16K(B") - ("$(6!w(B" . "$,16L(B") - ("$(6!x(B" . "$,16M(B") - ("$(6!y(B" . "$,16N(B") - ("$(6!z(B" . "$,16O(B") + ;;2170 + ("" . "०") + ("" . "१") + ("" . "२") + ("" . "३") + ("" . "४") + ("" . "५") + ("" . "६") + ("" . "७") + ("" . "८") + ("" . "९") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2220 $(6"!"""#"$"%"&"'"(")"*"+","-"."/(B - ("$(6"!(B" . "$,16;6-5p(B") - ("$(6""(B" . "$,16>6-5p(B") - ("$(6"#(B" . "$,15U6-5p(B") - ("$(6"$(B" . "$,15W6-5p(B") - ("$(6"%(B" . "$,15d6-5p(B") - ("$(6"&(B" . "$,15j6-5p(B") - ("$(6"'(B" . "$,15k6-5p(B") - ("$(6")(B" . "$,15v6-5p(B") - ("$(6",(B" . "$,15p6!(B") - ("$(6"-(B" . "$,15p6"(B") - ("$(6".(B" . "$,15q6!(B") - ("$(6"/(B" . "$,15q6"(B") + ;;2220 + ("" . "ज़्र") + ("" . "फ़्र") + ("" . "क्र") + ("" . "ग्र") + ("" . "त्र") + ("" . "प्र") + ("" . "फ्र") + ("" . "श्र") + ("" . "रु") + ("" . "रू") + ("" . "ऱु") + ("" . "ऱू") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2230 $(6"0"1"2"3"4"5"6"7"8"9":";"<"=">"?(B - ("$(6"3(B" . "$,15U6-(B") - ("$(6"4(B" . "$,15V6-(B") - ("$(6"5(B" . "$,15W6-(B") - ("$(6"6(B" . "$,15X6-(B") - ("$(6"8(B" . "$,15Z6-(B") - ("$(6"8"q(B" . "$,15Z6-5p6-(B") - ("$(6":(B" . "$,15\6-(B") - ("$(6";(B" . "$,15]6-(B") - ("$(6"<(B" . "$,15^6-(B") - ("$(6"<(B" . "$,15^6-(B") + ;;2230 + ("" . "क्") + ("" . "ख्") + ("" . "ग्") + ("" . "घ्") + ("" . "च्") + ("" . "च्र्") + ("" . "ज्") + ("" . "झ्") + ("" . "ञ्") + ("" . "ञ्") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2240 $(6"@"A"B"C"D"E"F"G"H"I"J"K"L"M"N"O(B - ("$(6"A(B" . "$,15c6-(B") - ("$(6"B(B" . "$,15d6-(B") - ("$(6"C(B" . "$,15e6-(B") - ("$(6"E(B" . "$,15g6-(B") - ("$(6"F(B" . "$,15h6-(B") - ("$(6"G(B" . "$,15i6-(B") - ("$(6"H(B" . "$,15j6-(B") - ("$(6"I(B" . "$,15k6-(B") - ("$(6"J(B" . "$,15l6-(B") - ("$(6"J(B" . "$,15l6-(B") - ("$(6"K(B" . "$,15m6-(B") - ("$(6"L(B" . "$,15n6-(B") - ("$(6"M(B" . "$,15o6-(B") - ("$(6"N(B" . "$,16?6-(B") + ;;2240 + ("" . "ण्") + ("" . "त्") + ("" . "थ्") + ("" . "ध्") + ("" . "न्") + ("" . "ऩ्") + ("" . "प्") + ("" . "फ्") + ("" . "ब्") + ("" . "ब्") + ("" . "भ्") + ("" . "म्") + ("" . "य्") + ("" . "य़्") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2250 $(6"P"Q"R"S"T"U"V"W"X"Y"Z"["\"]"^"_(B - ("$(6"Q(B" . "$,15r6-(B") - ("$(6"R(B" . "$,15s6-(B") - ("$(6"S(B" . "$,15t6-(B") - ("$(6"T(B" . "$,15u6-(B") - ("$(6"U(B" . "$,15v6-(B") - ("$(6"V(B" . "$,15w6-(B") - ("$(6"W(B" . "$,15x6-(B") - ("$(6"](B" . "$,16-5o(B") + ;;2250 + ("" . "ल्") + ("" . "ळ्") + ("" . "ऴ्") + ("" . "व्") + ("" . "श्") + ("" . "ष्") + ("" . "स्") + ("" . "्य") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2260 $(6"`"a"b"c"d"e"f"g"h"i"j"k"l"m"n"o(B - ("$(6"`(B" . "$,15W6-5p6-(B") - ("$(6"a(B" . "$,15X6-5h6-(B") - ("$(6"c(B" . "$,15d6-5d6-(B") - ("$(6"d(B" . "$,15d6-5p6-(B") - ("$(6"e(B" . "$,15g6-5h6-(B") - ("$(6"f(B" . "$,15g6-5p6-(B") - ("$(6"g(B" . "$,15j6-5d6-(B") - ("$(6"h(B" . "$,15v6-5Z6-(B") - ("$(6"i(B" . "$,15v6-5p6-(B") - ("$(6"j(B" . "$,15v6-5u6-(B") - ("$(6"k(B" . "$,15h6-5h6-(B") - ("$(6"l(B" . "$,15U6-5w6-(B") - ("$(6"m(B" . "$,15\6-5^6-(B") + ;;2260 + ("" . "ग्र्") + ("" . "घ्न्") + ("" . "त्त्") + ("" . "त्र्") + ("" . "ध्न्") + ("" . "ध्र्") + ("" . "प्त्") + ("" . "श्च्") + ("" . "श्र्") + ("" . "श्व्") + ("" . "न्न्") + ("" . "क्ष्") + ("" . "ज्ञ्") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2270 $(6"p"q"r"s"t"u"v"w"x"y"z"{"|"}"~(B - ("$(6"p(B" . "$,15p6-(B") - ("$(6"q(B" . "$,16-5p(B") - ("$(6"r(B" . "$,16-5p(B") - ("$(6"s(B" . "$,1686-(B") - ("$(6"t(B" . "$,1696-(B") - ("$(6"u(B" . "$,16:6-(B") - ("$(6"y(B" . "$,16>6-(B") - ("$(6"z(B" . "$,16;6-(B") + ;;2270 + ("" . "र्") + ("" . "्र") + ("" . "्र") + ("" . "क़्") + ("" . "ख़्") + ("" . "ग़्") + ("" . "फ़्") + ("" . "ज़्") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2320 $(6#!#"###$#%#&#'#(#)#*#+#,#-#.#/(B - ("$(6#!(B" . "$,160(B") - ("$(6#&(B" . "$,15L(B") - ("$(6#&"p(B" . "$,15p6$(B") - ("$(6#'(B" . "$,16A(B") - ("$(6#'"p(B" . "$,15p6C(B") - ("$(6#*(B" . "$,16@(B") - ("$(6#*"p(B" . "$,15p6B(B") + ;;2320 + ("" . "ॐ") + ("" . "ऌ") + ("" . "रॄ") + ("" . "ॡ") + ("" . "रॣ") + ("" . "ॠ") + ("" . "रॢ") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2330 $(6#0#1#2#3#4#5#6#7#8#9#:#;#<#=#>#?(B - ("$(6#3(B" . "$,168(B") - ("$(6#4(B" . "$,169(B") - ("$(6#5(B" . "$,16:(B") - ("$(6#:(B" . "$,16;(B") - ("$(6#?(B" . "$,16<(B") + ;;2330 + ("" . "क़") + ("" . "ख़") + ("" . "ग़") + ("" . "ज़") + ("" . "ड़") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2340 $(6#@#A#B#C#D#E#F#G#H#I#J#K#L#M#N#O(B - ("$(6#@(B" . "$,16=(B") - ("$(6#I(B" . "$,16>(B") - ("$(6#J(B" . "$,15}(B") - ("$(6#K(B" . "$,16$(B") - ("$(6#L(B" . "$,16B(B") - ("$(6#M(B" . "$,16C(B") + ;;2340 + ("" . "ढ़") + ("" . "फ़") + ("" . "ऽ") + ("" . "ॄ") + ("" . "ॢ") + ("" . "ॣ") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2350 $(6#P#Q#R#S#T#U#V#W#X#Y#Z#[#\#]#^#_(B - ("$(6#P(B" . "$,15n6-5h(B") - ("$(6#Q(B" . "$,15n6-5r(B") - ("$(6#R(B" . "$,15y6#(B") + ;;2350 + ("" . "म्न") + ("" . "म्ल") + ("" . "हृ") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2360 $(6#`#a#b#c#d#e#f#g#h#i#j#k#l#m#n#o(B - ("$(6#`(B" . "$,15r6-5r(B") - ("$(6#a(B" . "$,15u6-5h(B") - ("$(6#b(B" . "$,15u6-5u(B") - ("$(6#c(B" . "$,15v6-5Z(B") - ("$(6#d(B" . "$,15v6-5h(B") - ("$(6#e(B" . "$,15v6-5l(B") - ("$(6#f(B" . "$,15v6-5r(B") - ("$(6#g(B" . "$,15v6-5u(B") - ("$(6#h(B" . "$,15w6-5_6-5p6-5o(B") - ("$(6#i(B" . "$,15w6-5_6-5o(B") - ("$(6#j(B" . "$,15w6-5_6-5u(B") - ("$(6#k(B" . "$,15w6-5_(B") - ("$(6#l(B" . "$,15w6-5`(B") - ("$(6#m(B" . "$,15x6-5h(B") - ("$(6#n(B" . "$,15x6-5p(B") + ;;2360 + ("" . "ल्ल") + ("" . "व्न") + ("" . "व्व") + ("" . "श्च") + ("" . "श्न") + ("" . "श्ब") + ("" . "श्ल") + ("" . "श्व") + ("" . "ष्ट्र्य") + ("" . "ष्ट्य") + ("" . "ष्ट्व") + ("" . "ष्ट") + ("" . "ष्ठ") + ("" . "स्न") + ("" . "स्र") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2370 $(6#p#q#r#s#t#u#v#w#x#y#z#{#|#}#~(B - ("$(6#p(B" . "$,15y6-5c(B") - ("$(6#q(B" . "$,15y6-5h(B") - ("$(6#r(B" . "$,15y6-5n(B") - ("$(6#s(B" . "$,15y6-5o(B") - ("$(6#t(B" . "$,15y6-5p(B") - ("$(6#u(B" . "$,15y6-5r(B") - ("$(6#v(B" . "$,15y6-5u(B") + ;;2370 + ("" . "ह्ण") + ("" . "ह्न") + ("" . "ह्म") + ("" . "ह्य") + ("" . "ह्र") + ("" . "ह्ल") + ("" . "ह्व") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2420 $(6$!$"$#$$$%$&$'$($)$*$+$,$-$.$/(B - ("$(6$!(B" . "$,15U6-5d6-5p6-5o(B") - ("$(6$"(B" . "$,15U6-5d6-5u(B") - ("$(6$#(B" . "$,15U6-5d6-5o(B") - ("$(6$$(B" . "$,15U6-5h6-5o(B") - ("$(6$%(B" . "$,15U6-5p6-5o(B") - ("$(6$&(B" . "$,15U6-5u6-5o(B") - ("$(6$'(B" . "$,15U6-5U(B") - ("$(6$((B" . "$,15U6-5d(B") - ("$(6$)(B" . "$,15U6-5h(B") - ("$(6$*(B" . "$,15U6-5n(B") - ("$(6$+(B" . "$,15U6-5o(B") - ("$(6$,(B" . "$,15U6-5r(B") - ("$(6$-(B" . "$,15U6-5u(B") - ("$(6$.(B" . "$,15U6-5w(B") - ("$(6$/(B" . "$,15X6-5h(B") + ;;2420 + ("" . "क्त्र्य") + ("" . "क्त्व") + ("" . "क्त्य") + ("" . "क्न्य") + ("" . "क्र्य") + ("" . "क्व्य") + ("" . "क्क") + ("" . "क्त") + ("" . "क्न") + ("" . "क्म") + ("" . "क्य") + ("" . "क्ल") + ("" . "क्व") + ("" . "क्ष") + ("" . "घ्न") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2430 $(6$0$1$2$3$4$5$6$7$8$9$:$;$<$=$>$?(B - ("$(6$0(B" . "$,15Y6-5U6-5d6-5o(B") - ("$(6$1(B" . "$,15Y6-5U6-5w6-5u(B") - ("$(6$2(B" . "$,15Y6-5U6-5d(B") - ("$(6$3(B" . "$,15Y6-5U6-5w(B") - ("$(6$4(B" . "$,15Y6-5X6-5p(B") - ("$(6$5(B" . "$,15Y6-5U6-5o(B") - ("$(6$6(B" . "$,15Y6-5V6-5o(B") - ("$(6$7(B" . "$,15Y6-5W6-5o(B") - ("$(6$8(B" . "$,15Y6-5X6-5o(B") - ("$(6$9(B" . "$,15Y6-5U(B") - ("$(6$:(B" . "$,15Y6-5V(B") - ("$(6$;(B" . "$,15Y6-5W(B") - ("$(6$<(B" . "$,15Y6-5X(B") - ("$(6$=(B" . "$,15Y6-5Y(B") - ("$(6$>(B" . "$,15Y6-5h(B") - ("$(6$?(B" . "$,15Y6-5n(B") + ;;2430 + ("" . "ङ्क्त्य") + ("" . "ङ्क्ष्व") + ("" . "ङ्क्त") + ("" . "ङ्क्ष") + ("" . "ङ्घ्र") + ("" . "ङ्क्य") + ("" . "ङ्ख्य") + ("" . "ङ्ग्य") + ("" . "ङ्घ्य") + ("" . "ङ्क") + ("" . "ङ्ख") + ("" . "ङ्ग") + ("" . "ङ्घ") + ("" . "ङ्ङ") + ("" . "ङ्न") + ("" . "ङ्म") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2440 $(6$@$A$B$C$D$E$F$G$H$I$J$K$L$M$N$O(B - ("$(6$@(B" . "$,15Y6-5o(B") - ("$(6$A(B" . "$,15Z6-5Z(B") - ("$(6$B(B" . "$,15Z6-5^(B") - ("$(6$C(B" . "$,15[6-5o(B") - ("$(6$D(B" . "$,15\6-5p(B") - ("$(6$E(B" . "$,15\6-5^(B") - ("$(6$F(B" . "$,15^6-5Z(B") - ("$(6$G(B" . "$,15^6-5\(B") - ("$(6$H(B" . "$,15_6-5U(B") - ("$(6$I(B" . "$,15_6-5_(B") - ("$(6$J(B" . "$,15_6-5`(B") - ("$(6$K(B" . "$,15_6-5o(B") - ("$(6$L(B" . "$,15`6-5o(B") - ("$(6$M(B" . "$,15a6-5W6-5o(B") - ("$(6$N(B" . "$,15a6-5X6-5p(B") - ("$(6$O(B" . "$,15a6-5p6-5o(B") + ;;2440 + ("" . "ङ्य") + ("" . "च्च") + ("" . "च्ञ") + ("" . "छ्य") + ("" . "ज्र") + ("" . "ज्ञ") + ("" . "ञ्च") + ("" . "ञ्ज") + ("" . "ट्क") + ("" . "ट्ट") + ("" . "ट्ठ") + ("" . "ट्य") + ("" . "ठ्य") + ("" . "ड्ग्य") + ("" . "ड्घ्र") + ("" . "ड्र्य") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2450 $(6$P$Q$R$S$T$U$V$W$X$Y$Z$[$\$]$^$_(B - ("$(6$P(B" . "$,15a6-5W(B") - ("$(6$Q(B" . "$,15a6-5X(B") - ("$(6$R(B" . "$,15a6-5a(B") - ("$(6$S(B" . "$,15a6-5n(B") - ("$(6$T(B" . "$,15a6-5o(B") + ;;2450 + ("" . "ड्ग") + ("" . "ड्घ") + ("" . "ड्ड") + ("" . "ड्म") + ("" . "ड्य") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2460 $(6$`$a$b$c$d$e$f$g$h$i$j$k$l$m$n$o(B - ("$(6$`(B" . "$,15b6-5o(B") - ("$(6$a(B" . "$,15d6-5d(B") - ("$(6$b(B" . "$,15d6-5h(B") - ("$(6$c(B" . "$,15f6-5f6-5o(B") - ("$(6$d(B" . "$,15f6-5g6-5o(B") - ("$(6$e(B" . "$,15f6-5m6-5o(B") - ("$(6$f(B" . "$,15f6-5p6-5o(B") - ("$(6$g(B" . "$,15f6-5u6-5o(B") - ("$(6$h(B" . "$,15f6-5W6-5p(B") - ("$(6$i(B" . "$,15f6-5X6-5p(B") - ("$(6$j(B" . "$,15f6-5f6-5u(B") - ("$(6$k(B" . "$,15f6-5g6-5u(B") - ("$(6$l(B" . "$,15f6-5W(B") - ("$(6$m(B" . "$,15f6-5X(B") - ("$(6$n(B" . "$,15f6-5f(B") - ("$(6$o(B" . "$,15f6-5g(B") + ;;2460 + ("" . "ढ्य") + ("" . "त्त") + ("" . "त्न") + ("" . "द्द्य") + ("" . "द्ध्य") + ("" . "द्भ्य") + ("" . "द्र्य") + ("" . "द्व्य") + ("" . "द्ग्र") + ("" . "द्घ्र") + ("" . "द्द्व") + ("" . "द्ध्व") + ("" . "द्ग") + ("" . "द्घ") + ("" . "द्द") + ("" . "द्ध") ;; 0 1 2 3 4 5 6 7 8 9 a b c d e f - ;;2470 $(6$p$q$r$s$t$u$v$w$x$y$z${$|$}$~(B - ("$(6$p(B" . "$,15f6-5h(B") - ("$(6$q(B" . "$,15f6-5l(B") - ("$(6$r(B" . "$,15f6-5m(B") - ("$(6$s(B" . "$,15f6-5n(B") - ("$(6$t(B" . "$,15f6-5o(B") - ("$(6$u(B" . "$,15f6-5u(B") - ("$(6$v(B" . "$,15g6-5h(B") - ("$(6$w(B" . "$,15h6-5h(B") - ("$(6$x(B" . "$,15j6-5d(B") - ("$(6$y(B" . "$,15j6-5h(B") - ("$(6$z(B" . "$,15j6-5r(B") - ("$(6${(B" . "$,15l6-5h(B") - ("$(6$|(B" . "$,15l6-5l(B") - ("$(6$}(B" . "$,15l6-5u(B") - ("$(6$~(B" . "$,15m6-5h(B"))) + ;;2470 + ("" . "द्न") + ("" . "द्ब") + ("" . "द्भ") + ("" . "द्म") + ("" . "द्य") + ("" . "द्व") + ("" . "ध्न") + ("" . "न्न") + ("" . "प्त") + ("" . "प्न") + ("" . "प्ल") + ("" . "ब्न") + ("" . "ब्ब") + ("" . "ब्व") + ("" . "भ्न"))) (defconst indian-2-column-to-ucs-regexp - "$(6!j!j(B\\|$(6"8"q(B\\|[$(6#&#'!*#*(B]$(6"p(B\\|[$(6!!(B-$(6$~(B]") + "\\|\\|[]\\|[-]") (put 'indian-2-column-to-ucs-chartable 'char-table-extra-slots 1) (defconst indian-2-column-to-ucs-chartable |