From e0c6872cf40896c7be36b11dcc744620f10adf1d Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Mon, 2 Sep 2019 13:46:59 +0900 Subject: Initial commit --- .../arabic/arabi/arabi/texmf/latex/arabi/fnum.sty | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) create mode 100644 language/arabic/arabi/arabi/texmf/latex/arabi/fnum.sty (limited to 'language/arabic/arabi/arabi/texmf/latex/arabi/fnum.sty') diff --git a/language/arabic/arabi/arabi/texmf/latex/arabi/fnum.sty b/language/arabic/arabi/arabi/texmf/latex/arabi/fnum.sty new file mode 100644 index 0000000000..a461ae4ecd --- /dev/null +++ b/language/arabic/arabi/arabi/texmf/latex/arabi/fnum.sty @@ -0,0 +1,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} -- cgit v1.2.3