blob: 5477c8ace0ee5a6bbf9f35a63ee63e3c6f414745 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
\def\abjad#1{\@abjad{\@nameuse{c@#1}}}
\def\adadi#1{\@adadi{\@nameuse{c@#1}}}
\def\harfi#1{\@harfi{\@nameuse{c@#1}}}
\def\@abjad#1{\beginR\ifcase#1\or \or \or \or \else\@iabjad{#1}\fi\endR}
\def\@iabjad#1{\ifcase#1\or \or \or \or \or \or \or \or \or
\or \or \or \or \or \or \or \or \or \or
\or \or \or \or \or \or \or \or \or \else\@ctrerr\fi}
\def\@adadi#1{\beginR\ifcase#1\or \or \or \or \else
\@iadadi{#1}\fi\endR}
\def\@iadadi#1{\ifcase#1\or \or \or \or \or \or \or Դ\or ȴ\or
\or \or \or \or â\or \or â\or â\or
\or \or \or ƴ\else\@ctrerr\fi}
\def\@harfi#1{\beginR\ifcase#1\or \or \or \or \else\@iharfi{#1}\fi\endR}
\def\@iharfi#1{\ifcase#1\or \or \or \or \or \or \or \or \or
\or \or \or \or \or \or \or \or
\or \or \or \or \or \or \or \or \or \or \or \or
\or \or \else\@ctrerr\fi}
|