%
% Copyright (C) 2008-2001 by Azzeddine LAZREK. All rights reserved.
%
% amrename.tex
% This file belongs to the RyDArab package.
%


% Based functions rename
\let\amga=\amsin
\let\amgta=\amcos
\let\amja=\amtan
\let\amjta=\amcot
\let\amqa=\amsec
\let\amqta=\amcsc
\let\amzga=\amarcsin
\let\amzgta=\amarccos
\let\amzja=\amarctan
\let\amzjta=\amarccot
\let\amzqa=\amarcsec
\let\amzqta=\amarccsc
\let\amgaz=\amsinh
\let\amgtaz=\amcosh
\let\amjaz=\amtanh
\let\amjtaz=\amcoth
\let\amqaz=\amsech
\let\amqtaz=\amcsch
\let\amzgaz=\amarcsinh
\let\amzgtaz=\amarccosh
\let\amzjaz=\amarctanh
\let\amzjtaz=\amarccoth
\let\amzqaz=\amarcsech
\let\amzqtaz=\amarccsch
\let\amlw=\amlg
\let\amqh=\amexp


% compatibility with Roman mathematics
\def\amcompatibility{%
\romanname
\arabname
}

\def\romanname{%
\let\rmsin=\sin\relax
\let\rmcos=\cos\relax
\let\rmtan=\tan\relax
\let\rmcot=\cot\relax
\let\rmsec=\sec\relax
\let\rmcsc=\csc\relax
\let\rmarcsin=\arcsin\relax
\let\rmarccos=\arccos\relax
\let\rmarctan=\arctan\relax
%\let\rmarccot=\arccot\relax
%\let\rmarcsec=\arcsec\relax
%\let\rmarccsc=\arccsc\relax
\let\rmsinh=\sinh\relax
\let\rmcosh=\cosh\relax
\let\rmtanh=\tanh\relax
\let\rmcoth=\coth\relax
%\let\rmsech=\sech\relax
%\let\rmcsch=\csch\relax
%\let\rmarcsinh=\arcsinh\relax
%\let\rmarccosh=\arccosh\relax
%\let\rmarctanh=\arctanh\relax
%\let\rmarccoth=\arccoth\relax
%\let\rmarcsech=\arcsech\relax
%\let\rmarccsch=\arccsch\relax
\let\rmlg=\lg\relax
\let\rmexp=\exp\relax
\let\rmangle=\angle\relax
\let\rmsqrt=\sqrt\relax
%\let\rmsqrt=\aamsqrt
\let\rmroot=\root\relax
\let\rmsurd=\surd\relax
%\let\rmsint=\sint\relax
%\let\rmlint=\lint\relax
%\let\rmseqm=\seqm\relax
%\let\rmleqm=\leqm\relax
%\let\rmleqv=\leqv\relax
\let\rmin=\in\relax
\let\rmni=\ni\relax
\let\rmleft=\left\relax
\let\rmright=\right\relax
\let\rmLeftarrow=\Leftarrow\relax
\let\rmRightarrow=\Rightarrow\relax
\let\rmLongleftrightarrow=\Longleftrightarrow\relax
\let\rmlbrace=\lbrace\relax
\let\rmrbrace=\rbrace\relax
\let\rmlangle=\langle\relax
\let\rmrangle=\rangle\relax
%\let\rmearabnum=\earabnum\relax
%\let\rmwarabnum=\warabnum\relax
%\let\rmoldstylenum=\oldstylenum\relax
\let\rmsp=\sp\relax
\let\rmsb=\sb\relax
%\let\rmssum=\ssum\relax
%\let\rmlsum=\lsum\relax
%\let\rmgsum=\gsum\relax
%\let\rmsprod=\sprod\relax
%\let\rmlprod=\lprod\relax
%\let\rmgprod=\gprod\relax
\let\rmlim=\lim\relax
%%\let\rmcases=\cases\relax
\let\rmmatrix=\matrix\relax
%\let\rmnewfunc=\newfunc\relax
\let\rmtime=\time\relax
\let\rmday=\day\relax
\let\rmmonth=\month\relax
\let\rmyear=\year\relax
\let\rmnumtoday=\numtoday\relax
\let\rmwtoday=\wtoday\relax
\let\rmetoday=\etoday\relax
\let\rmltoday=\ltoday\relax
\let\rmlating=\lating\relax
\let\rmlem=\lem\relax
\let\rmlwm=\lwm\relax
\let\rmllm=\llm\relax
\let\rmleqno=\leqno\relax
\let\rmreqno=\eqno\relax
%\let\rmllap=\llap\relax
%\let\rmrlap=\rlap\relax
\let\rmwidehat=\widehat\relax
\let\rmwidetilde=\widetilde\relax
\let\rmoverline=\overline\relax
\let\rmunderline=\underline\relax
\let\rmoverbrace=\overbrace\relax
\let\rmunderbrace=\underbrace\relax
\let\rmoverleftarrow=\overleftarrow\relax
\let\rmoverrightarrow=\overrightarrow\relax
%%\let\rmprime=\prime\relax
\let\rmexists=\exists\relax
\let\rmcdots=\cdots\relax
\let\rmto=\to\relax
\let\rmbig=\big\relax
\let\rmBig=\Big\relax
\let\rmbigg=\bigg\relax
\let\rmBigg=\Bigg\relax
%\let\rmfrac=\frac\relax
%\let\rmsystem=\system\relax
\let\rmparentheses=\parentheses\relax
\let\rmopenparentheses=\openparentheses\relax
\let\rmcloseparentheses=\closeparentheses\relax
%\let\rmcsum=\csum\relax
%\let\rmcprod=\cprod\relax
%\let\rmclim=\clim\relax
%\let\rmint=\int\relax
%\let\rmsum=\sum\relax
%\let\rmprod=\prod\relax
%\let\rmeqno=\eqno\relax
\let\rmhbox=\hbox\relax
\let\rmrl=\amrl\relax
\let\wpercent=\rmwpercent\relax
\let\wpermille=\rmwpermille\relax
%%
\let\wpertenthousand=\rmwpertenthousand\relax
}

