;ELC
;;; Compiled by LTX@Xue-LingTaos-MacBook-Pro.local on Wed Mar 16 23:08:17 2011
;;; from file /Users/LTX/Projects/Emacs/emacs/lisp/language/tibetan.el
;;; in Emacs version 24.0.50
;;; with all optimizations.

;;; This file contains utf-8 non-ASCII characters,
;;; and so cannot be loaded into Emacs 22 or earlier.
(and (boundp 'emacs-version)
     (< (aref emacs-version (1- (length emacs-version))) ?A)
     (string-lessp emacs-version "23")
     (error "`tibetan.el' was compiled for Emacs 23 or later"))

;;;;;;;;;;;;;;;;;;;;;;;;


(byte-code "\300\301\302\303\304\305\306\307\310\311\312&\n\210\313\314\301\"\210\315\316\317\"\207" [define-coding-system tibetan-iso-8bit "8-bit encoding for ASCII (MSB=0) and TIBETAN (MSB=1)." :coding-type iso-2022 :mnemonic 81 :designation [ascii tibetan nil nil] :charset-list (ascii tibetan) define-coding-system-alias tibetan set-language-info-alist "Tibetan" ((charset tibetan tibetan-1-column) (coding-system tibetan-iso-8bit) (coding-priority iso-2022-7bit tibetan-iso-8bit) (input-method . "tibetan-wylie") (features tibet-util) (documentation . t) (sample-text . "Tibetan (à½–à½¼à½‘à¼‹à½¦à¾�ö�‚Žà½‘à¼‹) à¼„à¼…à¼…à¼Žà½–à½€à¾²ö�‚Žà¼‹à½¤à½²à½¦à¼‹à½–à½‘à½ºà¼‹à½£à½ºà½‚à½¦à¼Žà½¨à½¼à½¾à¼‹à½˜ö�‚Žà¼‹à½Žà½²à¼‹à½”ö�‚Žà½‘à¾¨à½ºà¼‹à½§à½ à½´à¾‚à¼Ž"))] 11)
#@62 Regexp matching a composable sequence of Tibetan characters.
(defconst tibetan-composable-pattern "[à½€-à½©à½ª][à¾�-à¾¹à¾ºà¾»à¾¼]*[à½°ö�‚Žà½±à½²-à½½à¾€à¾�à¾„]*[à½¾à¾‚à¾ƒà¾†-à¾‹à¼™à¼µà¼·]*" (#$ . 1304))
(byte-code "\301B\302\303!\210\304B\305\306!\210\307B\310\311!\210\312B\313\314!\210\315B\316\317\320\321\"!\210\322B\323\324!\210\325B\326\327!\210\330B\331\332!\207" [current-load-list tibetan-consonant-transcription-alist (lambda (#1=#:defconst-tmp-var) (defconst tibetan-consonant-transcription-alist #1#)) (("tsh" . "à½š") ("dzh" . "à½œ") ("kSH" . "à½©") ("kh" . "à½�") ("gh" . "à½ƒ") ("ng" . "à½„") ("ch" . "à½†") ("ny" . "à½‰") ("TH" . "à½‹") ("DH" . "à½�") ("th" . "à½�") ("dh" . "à½’") ("ph" . "à½•") ("bh" . "à½—") ("ts" . "à½™") ("dz" . "à½›") ("zh" . "à½ž") ("sh" . "à½¤") ("SH" . "à½¥") ("k" . "à½€") ("g" . "à½‚") ("c" . "à½…") ("j" . "à½‡") ("T" . "à½Š") ("D" . "à½Œ") ("N" . "à½Ž") ("t" . "à½�") ("d" . "à½‘") ("n" . "à½“") ("p" . "à½”") ("b" . "à½–") ("m" . "à½˜") ("w" . "à½�") ("z" . "à½Ÿ") ("'" . "à½ ") ("y" . "à½¡") ("r" . "à½¢") ("l" . "à½£") ("s" . "à½¦") ("h" . "à½§") ("H" . "à½§") ("A" . "à½¨") ("R" . "à½ª")) tibetan-vowel-transcription-alist (lambda (#2=#:defconst-tmp-var) (defconst tibetan-vowel-transcription-alist #2#)) (("frr" . "à½·") ("fll" . "à½¹") ("fa" . "à½±") ("fi" . "à½³") ("fu" . "à½µ") ("fr" . "à½¶") ("fl" . "à½¸") ("fI" . "à¾�") ("ai" . "à½»") ("au" . "à½½") ("ee" . "à½»") ("oo" . "à½½") ("a" . "ö�‚Ž") ("i" . "à½²") ("u" . "à½´") ("e" . "à½º") ("o" . "à½¼") ("E" . "à½»") ("O" . "à½½") ("I" . "à¾€") ("," . "à¾„")) tibetan-modifier-transcription-alist (lambda (#3=#:defconst-tmp-var) (defconst tibetan-modifier-transcription-alist #3#)) (("M" . "à½¾") ("~" . "à¾‚") ("`" . "à¾ƒ") ("x" . "à¾ˆ") ("X" . "à¾‰") ("v" . "à¾†") ("V" . "à¾‡") ("q" . "à¾Š") ("Q" . "à¾‹") ("_/" . "à¼™") ("_o" . "à¼·") ("_O" . "à¼µ")) tibetan-precomposed-transcription-alist (lambda (#4=#:defconst-tmp-var) (defconst tibetan-precomposed-transcription-alist #4#)) (("phyw" . "ö�…€") ("tshw" . "ö�„¢") ("rtsw" . "ö�†…") ("khw" . "ö�„›") ("nyw" . "ö�„ž") ("tsw" . "ö�„¡") ("zhw" . "ö�„£") ("shw" . "ö�„§") ("khy" . "ö�„º") ("phy" . "ö�„½") ("khr" . "ö�…Š") ("thr" . "ö�…�") ("phr" . "ö�…�") ("shr" . "ö�…“") ("dzr" . "ö�…—") ("grw" . "ö�…˜") ("rng" . "ö�…º") ("rny" . "ö�…¼") ("rts" . "ö�†‚") ("rdz" . "ö�†ƒ") ("rgw" . "ö�†„") ("rky" . "ö�†‡") ("rgy" . "ö�†ˆ") ("rmy" . "ö�†‰") ("lng" . "ö�†™") ("sng" . "ö�†©") ("sny" . "ö�†ª") ("sts" . "ö�†±") ("sky" . "ö�†·") ("sgy" . "ö�†¸") ("spy" . "ö�†¹") ("sby" . "ö�†º") ("smy" . "ö�†»") ("skr" . "ö�‡‡") ("sgr" . "ö�‡ˆ") ("snr" . "ö�‡‰") ("spr" . "ö�‡Š") ("sbr" . "ö�‡‹") ("smr" . "ö�‡Œ") ("kw" . "ö�„š") ("gw" . "ö�„œ") ("cw" . "ö�„�") ("tw" . "ö�„Ÿ") ("dw" . "ö�„ ") ("zw" . "ö�„¤") ("rw" . "ö�„¥") ("lw" . "ö�„¦") ("sw" . "ö�„¨") ("hw" . "ö�„©") ("ky" . "ö�„¹") ("gy" . "ö�„»") ("py" . "ö�„¼") ("by" . "ö�„¾") ("my" . "ö�„¿") ("kr" . "ö�…‰") ("gr" . "ö�…‹") ("tr" . "ö�…Œ") ("dr" . "ö�…Ž") ("pr" . "ö�…�") ("brk" . "à½–ö�…¸") ("brg" . "à½–ö�…¹") ("brng" . "à½–ö�…º") ("brj" . "à½–ö�…»") ("brny" . "à½–ö�…¼") ("brt" . "à½–ö�…½") ("brd" . "à½–ö�…¾") ("brn" . "à½–ö�…¿") ("brts" . "à½–ö�†‚") ("brdz" . "à½–ö�†ƒ") ("brl" . "à½–ö�…�") ("br" . "ö�…‘") ("mr" . "ö�…’") ("sr" . "ö�…”") ("hr" . "ö�…•") ("jr" . "ö�…–") ("kl" . "ö�…™") ("gl" . "ö�…š") ("blt" . "à½–ö�†œ") ("bld" . "à½–ö�†�") ("bl" . "ö�…›") ("zl" . "ö�…œ") ("rl" . "ö�…�") ("sl" . "ö�…ž") ("rk" . "ö�…¸") ("rg" . "ö�…¹") ("rj" . "ö�…»") ("rt" . "ö�…½") ("rd" . "ö�…¾") ("rn" . "ö�…¿") ("rb" . "ö�†€") ("rm" . "ö�†�") ("lk" . "ö�†—") ("lg" . "ö�†˜") ("lc" . "ö�†š") ("lj" . "ö�†›") ("lt" . "ö�†œ") ("ld" . "ö�†�") ("ln" . "ö�€€") ("lp" . "ö�†ž") ("lb" . "ö�†Ÿ") ("lh" . "ö�† ") ("sk" . "ö�†§") ("sg" . "ö�†¨") ("st" . "ö�†«") ("sd" . "ö�†¬") ("sn" . "ö�†­") ("sp" . "ö�†®") ("sb" . "ö�†¯") ("sm" . "ö�†°")) tibetan-subjoined-transcription-alist (lambda (#5=#:defconst-tmp-var) (defconst tibetan-subjoined-transcription-alist #5#)) sort (("+k" . "à¾�") ("+kh" . "à¾‘") ("+g" . "à¾’") ("+gh" . "à¾“") ("+ng" . "à¾”") ("+c" . "à¾•") ("+ch" . "à¾–") ("+j" . "à¾—") ("+ny" . "à¾™") ("+T" . "à¾š") ("+TH" . "à¾›") ("+D" . "à¾œ") ("+DH" . "à¾�") ("+N" . "à¾ž") ("+t" . "à¾Ÿ") ("+th" . "à¾ ") ("+d" . "à¾¡") ("+dh" . "à¾¢") ("+n" . "à¾£") ("+p" . "à¾¤") ("+ph" . "à¾¥") ("+b" . "à¾¦") ("+bh" . "à¾§") ("+m" . "à¾¨") ("+ts" . "à¾©") ("+tsh" . "à¾ª") ("+dz" . "à¾«") ("+dzh" . "à¾¬") ("+w" . "à¾­") ("+zh" . "à¾®") ("+z" . "à¾¯") ("+'" . "à¾°") ("+y" . "à¾±") ("+r" . "à¾²") ("+l" . "à¾³") ("+sh" . "à¾´") ("+SH" . "à¾µ") ("+s" . "à¾¶") ("+h" . "à¾·") ("+A" . "à¾¸") ("+kSH" . "à¾¹") ("+W" . "à¾º") ("+Y" . "à¾»") ("+R" . "à¾¼")) #[(x y) "@G	@GV\207" [x y] 2] tibetan-base-to-subjoined-alist (lambda (#6=#:defconst-tmp-var) (defconst tibetan-base-to-subjoined-alist #6#)) (("à½€" . "à¾�") ("à½�" . "à¾‘") ("à½‚" . "à¾’") ("à½ƒ" . "à¾“") ("à½„" . "à¾”") ("à½…" . "à¾•") ("à½†" . "à¾–") ("à½‡" . "à¾—") ("à½‰" . "à¾™") ("à½Š" . "à¾š") ("à½‹" . "à¾›") ("à½Œ" . "à¾œ") ("à½�" . "à¾�") ("à½Ž" . "à¾ž") ("à½�" . "à¾Ÿ") ("à½�" . "à¾ ") ("à½‘" . "à¾¡") ("à½’" . "à¾¢") ("à½“" . "à¾£") ("à½”" . "à¾¤") ("à½•" . "à¾¥") ("à½–" . "à¾¦") ("à½—" . "à¾§") ("à½˜" . "à¾¨") ("à½™" . "à¾©") ("à½š" . "à¾ª") ("à½›" . "à¾«") ("à½œ" . "à¾¬") ("à½�" . "à¾­") ("à½ž" . "à¾®") ("à½Ÿ" . "à¾¯") ("à½ " . "à¾°") ("à½¡" . "à¾±") ("à½¢" . "à¾²") ("à½£" . "à¾³") ("à½¤" . "à¾´") ("à½¥" . "à¾µ") ("à½¦" . "à¾¶") ("à½§" . "à¾·") ("à½¨" . "à¾¸") ("à½©" . "à¾¹") ("à½ª" . "à¾¼")) tibetan-composite-vowel-alist (lambda (#7=#:defconst-tmp-var) (defconst tibetan-composite-vowel-alist #7#)) (("à½³" 3953 (tc . bc) 3954) ("à½µ" 3953 (bc . tc) 3956) ("à½¶" 4018 (tc . bc) 3968) ("à½·" 4018 (bc . tc) 3953 (tc . bc) 3968) ("à½¸" 4019 (tc . bc) 3968) ("à½¹" 4019 (bc . tc) 3953 (tc . bc) 3968) ("à¾�" 3953 (tc . bc) 3968)) tibetan-precomposition-rule-alist (lambda (#8=#:defconst-tmp-var) (defconst tibetan-precomposition-rule-alist #8#)) (("à½•à¾±à¾­" . "ö�…€") ("à½‚à¾²à¾­" . "ö�…˜") ("à½šà¾­" . "ö�„¢") ("à½¢à¾©à¾­" . "ö�†…") ("à½¢à¾’à¾­" . "ö�†„") ("à½¢à¾�à¾±" . "ö�†‡") ("à½¢à¾’à¾±" . "ö�†ˆ") ("à½¢à¾¨à¾±" . "ö�†‰") ("à½¦à¾�à¾±" . "ö�†·") ("à½¦à¾’à¾±" . "ö�†¸") ("à½¦à¾¤à¾±" . "ö�†¹") ("à½¦à¾¦à¾±" . "ö�†º") ("à½¦à¾¨à¾±" . "ö�†»") ("à½¦à¾�à¾²" . "ö�‡‡") ("à½¦à¾’à¾²" . "ö�‡ˆ") ("à½¦à¾£à¾²" . "ö�‡‰") ("à½¦à¾¤à¾²" . "ö�‡Š") ("à½¦à¾¦à¾²" . "ö�‡‹") ("à½¦à¾¨à¾²" . "ö�‡Œ") ("à½�à¾­" . "ö�„›") ("à½‰à¾­" . "ö�„ž") ("à½™à¾­" . "ö�„¡") ("à½žà¾­" . "ö�„£") ("à½¤à¾­" . "ö�„§") ("à½�à¾±" . "ö�„º") ("à½•à¾±" . "ö�„½") ("à½�à¾²" . "ö�…Š") ("à½�à¾²" . "ö�…�") ("à½•à¾²" . "ö�…�") ("à½¤à¾²" . "ö�…“") ("à½›à¾²" . "ö�…—") ("à½¢à¾”" . "ö�…º") ("à½¢à¾™" . "ö�…¼") ("à½¢à¾©" . "ö�†‚") ("à½¢à¾«" . "ö�†ƒ") ("à½£à¾”" . "ö�†™") ("à½¦à¾”" . "ö�†©") ("à½¦à¾™" . "ö�†ª") ("à½¦à¾©" . "ö�†±") ("à½€à¾­" . "ö�„š") ("à½‚à¾­" . "ö�„œ") ("à½…à¾­" . "ö�„�") ("à½�à¾­" . "ö�„Ÿ") ("à½‘à¾­" . "ö�„ ") ("à½Ÿà¾­" . "ö�„¤") ("à½¢à¾­" . "ö�„¥") ("à½£à¾­" . "ö�„¦") ("à½¦à¾­" . "ö�„¨") ("à½§à¾­" . "ö�„©") ("à½€à¾±" . "ö�„¹") ("à½‚à¾±" . "ö�„»") ("à½”à¾±" . "ö�„¼") ("à½–à¾±" . "ö�„¾") ("à½˜à¾±" . "ö�„¿") ("à½€à¾²" . "ö�…‰") ("à½‚à¾²" . "ö�…‹") ("à½�à¾²" . "ö�…Œ") ("à½‘à¾²" . "ö�…Ž") ("à½”à¾²" . "ö�…�") ("à½–à¾²" . "ö�…‘") ("à½˜à¾²" . "ö�…’") ("à½¦à¾²" . "ö�…”") ("à½§à¾²" . "ö�…•") ("à½‡à¾²" . "ö�…–") ("à½€à¾³" . "ö�…™") ("à½‚à¾³" . "ö�…š") ("à½–à¾³" . "ö�…›") ("à½Ÿà¾³" . "ö�…œ") ("à½¢à¾³" . "ö�…�") ("à½¦à¾³" . "ö�…ž") ("à½¢à¾�" . "ö�…¸") ("à½¢à¾’" . "ö�…¹") ("à½¢à¾—" . "ö�…»") ("à½¢à¾Ÿ" . "ö�…½") ("à½¢à¾¡" . "ö�…¾") ("à½¢à¾£" . "ö�…¿") ("à½¢à¾¦" . "ö�†€") ("à½¢à¾¨" . "ö�†�") ("à½£à¾�" . "ö�†—") ("à½£à¾’" . "ö�†˜") ("à½£à¾£" . "ö�€€") ("à½£à¾•" . "ö�†š") ("à½£à¾—" . "ö�†›") ("à½£à¾Ÿ" . "ö�†œ") ("à½£à¾¡" . "ö�†�") ("à½£à¾¤" . "ö�†ž") ("à½£à¾¦" . "ö�†Ÿ") ("à½£à¾·" . "ö�† ") ("à½¦à¾�" . "ö�†§") ("à½¦à¾’" . "ö�†¨") ("à½¦à¾Ÿ" . "ö�†«") ("à½¦à¾¡" . "ö�†¬") ("à½¦à¾£" . "ö�†­") ("à½¦à¾¤" . "ö�†®") ("à½¦à¾¦" . "ö�†¯") ("à½¦à¾¨" . "ö�†°"))] 4)
#@213 Regexp matching a Tibetan transcription of a composable Tibetan sequence.
The result of matching is to be used for indexing alists at conversion
from a roman transcription to the corresponding Tibetan character.
(defconst tibetan-regexp (byte-code "	\n\f\257\306\307\211\n\f\f\2038\f@\n\fA\f\n\203\n@@
BB\nA\211\n\202\"\310\311
A\237\",\207" [tibetan-precomposed-transcription-alist tibetan-consonant-transcription-alist tibetan-vowel-transcription-alist tibetan-modifier-transcription-alist tibetan-subjoined-transcription-alist pattern "\\|" nil apply concat tail separator l] 6) (#$ . 9222))
#@213 Regexp string to match a romanized Tibetan complex consonant.
The result of matching is to be used for indexing alists when the input key
from an input method is converted to the corresponding precomposed glyph.
(defvar tibetan-precomposed-regexp (byte-code "\303\304\305\211\n@@P\nA\211\203\"	\306\n@@Q\nA\211\204	\307P*!\207" [tibetan-precomposed-transcription-alist temp l purecopy nil "^\\(" "\\|" "\\)"] 5) (#$ . 9848))
#@339 Regexp string to match a sequence of Tibetan consonantic components, i.e.,
one base consonant and one or more subjoined consonants.
The result of matching is to be used for indexing alist when the component
sequence is converted to the corresponding precomposed glyph.
This also matches some punctuation characters which need conversion.
(defvar tibetan-precomposition-rule-regexp (byte-code "\303\304\305\211\n@@P\nA\211\203\"	\306\n@@Q\nA\211\204	\307P*!\207" [tibetan-precomposition-rule-alist temp l purecopy nil "\\(" "\\|" "\\)"] 5) (#$ . 10291))
(byte-code "\303B\304\303!\204\305\303\306\"\210\307B\304\307!\204\305\307\306\"\210\310	\311\312\n\313\314#C#\210\315\316!\207" [current-load-list composition-function-table tibetan-composable-pattern tibetan-decomposed default-boundp set-default nil tibetan-decomposed-temp set-char-table-range (3840 . 4049) vector 0 font-shape-gstring provide tibetan] 7)
