/*
 *  Latin -> Greek
 *
 *  (c)Copyright 1993 by Theodor Tamvakidis & Tobias Ferber
 */

/* Dieses CVT Scriptfile wandelt griechischen Text, der in lateinischen
 * Buchstaben geschrieben wurde in griechische Buchstaben um.
 *
 * Um die Ausgabe eines so ConVerTierten Textes auch lesen zu k"onnen,
 * besteht die M"oglichkeit diesen erneut durch CVT mit der Option
 * '-f g2tex' zu pipe'n.  Man erh"alt dann ein TeX file, das z.B. mit
 * folgendem AWK script compilierbar gemacht werden kann:
 *
 * BEGIN {
 *         print "\\documentstyle{article}"
 *         print "\\begin{document}"
 *         print "\\setlength\\parindent{0pt}"
 *         print "\\setlength\\parskip{5pt plus 2pt minus 1pt}"
 *       }
 *
 * /$/   {
 *         for(i=1; i<=NF; i++)
 *           print $i
 *       }
 *
 * END   {
 *         print "\\end{document}"
 *       }
 */


/*** / LOWER CASE / ***/

"a"       -> "alpha";
"b"       -> "beta";
"c"       -> "psi";
"d"       -> "delta";
"e"       -> "epsilon";
"f"       -> "phi";
"g"       -> "gamma";
"h"       -> "eta";
"i"       -> "iota";
"j"       -> "xi";

"k"       -> "kappa";
"ks"      -> "xi";

"l"       -> "lambda";
"m"       -> "mu";
"n"       -> "nu";
"o"       -> "omikron";
"p"       -> "pi";
"ps"      -> "psi";
"r"       -> "rho";
"s"       -> "sigma";

// Der Zeichensalat hinter dem 's' soll ein Wortende abdecken...

"s", " "  -> "varsigma", " ";
"s", "\t" -> "varsigma", "\t";
"s", "\n" -> "varsigma", "\n";
"s", "\r" -> "varsigma", "\r";
"s", "."  -> "varsigma", ".";
"s", ","  -> "varsigma", ",";
"s", ";"  -> "varsigma", ";";
"s", "?"  -> "varsigma", "?";
"s", "!"  -> "varsigma", "!";
"s", ":"  -> "varsigma", ":";
"s", "\"" -> "varsigma", "\"";
"s", "'"  -> "varsigma", "'";
"s", ")"  -> "varsigma", ")";
"s", "-"  -> "varsigma", "-";
"s", "/"  -> "varsigma", "/";

"t"       -> "tau";
"th"      -> "theta";

"u"       -> "theta";
"v"       -> "psi";
"w"       -> "varsigma";
"x"       -> "chi";
"y"       -> "upsilon";
"z"       -> "zeta";


/*** / UPPER CASE / ***/

"A"       -> "Alpha";
"B"       -> "Beta";
"C"       -> "Psi";
"D"       -> "Delta";
"E"       -> "Epsilon";
"F"       -> "Phi";
"G"       -> "Gamma";
"H"       -> "Eta";
"I"       -> "Iota";

"J"       -> "Xi";
"Ks"      -> "Xi";
"KS"      -> "Xi";

"K"       -> "Kappa";
"L"       -> "Lambda";
"M"       -> "Mu";
"N"       -> "Nu";
"O"       -> "Omikron";

"P"       -> "Pi";
"Ps"      -> "Psi";
"PS"      -> "Psi";

"R"       -> "Rho";
"S"       -> "Sigma";

"T"       -> "Tau";
"Th"      -> "Theta";
"TH"      -> "Theta";

"U"       -> "Theta";
"V"       -> "Psi";
"W"       -> "Varsigma";
"X"       -> "Chi";
"Y"       -> "Upsilon";
"Z"       -> "Zeta";