1%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 2% afoot.sty 3% ArabTeX footnotes 4% 12.05.2003 5%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 6% (c) Klaus Lagally 7% Institut fuer Formale Methoden der Informatik 8% Universitaet Stuttgart 9%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 10 11\ifx \undefined \LaTeX \xpa \endinput \fi 12 13\a@ident {afoot.sty} {3.11 ArabTeX footnotes} {12.05.2003} 14 15%%%%%%%%%%%%%%%%%%% \footnote in an arabic environment %%%%%%%%%%%%%%% 16% footnotes inside an Arabic environment, Roman document style 17 18\let \a@@footnotemark \@footnotemark 19\let \a@@footnotetext \@footnotetext 20 21\def \a@footnotemark {% inside Arabic environment 22\iftrans \unskip \unskip \nobreak \@makefnmark \fi 23\ifarab \a@spacefalse \putwordb@x \@makefnmark \a@spacetrue \fi } 24 25\long\def \a@footnotetext #1{\a@@footnotetext {#1}\arab@tail } 26 27\at@arabtext {% inside Arabic environments 28\let \@footnotemark \a@footnotemark 29\let \@footnotetext \a@footnotetext } 30 31\def \a@c@footnote {% ArabTeX-LaTeX version 32\let \@footnotemark \a@footnotemark 33\unarab@codes \footnote } 34 35\def \a@c@footnotemark {% ArabTeX-LaTeX version 36\def \@footnotemark {\a@footnotemark \arab@tail }% 37\unarab@codes \footnotemark } 38 39\long\def \a@c@footnotetext {% ArabTeX-LaTeX version 40\unarab@codes \footnotetext } 41 42\def \LRfootnotes {% left to right footnotes 43\def \a@fnhook {\a@@mkfntext }% Roman document 44%\def \a@fnhook {\a@rmfntext }% Roman document 45\def \a@@fnhook {\a@rmfntext }% Arabic document 46} 47 48\all@wcmd \LRfootnotes \LRfootnotes % default 49 50%%%%%%%%%%%%%%%%%%% \footnote in an arabic environment %%%%%%%%%%%%%%% 51% footnotes inside an Arabic environment, Arabic document style 52 53\iffalse 54\def \a@@footnote {% ArabTeX-LaTeX version 55\def \@footnotemark {% 56 \a@spacefalse \putwordb@x \@makefnmark \a@spacetrue }% 57\def \a@@fntext ##1{% common part for footnote text 58 \def \end {\a@par \egroup \test@token }% 59 \hsize \columnwidth \@parboxrestore 60 \initlineb@x \@footnotemark \test@token ##1 \end } 61} 62 63\def \a@@footnotemark {% 64\def \@footnotemark % ArabTeX-LaTeX version 65 {\a@spacefalse \putwordb@x \@makefnmark \a@spacetrue \test@token }% 66\footnotemark } 67\fi 68 69\long\def \a@@fntext #1{% common part for footnote text 70%\def \@footnotemark {% 71% \a@spacefalse \putwordb@x \@makefnmark \a@spacetrue }% 72\def \end {\a@par \egroup \test@token }% 73 \a@hsize \columnwidth \hsize \columnwidth \@parboxrestore 74 \initlineb@x \putwordb@x \@makefnmark \a@spacetrue 75\set@arabfont 76 \arabtrue \test@token #1 \end } 77 78\long\def \a@@@fntext #1{% common part for RL footnote text, Roman mode 79%\def \@footnotemark {% 80% \a@spacefalse \putwordb@x \@makefnmark \a@spacetrue }% 81\def \end {\a@par \egroup }% 82 \a@hsize \columnwidth \hsize \columnwidth \@parboxrestore 83 \the\arabtext@hook \putwordb@x \@makefnmark \a@spacetrue 84 \test@token #1 \end } 85 86%%%%%%%%%%%%%%%%%%% \footnote in an arabic environment %%%%%%%%%%%%%%% 87%%%%%%%%%%%%%%%%%%%%%%%%%w%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 88 89\def \RLfootnotes {% right to left footnotes 90\def \a@fnhook {\a@@@fntext }% Roman document 91\def \a@@fnhook {\a@@fntext }% Arabic document 92} 93 94\all@wcmd \RLfootnotes 95 96\let \arabfootnotes \RLfootnotes \all@wcmd \arabfootnotes 97 98%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 99\endinput 100%%%%%%%%%%%%%%%%%%%%%%%%%%%%% EOF %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 101