%
\def\arabname{%
\let\parentheses=\amparentheses\relax
\let\openparentheses=\amopenparentheses\relax
\let\closeparentheses=\amcloseparentheses\relax
\let\kashida=\amkashida\relax
\let\csum=\amcsum\relax
\let\cprod=\amcprod\relax
\let\clim=\amclim\relax
\let\sin=\amsin\relax
\let\cos=\amcos\relax
\let\tan=\amtan\relax
\let\cot=\amcot\relax
\let\sec=\amsec\relax
\let\csc=\amcsc\relax
\let\arcsin=\amarcsin\relax
\let\arccos=\amarccos\relax
\let\arctan=\amarctan\relax
\let\arccot=\amarccot\relax
\let\arcsec=\amarcsec\relax
\let\arccsc=\amarccsc\relax
\let\sinh=\amsinh\relax
\let\cosh=\amcosh\relax
\let\tanh=\amtanh\relax
\let\coth=\amcoth\relax
\let\sech=\amsech\relax
\let\csch=\amcsch\relax
\let\arcsinh=\amarcsinh\relax
\let\arccosh=\amarccosh\relax
\let\arctanh=\amarctanh\relax
\let\arccoth=\amarccoth\relax
\let\arcsech=\amarcsech\relax
\let\arccsch=\amarccsch\relax
\let\lg=\amlg\relax
\let\exp=\amexp\relax
\let\angle=\amangle\relax
\let\sqrt=\amsqrt\relax
%\let\asqrt=\aamsqrt
\let\root=\amroot\relax
\let\surd=\amsurd\relax
\let\sint=\amsint\relax
\let\lint=\amlint\relax
\let\seqm=\amseqm\relax
\let\leqm=\amleqm\relax
\let\leqv=\amleqv\relax
\let\in=\amin\relax
\let\ni=\amni\relax
\let\left=\amleft\relax
\let\right=\amright\relax
\let\Leftarrow=\amLeftarrow\relax
\let\Rightarrow=\amRightarrow\relax
\let\Longleftrightarrow=\amLongleftrightarrow\relax
\let\lbrace=\amlbrace\relax
\let\rbrace=\amrbrace\relax
\let\langle=\amlangle\relax
\let\rangle=\amrangle\relax
\let\earabnum=\amearabnum\relax
\let\warabnum=\amwarabnum\relax
\let\oldstylenum=\amoldstylenum\relax
\let\rl=\amrl\relax
\let\sp=\amsp\relax
\let\sb=\amsb\relax
\let\ssum=\amssum\relax
\let\lsum=\amlsum\relax
\let\gsum=\amgsum\relax
\let\sprod=\amsprod\relax
\let\lprod=\amlprod\relax
\let\gprod=\amgprod\relax
\let\lim=\amlim\relax
\let\cases=\amcases\relax
\let\matrix=\ammatrix\relax
\let\newfunc=\amnewfunc\relax
\let\frac=\amfrac\relax
\let\system=\amsystem\relax
\let\time=\amtime\relax
\let\day=\amday\relax
\let\month=\ammonth\relax
\let\year=\amyear\relax
\let\numtoday=\amnumtoday\relax
\let\wtoday=\amwtoday\relax
\let\etoday=\ametoday\relax
\let\ltoday=\amltoday\relax
\let\lating=\amlating\relax
\let\lem=\amlem\relax
\let\lwm=\amlwm\relax
\let\llm=\amllm\relax
%\let\reqno=\reqno\relax
%\let\leqno=\amleqno\relax
%\let\llap=\llap\relax
%\let\rlap=\rlap\relax
\let\widehat=\amwidehat\relax
\let\widetilde=\amwidetilde\relax
\let\overline=\amoverline\relax
\let\underline=\amunderline\relax
\let\overbrace=\amoverbrace\relax
\let\underbrace=\amunderbrace\relax
\let\overleftarrow=\amoverleftarrow\relax
\let\overrightarrow=\amoverrightarrow\relax
%\let\prime=\amprime\relax
\let\exists=\amexists\relax
\let\epercent=\amepercent\relax
\let\epermille=\amepermille\relax
%%
\let\epertenthousand=\amepertenthousand\relax
%\let\cdots=\amcdots\relax
\let\to=\amto\relax
\let\big=\ambig\relax
\let\Big=\amBig\relax
\let\bigg=\ambigg\relax
\let\Bigg=\amBigg\relax
\let\{=\amlbrace
\let\}=\amrbrace
%\let\hbox=\arhbox\relax
\let\amrl=\rmrl\relax
}

