%{
#include <stdio.h>
#include <ctype.h>
%}
/*
%% FLEX input file for translation from AS (Anglicized Sanskrit) to
%% SLP1.  ejf 2008-01-14
%% created from lisp program AS-SLP1-genFLEX in
%%  monier/lisp/itrans.el
*/
%START SKT
%%
"<SA>"   BEGIN SKT;
"</SA>"   BEGIN 0;
<SKT>"A1"   {putchar('A');}
<SKT>"Au"   {putchar('O');}
<SKT>"Ai"   {putchar('E');}
<SKT>"A7"   {putchar('A');}
<SKT>"A"   {putchar('a');}
<SKT>"Bh"   {putchar('B');}
<SKT>"B"   {putchar('b');}
<SKT>"Ch"   {putchar('C');}
<SKT>"C"   {putchar('c');}
<SKT>"D2h"   {putchar('Q');}
<SKT>"D2"   {putchar('q');}
<SKT>"Dh"   {putchar('D');}
<SKT>"D"   {putchar('d');}
<SKT>"E"   {putchar('e');}
<SKT>"Gh"   {putchar('G');}
<SKT>"G"   {putchar('g');}
<SKT>"H"   {putchar('h');}
<SKT>"I1"   {putchar('I');}
<SKT>"I"   {putchar('i');}
<SKT>"Jh"   {putchar('J');}
<SKT>"J"   {putchar('j');}
<SKT>"Kh"   {putchar('K');}
<SKT>"K"   {putchar('k');}
<SKT>"L"   {putchar('l');}
<SKT>"M"   {putchar('m');}
<SKT>"N2"   {putchar('R');}
<SKT>"N"   {putchar('n');}
<SKT>"O"   {putchar('o');}
<SKT>"Ph"   {putchar('P');}
<SKT>"P"   {putchar('p');}
<SKT>"R2i"   {putchar('f');}
<SKT>"R2"   {putchar('f');}
<SKT>"R"   {putchar('r');}
<SKT>"Sh"   {putchar('z');}
<SKT>"S2"   {putchar('z');}
<SKT>"S3"   {putchar('S');}
<SKT>"S"   {putchar('s');}
<SKT>"T2h"   {putchar('W');}
<SKT>"T2"   {putchar('w');}
<SKT>"Th"   {putchar('T');}
<SKT>"T"   {putchar('t');}
<SKT>"U1"   {putchar('U');}
<SKT>"U7"   {putchar('U');}
<SKT>"U"   {putchar('u');}
<SKT>"V"   {putchar('v');}
<SKT>"Y"   {putchar('y');}
<SKT>"a1"   {putchar('A');}
<SKT>"a7"   {putchar('A');}
<SKT>"au"   {putchar('O');}
<SKT>"ai"   {putchar('E');}
<SKT>"ai7"   {putchar('E');}
<SKT>"a"   {putchar('a');}
<SKT>"bh"   {putchar('B');}
<SKT>"b"   {putchar('b');}
<SKT>"ch"   {putchar('C');}
<SKT>"c"   {putchar('c');}
<SKT>"d2h"   {putchar('Q');}
<SKT>"d2"   {putchar('q');}
<SKT>"dh"   {putchar('D');}
<SKT>"d"   {putchar('d');}
<SKT>"e7"   {putchar('e');}
<SKT>"e"   {putchar('e');}
<SKT>"gh"   {putchar('G');}
<SKT>"g"   {putchar('g');}
<SKT>"h2"   {putchar('H');}
<SKT>"h"   {putchar('h');}
<SKT>"i1"   {putchar('I');}
<SKT>"i7"   {putchar('I');}
<SKT>"i"   {putchar('i');}
<SKT>"jh"   {putchar('J');}
<SKT>"j"   {putchar('j');}
<SKT>"kh"   {putchar('K');}
<SKT>"k"   {putchar('k');}
<SKT>"lr21"   {putchar('X');}
<SKT>"lr2"   {putchar('x');}
<SKT>"l"   {putchar('l');}
<SKT>"m2"   {putchar('M');}
<SKT>"m"   {putchar('m');}
<SKT>"n6"   {putchar('M');}
<SKT>"n3"   {putchar('N');}
<SKT>"n5"   {putchar('Y');}
<SKT>"n2"   {putchar('R');}
<SKT>"n"   {putchar('n');}
<SKT>"o7"   {putchar('o');}
<SKT>"o"   {putchar('o');}
<SKT>"ph"   {putchar('P');}
<SKT>"p"   {putchar('p');}
<SKT>"r21"   {putchar('F');}
<SKT>"r2i"   {putchar('f');}
<SKT>"r2"   {putchar('f');}
<SKT>"r"   {putchar('r');}
<SKT>"s3"   {putchar('S');}
<SKT>"s4"   {putchar('S');}
<SKT>"sh"   {putchar('z');}
<SKT>"s2"   {putchar('z');}
<SKT>"s"   {putchar('s');}
<SKT>"t2h"   {putchar('W');}
<SKT>"t2"   {putchar('w');}
<SKT>"th"   {putchar('T');}
<SKT>"t"   {putchar('t');}
<SKT>"u1"   {putchar('U');}
<SKT>"u7"   {putchar('U');}
<SKT>"u"   {putchar('u');}
<SKT>"v"   {putchar('v');}
<SKT>"y"   {putchar('y');}
.   ECHO;
\n  { ECHO; fflush(stdout); }
%%