diff options
Diffstat (limited to 'Master/texmf-dist/doc/xelatex/xepersian/xepersian-mathsdigitspec.sty')
-rw-r--r-- | Master/texmf-dist/doc/xelatex/xepersian/xepersian-mathsdigitspec.sty | 106 |
1 files changed, 106 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/xelatex/xepersian/xepersian-mathsdigitspec.sty b/Master/texmf-dist/doc/xelatex/xepersian/xepersian-mathsdigitspec.sty new file mode 100644 index 00000000000..845b7398b75 --- /dev/null +++ b/Master/texmf-dist/doc/xelatex/xepersian/xepersian-mathsdigitspec.sty @@ -0,0 +1,106 @@ +%% +%% This is file `xepersian-mathsdigitspec.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% xepersian.dtx (with options: `xepersian-mathsdigitspec.sty') +%% +%% __________________________________ +%% Copyright © 2008-2009 Vafa Khalighi +%% +%% License information appended. +%% +%% +\NeedsTeXFormat{LaTeX2e} +\ProvidesPackage{xepersian-mathsdigitspec} + [2009/04/22 v1.0.1 Unicode Persian maths digits in XeLaTeX (Author: Vafa Khalighi)] +\@zf@mathfalse +\def\@preamblecmds{} +\newcommand\not@onlypreamble[1]{{% + \def\do##1{\ifx#1##1\else\noexpand\do\noexpand##1\fi}% + \xdef\@preamblecmds{\@preamblecmds}}} +\def\gm@notprerr{ can be used only in preamble (\on@line)} +\AtBeginDocument{% + \def\do#1{\noexpand\do\noexpand#1}% + \edef\@preamblecmds{% + \def\noexpand\do##1{% + \def##1{\noexpand\PackageError{gmutils/LaTeX}% + {\noexpand\string##1 \noexpand\gm@notprerr}\noexpand\@eha}}% + \@preamblecmds}} +\def\nocite#1{% + \@bsphack{\setbox0=\hbox{\cite{#1}}}\@esphack} +\newcommand\xepersian@PackageInfo[1]{\PackageInfo{xepersian-mathsdigitspec}{#1}} +\newcommand\SetMathCode[4]{% + \XeTeXmathcode#1="\mathchar@type#2 \csname sym#3\endcsname #4\relax} +\newcommand\SetMathCharDef[4]{% + \XeTeXmathchardef#1="\mathchar@type#2 \csname sym#3\endcsname #4\relax} +\newcommand\setdigitfont[2][]{% + \let\glb@currsize\relax + \setkeys*[xepersian-mathsdigitspec]{options}{#1}% + \edef\@tempa{\noexpand\zf@fontspec{% + \XKV@rm}{#2}}\@tempa + \xepersian@PackageInfo{Defining the default Persian maths digits font as '#2'} + \DeclareSymbolFont{OPERATORS} {EU1}{\zf@family} {m}{n} + \SetSymbolFont{OPERATORS}{bold}{EU1}{\zf@family} {bx}{n} + \DeclareMathAlphabet {\mathit}{EU1}{\zf@family}{m}{it} + \DeclareSymbolFontAlphabet{\mathrm} {OPERATORS} + \DeclareMathAlphabet {\mathbf}{EU1}{\zf@family}{bx}{n} + \SetMathCode{`0}{\mathalpha}{OPERATORS}{"06F0} + \SetMathCode{`1}{\mathalpha}{OPERATORS}{"06F1} + \SetMathCode{`2}{\mathalpha}{OPERATORS}{"06F2} + \SetMathCode{`3}{\mathalpha}{OPERATORS}{"06F3} + \SetMathCode{`4}{\mathalpha}{OPERATORS}{"06F4} + \SetMathCode{`5}{\mathalpha}{OPERATORS}{"06F5} + \SetMathCode{`6}{\mathalpha}{OPERATORS}{"06F6} + \SetMathCode{`7}{\mathalpha}{OPERATORS}{"06F7} + \SetMathCode{`8}{\mathalpha}{OPERATORS}{"06F8} + \SetMathCode{`9}{\mathalpha}{OPERATORS}{"06F9} + \SetMathCharDef{\decimalseparator}{\mathpunct}{OPERATORS}{"066B} +} +\ifx\newcommand\undefined\else + \newcommand{\ZifferAn}{} +\fi +\mathchardef\ziffer@DotOri="013A +{\ZifferAn + \catcode`\.=\active\gdef.{\begingroup\obeyspaces\futurelet\n\ziffer@dcheck}} +\def\ziffer@dcheck{\ziffer@check\ZifferLeer\ziffer@DotOri} +\def\ziffer@check#1#2{% + \ifx\n1\endgroup#1\else + \ifx\n2\endgroup#1\else + \ifx\n3\endgroup#1\else + \ifx\n4\endgroup#1\else + \ifx\n5\endgroup#1\else + \ifx\n6\endgroup#1\else + \ifx\n7\endgroup#1\else + \ifx\n8\endgroup#1\else + \ifx\n9\endgroup#1\else + \ifx\n0\endgroup#1\else + \endgroup#2% + \fi + \fi + \fi + \fi + \fi + \fi + \fi + \fi + \fi + \fi} +\mathcode`.="8000\relax +\def\ZifferLeer{\ifx\decimalseparator\undefied .\else \decimalseparator\fi} +%% +%% Copyright © 2008-2009 by Vafa Khalighi <vafa@users.berlios.de> +%% +%% Distributable under the LaTeX Project Public License, +%% version 1.3c or higher (your choice). The latest version of +%% this license is at: http://www.latex-project.org/lppl.txt +%% +%% This work is "maintained" (as per LPPL maintenance status) +%% by Vafa Khalighi. +%% +%% +%% +%% +%% +%% End of file `xepersian-mathsdigitspec.sty'. |