%
\def\eoption{%
\let\sint=\int\relax
\let\lint=\int\relax
\let\ssum=\sum\relax
\let\csum=\sum\relax
\let\lsum=\sum\relax
\let\sprod=\prod\relax
\let\cprod=\prod\relax
\let\lprod=\prod\relax
\let\clim=\lim\relax
%\let\arhbox=\frhbox\relax
\let\amrl=\relax
}

%
\def\enplus{%
\let\frac=\rmfrac\relax
%%
\let\cases=\rmcases\relax
\let\system=\rmsystem\relax
\let\wpercent=\rmwpercent\relax
\let\wpermille=\rmwpermille\relax
%%
\let\wpertenthousand=\rmwpertenthousand\relax
\let\epercent=\amepercent\relax
\let\epermille=\amepermille\relax
%%
\let\epertenthousand=\amepertenthousand\relax
\let\leqm=\rmleqm\relax
\let\leqv=\rmleqv\relax
\let\gsum=\rmgsum\relax
\let\gprod=\amgprod\relax
\let\arccot=\rmarccot\relax
\let\arcsec=\rmarcsec\relax
\let\arccsc=\rmarccsc\relax
\let\sech=\rmsech\relax
\let\csch=\rmcsch\relax
\let\arcsinh=\rmarcsinh\relax
\let\arccosh=\rmarccosh\relax
\let\arctanh=\rmarctanh\relax
\let\arccoth=\rmarccoth\relax
\let\arcsech=\rmarcsech\relax
\let\arccsch=\rmarccsch\relax
\let\seqm=\amseqm\relax
\let\time=\rmtime\relax
\let\day=\rmday\relax
\let\month=\rmmonth\relax
\let\year=\rmyear\relax
\let\numtoday=\rmnumtoday\relax
\let\wtoday=\amwtoday\relax
\let\etoday=\ametoday\relax
\let\ltoday=\amltoday\relax
}

% Arabi
\def\amoption{%
\let\arabmath=\amarabmath\relax
%\let\arabmath=\amarabmathA\relax
\let\latinmath=\amlatinmath\relax
}

\def\arabmath{\amarabmath}
\def\latinmath{\amlatinmath}
\def\lating{\amlating}
\def\warabnum{\amwarabnum}
\def\oldstylenum{\amoldstylenum}
\def\earabnum{\amearabnum}

%%
\let\latinletter=\amlatinletter\relax
\let\latinpunct=\amlatinpunct\relax
\let\arabpunct=\amarabpunct\relax



\endinput

\allowarab{\arabmath} \allowarab{\amarabmath}
\allowarab{\amarabenv} \allowarab{\everydisplay}
\allowarab{\amarabletter} \allowarab{\amarabpunct}
\allowarab{\amarabsym} \allowarab{\amcompatibility}

%rydarab1_7
\let\jdr=\amsqrt

\let\ambeh=\amb
\let\amjeem=\amj
\let\amseen=\amc
\let\amsad=\ams
\let\amtah=\amt
\let\amain=\ame
\let\amfeh=\amf
\let\amkaf=\amk
\let\amlam=\aml
\let\ammeem=\amm
\let\amheh=\amh
\let\amyeh=\amy
