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