;ELC   
;;; compiled by jwz@thalidomide on Thu Oct 28 22:00:01 1993
;;; from file /th/jwz/emacs19/lisp/packages/tex-latin1.el
;;; emacs version 19.9 Lucid.
;;; bytecomp version 2.20; 20-oct-93.
;;; optimization is on.
;;; this file uses opcodes which do not exist in Emacs 18.

(if (and (boundp 'emacs-version)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19")))
    (error "This file was compiled for Emacs 19."))

(defvar spanish-trans-tab '(("~n" "с") ("([a-zA-Z])#" "\\1с") ("~N" "С") ("\\([-a-zA-Z\"`]\\)\"u" "\\1ь") ("\\([-a-zA-Z\"`]\\)\"U" "\\1Ь") ("\\([-a-zA-Z]\\)'o" "\\1у") ("\\([-a-zA-Z]\\)'O" "\\У") ("\\([-a-zA-Z]\\)'e" "\\1й") ("\\([-a-zA-Z]\\)'E" "\\1Й") ("\\([-a-zA-Z]\\)'a" "\\1б") ("\\([-a-zA-Z]\\)'A" "\\1A") ("\\([-a-zA-Z]\\)'i" "\\1н") ("\\([-a-zA-Z]\\)'I" "\\1Н")) "\
Spanish")
(fset 'translate-conventions #[(trans-tab) "Љ~€eb€Б­ќЉ@Е@БЖ#«ЉЗA@Б‰#€Єn)A)Є`+‡" [trans-tab nil buffer-read-only work-tab trans-this re-search-forward t replace-match] 4 nil nil])
(fset 'spanish #[nil "А	!‡" [translate-conventions spanish-trans-tab] 2 "\
Translate net conventions for Spanish to ISO" nil])
(defvar aggressive-german-trans-tab '(("\"a" "д") ("\"A" "Д") ("\"o" "ц") ("\"O" "Ц") ("\"u" "ь") ("\"U" "Ь") ("\"s" "Я") ("\\\\3" "Я")) "\
German - may do too much")
(defvar conservative-german-trans-tab '(("\\([-a-zA-Z\"`]\\)\"a" "\\1д") ("\\([-a-zA-Z\"`]\\)\"A" "\\1Д") ("\\([-a-zA-Z\"`]\\)\"o" "\\1ц") ("\\([-a-zA-Z\"`]\\)\"O" "\\1Ц") ("\\([-a-zA-Z\"`]\\)\"u" "\\1ь") ("\\([-a-zA-Z\"`]\\)\"U" "\\1Ь") ("\\([-a-zA-Z\"`]\\)\"s" "\\1Я") ("\\([-a-zA-Z\"`]\\)\\\\3" "\\1Я")) "\
conservative German - may do too little")
(defvar german-trans-tab aggressive-german-trans-tab "\
used for char translation")
(fset 'german #[nil "А	!‡" [translate-conventions german-trans-tab] 2 "\
Translate net conventions for German to ISO" nil])
(byte-code "АБ!¬‚ВА‡" [boundp iso2tex-trans-tab (("д" "{\\\\\"a}") ("а" "{\\\\`a}") ("б" "{\\\\'a}") ("г" "{\\\\~a}") ("в" "{\\\\^a}") ("л" "{\\\\\"e}") ("и" "{\\\\`e}") ("й" "{\\\\'e}") ("к" "{\\\\^e}") ("п" "{\\\\\"\\\\i}") ("м" "{\\\\`\\\\i}") ("н" "{\\\\'\\\\i}") ("о" "{\\\\^\\\\i}") ("ц" "{\\\\\"o}") ("т" "{\\\\`o}") ("у" "{\\\\'o}") ("х" "{\\\\~o}") ("ф" "{\\\\^o}") ("ь" "{\\\\\"u}") ("щ" "{\\\\`u}") ("ъ" "{\\\\'u}") ("ы" "{\\\\^u}") ("Д" "{\\\\\"A}") ("А" "{\\\\`A}") ("Б" "{\\\\'A}") ("Г" "{\\\\~A}") ("В" "{\\\\^A}") ("Л" "{\\\\\"E}") ("И" "{\\\\`E}") ("Й" "{\\\\'E}") ("К" "{\\\\^E}") ("П" "{\\\\\"I}") ("М" "{\\\\`I}") ("Н" "{\\\\'I}") ("О" "{\\\\^I}") ("Ц" "{\\\\\"O}") ("Т" "{\\\\`O}") ("У" "{\\\\'O}") ("Х" "{\\\\~O}") ("Ф" "{\\\\^O}") ("Ь" "{\\\\\"U}") ("Щ" "{\\\\`U}") ("Ъ" "{\\\\'U}") ("Ы" "{\\\\^U}") ("с" "{\\\\~n}") ("С" "{\\\\~N}") ("з" "{\\\\c c}") ("З" "{\\\\c C}") ("Я" "{\\\\ss}") ("ї" "{?`}") ("Ў" "{!`}"))] 2)
(fset 'iso2tex #[nil "А	!‡" [translate-conventions iso2tex-trans-tab] 2 "\
Translate ISO to TeX" nil])
(byte-code "АБ!¬‚ВА‡" [boundp tex2iso-trans-tab (("{\\\\\"a}" "д") ("{\\\\`a}" "а") ("{\\\\'a}" "б") ("{\\\\~a}" "г") ("{\\\\^a}" "в") ("{\\\\\"e}" "л") ("{\\\\`e}" "и") ("{\\\\'e}" "й") ("{\\\\^e}" "к") ("{\\\\\"\\\\i}" "п") ("{\\\\`\\\\i}" "м") ("{\\\\'\\\\i}" "н") ("{\\\\^\\\\i}" "о") ("{\\\\\"i}" "п") ("{\\\\`i}" "м") ("{\\\\'i}" "н") ("{\\\\^i}" "о") ("{\\\\\"o}" "ц") ("{\\\\`o}" "т") ("{\\\\'o}" "у") ("{\\\\~o}" "х") ("{\\\\^o}" "ф") ("{\\\\\"u}" "ь") ("{\\\\`u}" "щ") ("{\\\\'u}" "ъ") ("{\\\\^u}" "ы") ("{\\\\\"A}" "Д") ("{\\\\`A}" "А") ("{\\\\'A}" "Б") ("{\\\\~A}" "Г") ("{\\\\^A}" "В") ("{\\\\\"E}" "Л") ("{\\\\`E}" "И") ("{\\\\'E}" "Й") ("{\\\\^E}" "К") ("{\\\\\"I}" "П") ("{\\\\`I}" "М") ("{\\\\'I}" "Н") ("{\\\\^I}" "О") ("{\\\\\"O}" "Ц") ("{\\\\`O}" "Т") ("{\\\\'O}" "У") ("{\\\\~O}" "Х") ("{\\\\^O}" "Ф") ("{\\\\\"U}" "Ь") ("{\\\\`U}" "Щ") ("{\\\\'U}" "Ъ") ("{\\\\^U}" "Ы") ("{\\\\~n}" "с") ("{\\\\~N}" "С") ("{\\\\c c}" "з") ("{\\\\c C}" "З") ("\\\\\"{a}" "д") ("\\\\`{a}" "а") ("\\\\'{a}" "б") ("\\\\~{a}" "г") ("\\\\^{a}" "в") ("\\\\\"{e}" "л") ("\\\\`{e}" "и") ("\\\\'{e}" "й") ("\\\\^{e}" "к") ("\\\\\"{\\\\i}" "п") ("\\\\`{\\\\i}" "м") ("\\\\'{\\\\i}" "н") ("\\\\^{\\\\i}" "о") ("\\\\\"{i}" "п") ("\\\\`{i}" "м") ("\\\\'{i}" "н") ("\\\\^{i}" "о") ("\\\\\"{o}" "ц") ("\\\\`{o}" "т") ("\\\\'{o}" "у") ("\\\\~{o}" "х") ("\\\\^{o}" "ф") ("\\\\\"{u}" "ь") ("\\\\`{u}" "щ") ("\\\\'{u}" "ъ") ("\\\\^{u}" "ы") ("\\\\\"{A}" "Д") ("\\\\`{A}" "А") ("\\\\'{A}" "Б") ("\\\\~{A}" "Г") ("\\\\^{A}" "В") ("\\\\\"{E}" "Л") ("\\\\`{E}" "И") ("\\\\'{E}" "Й") ("\\\\^{E}" "К") ("\\\\\"{I}" "П") ("\\\\`{I}" "М") ("\\\\'{I}" "Н") ("\\\\^{I}" "О") ("\\\\\"{O}" "Ц") ("\\\\`{O}" "Т") ("\\\\'{O}" "У") ("\\\\~{O}" "Х") ("\\\\^{O}" "Ф") ("\\\\\"{U}" "Ь") ("\\\\`{U}" "Щ") ("\\\\'{U}" "Ъ") ("\\\\^{U}" "Ы") ("\\\\~{n}" "с") ("\\\\~{N}" "С") ("\\\\c{c}" "з") ("\\\\c{C}" "З") ("{\\\\ss}" "Я") ("{?`}" "ї") ("{!`}" "Ў"))] 2)
(fset 'tex2iso #[nil "А	!‡" [translate-conventions tex2iso-trans-tab] 2 "\
Translate TeX to ISO" nil])
(byte-code "АБ!¬‚ВАГ!¬‚ДА‡" [boundp gtex2iso-trans-tab (("\"a" "д") ("\"A" "Д") ("\"o" "ц") ("\"O" "Ц") ("\"u" "ь") ("\"U" "Ь") ("\"s" "Я") ("\\\\3" "Я") ("{\\\\\"a}" "д") ("{\\\\`a}" "а") ("{\\\\'a}" "б") ("{\\\\~a}" "г") ("{\\\\^a}" "в") ("{\\\\\"e}" "л") ("{\\\\`e}" "и") ("{\\\\'e}" "й") ("{\\\\^e}" "к") ("{\\\\\"\\\\i}" "п") ("{\\\\`\\\\i}" "м") ("{\\\\'\\\\i}" "н") ("{\\\\^\\\\i}" "о") ("{\\\\\"i}" "п") ("{\\\\`i}" "м") ("{\\\\'i}" "н") ("{\\\\^i}" "о") ("{\\\\\"o}" "ц") ("{\\\\`o}" "т") ("{\\\\'o}" "у") ("{\\\\~o}" "х") ("{\\\\^o}" "ф") ("{\\\\\"u}" "ь") ("{\\\\`u}" "щ") ("{\\\\'u}" "ъ") ("{\\\\^u}" "ы") ("{\\\\\"A}" "Д") ("{\\\\`A}" "А") ("{\\\\'A}" "Б") ("{\\\\~A}" "Г") ("{\\\\^A}" "В") ("{\\\\\"E}" "Л") ("{\\\\`E}" "И") ("{\\\\'E}" "Й") ("{\\\\^E}" "К") ("{\\\\\"I}" "П") ("{\\\\`I}" "М") ("{\\\\'I}" "Н") ("{\\\\^I}" "О") ("{\\\\\"O}" "Ц") ("{\\\\`O}" "Т") ("{\\\\'O}" "У") ("{\\\\~O}" "Х") ("{\\\\^O}" "Ф") ("{\\\\\"U}" "Ь") ("{\\\\`U}" "Щ") ("{\\\\'U}" "Ъ") ("{\\\\^U}" "Ы") ("{\\\\~n}" "с") ("{\\\\~N}" "С") ("{\\\\c c}" "з") ("{\\\\c C}" "З") ("\\\\\"{a}" "д") ("\\\\`{a}" "а") ("\\\\'{a}" "б") ("\\\\~{a}" "г") ("\\\\^{a}" "в") ("\\\\\"{e}" "л") ("\\\\`{e}" "и") ("\\\\'{e}" "й") ("\\\\^{e}" "к") ("\\\\\"{\\\\i}" "п") ("\\\\`{\\\\i}" "м") ("\\\\'{\\\\i}" "н") ("\\\\^{\\\\i}" "о") ("\\\\\"{i}" "п") ("\\\\`{i}" "м") ("\\\\'{i}" "н") ("\\\\^{i}" "о") ("\\\\\"{o}" "ц") ("\\\\`{o}" "т") ("\\\\'{o}" "у") ("\\\\~{o}" "х") ("\\\\^{o}" "ф") ("\\\\\"{u}" "ь") ("\\\\`{u}" "щ") ("\\\\'{u}" "ъ") ("\\\\^{u}" "ы") ("\\\\\"{A}" "Д") ("\\\\`{A}" "А") ("\\\\'{A}" "Б") ("\\\\~{A}" "Г") ("\\\\^{A}" "В") ("\\\\\"{E}" "Л") ("\\\\`{E}" "И") ("\\\\'{E}" "Й") ("\\\\^{E}" "К") ("\\\\\"{I}" "П") ("\\\\`{I}" "М") ("\\\\'{I}" "Н") ("\\\\^{I}" "О") ("\\\\\"{O}" "Ц") ("\\\\`{O}" "Т") ("\\\\'{O}" "У") ("\\\\~{O}" "Х") ("\\\\^{O}" "Ф") ("\\\\\"{U}" "Ь") ("\\\\`{U}" "Щ") ("\\\\'{U}" "Ъ") ("\\\\^{U}" "Ы") ("\\\\~{n}" "с") ("\\\\~{N}" "С") ("\\\\c{c}" "з") ("\\\\c{C}" "З") ("{\\\\ss}" "Я") ("{?`}" "ї") ("{!`}" "Ў")) iso2gtex-trans-tab (("д" "\"a") ("а" "{\\\\`a}") ("б" "{\\\\'a}") ("г" "{\\\\~a}") ("в" "{\\\\^a}") ("л" "{\\\\\"e}") ("и" "{\\\\`e}") ("й" "{\\\\'e}") ("к" "{\\\\^e}") ("п" "{\\\\\"\\\\i}") ("м" "{\\\\`\\\\i}") ("н" "{\\\\'\\\\i}") ("о" "{\\\\^\\\\i}") ("ц" "\"o") ("т" "{\\\\`o}") ("у" "{\\\\'o}") ("х" "{\\\\~o}") ("ф" "{\\\\^o}") ("ь" "\"u") ("щ" "{\\\\`u}") ("ъ" "{\\\\'u}") ("ы" "{\\\\^u}") ("Д" "\"A") ("А" "{\\\\`A}") ("Б" "{\\\\'A}") ("Г" "{\\\\~A}") ("В" "{\\\\^A}") ("Л" "{\\\\\"E}") ("И" "{\\\\`E}") ("Й" "{\\\\'E}") ("К" "{\\\\^E}") ("П" "{\\\\\"I}") ("М" "{\\\\`I}") ("Н" "{\\\\'I}") ("О" "{\\\\^I}") ("Ц" "\"O") ("Т" "{\\\\`O}") ("У" "{\\\\'O}") ("Х" "{\\\\~O}") ("Ф" "{\\\\^O}") ("Ь" "\"U") ("Щ" "{\\\\`U}") ("Ъ" "{\\\\'U}") ("Ы" "{\\\\^U}") ("с" "{\\\\~n}") ("С" "{\\\\~N}") ("з" "{\\\\c c}") ("З" "{\\\\c C}") ("Я" "\\\\3") ("ї" "{?`}") ("Ў" "{!`}"))] 2)
(fset 'gtex2iso #[nil "А	!‡" [translate-conventions gtex2iso-trans-tab] 2 "\
Translate german TeX to ISO" nil])
(fset 'iso2gtex #[nil "А	!‡" [translate-conventions iso2gtex-trans-tab] 2 "\
Translate ISO to german TeX" nil])
(fset 'german-texP #[nil "Љ~€eb€АБВГ#)‡" [re-search-forward "\\\\documentstyle\\[.*german.*\\]" nil t] 4 "\
Check if tex buffer is german LaTeX"])
(fset 'fix-iso2tex #[nil "Бљ«ЊВ «…Г €ЄѓД €Ељ­‚Д ‡" [major-mode latex-mode german-texP iso2gtex iso2tex tex-mode] 2 "\
Turn ISO latin1 into TeX sequences"])
(fset 'fix-tex2iso #[nil "Бљ«ЊВ «…Г €ЄѓД €Ељ­‚Д ‡" [major-mode latex-mode german-texP gtex2iso tex2iso tex-mode] 2 "\
Turn TeX sequences into ISO latin1"])
(byte-code "АБВ\"€АГД\"‡" [add-hook find-file-hooks fix-tex2iso write-file-hooks fix-iso2tex] 3)