<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{simurgh-abjad}[2013/09/18 v0.01a abjad counter]
\if@simurgh@csundef{abjadnumeral}{%
\def\abjadnumeral#1{%
\ifnum#1&gt;1999 \simurgh@warning{Illegal value (#1) for abjad numeral} {#1}
\else
  \ifnum#1&lt;\z@\space\simurgh@warning{Illegal value (#1) for abjad numeral}%
  \else
    \ifnum#1&lt;10\expandafter\abj@num@i\number#1%
    \else
      \ifnum#1&lt;100\expandafter\abj@num@ii\number#1%
      \else
        \ifnum#1&lt;\@m\expandafter\abj@num@iii\number#1%
        \else
          \ifnum#1&lt;\@M\expandafter\abj@num@iv\number#1%since #1&lt;2000, we must have 1000
          \fi
        \fi
      \fi
    \fi
  \fi
\fi
}
\def\abjad@zero{}
\def\abj@num@i#1{%
  \ifcase#1\or Ø¢\or Ø¨\or Ø¬\or Ø¯%
           \or Ù‡â€\or Ùˆ\or Ø²\or Ø­\or Ø·\fi
  \ifnum#1=\z@\abjad@zero\fi}
\def\abj@num@ii#1{%
  \ifcase#1\or ÛŒ\or Ú©\or Ù„\or Ù…\or Ù†%
           \or Ø³\or Ø¹\or Ù\or Øµ\fi
  \ifnum#1=\z@\fi\abj@num@i}
\def\abj@num@iii#1{%
  \ifcase#1\or Ù‚\or Ø±\or Ø´\or Øª\or Ø«%
            \or Ø®\or Ø°\or Ø¶\or Ø¸\fi
  \ifnum#1=\z@\fi\abj@num@ii}
\def\abj@num@iv#1{%
  \ifcase#1\or Øº\fi
  \ifnum#1=\z@\fi\abj@num@iii}
}{}
   \let\@latinalph\@alph%
   \let\@latinAlph\@Alph%
\def\ParsiAlphs{%
   \let\@alph\abjadnumeral%
   \let\@Alph\abjadnumeral%
}
\def\LatinAlphs{%
   \let\@alph\@latinalph%
   \let\@Alph\@latinAlph%
}
\ParsiAlphs
\endinput</pre></body></html>