diff options
author | Karl Berry <karl@freefriends.org> | 2013-05-17 22:26:13 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2013-05-17 22:26:13 +0000 |
commit | 80eb7bfc5d988aac41d54fb476da10747288bf1c (patch) | |
tree | 5690a4b3e07227d1db88bd999d14c81be3f31b64 /Master/texmf-dist/tex/generic/xint/xintfrac.sty | |
parent | 10710410fa127b4c7ebef6d49956901b912b16ba (diff) |
xint (17may13)
git-svn-id: svn://tug.org/texlive/trunk@30528 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/xint/xintfrac.sty')
-rw-r--r-- | Master/texmf-dist/tex/generic/xint/xintfrac.sty | 1072 |
1 files changed, 539 insertions, 533 deletions
diff --git a/Master/texmf-dist/tex/generic/xint/xintfrac.sty b/Master/texmf-dist/tex/generic/xint/xintfrac.sty index b74569d3c1b..a63770ad592 100644 --- a/Master/texmf-dist/tex/generic/xint/xintfrac.sty +++ b/Master/texmf-dist/tex/generic/xint/xintfrac.sty @@ -22,7 +22,7 @@ %% in the same archive or directory.) %% %%---------------------------------------------------------------- -%% The xint bundle (version 1.06a of May 9, 2013) +%% The xint bundle (version 1.06b of May 14, 2013) %% xintfrac: Expandable operations on fractions %% Copyright (C) 2013 by Jean-Francois Burnol %%---------------------------------------------------------------- @@ -108,11 +108,11 @@ \endlinechar=13 % \catcode123=1 % { \catcode125=2 % } - \catcode64=11 % @ + \catcode95=11 % _ \def\x {% \endgroup - \edef\XINT@frac@restorecatcodes@endinput + \edef\XINT_frac_restorecatcodes_endinput {% \catcode94=\the\catcode94 % ^ \catcode93=\the\catcode93 % ] @@ -130,7 +130,7 @@ \catcode45=\the\catcode45 % - \catcode44=\the\catcode44 % , \catcode35=\the\catcode35 % # - \catcode64=\the\catcode64 % @ + \catcode95=\the\catcode95 % _ \catcode125=\the\catcode125 % } \catcode123=\the\catcode123 % { \endlinechar=\the\endlinechar @@ -139,13 +139,14 @@ \catcode61=\the\catcode61\relax % = \noexpand\endinput }% - \XINT@setcatcodes + \XINT_setcatcodes \catcode91=12 % [ \catcode93=12 % ] \catcode94=7 % ^ }% \x \begingroup + \catcode64=11 % @ \catcode58=12 % : \expandafter\ifx\csname ProvidesPackage\endcsname\relax \def\x#1#2#3[#4]{\endgroup @@ -165,745 +166,750 @@ \fi \expandafter\x\csname ver@xintfrac.sty\endcsname \ProvidesPackage{xintfrac}% - [2013/05/09 v1.06a Expandable operations on fractions (jfB)]% + [2013/05/14 v1.06b Expandable operations on fractions (jfB)]% \def\xintLen {\romannumeral0\xintlen }% \def\xintlen #1% {% - \expandafter\XINT@flen\romannumeral0\XINT@infrac {#1}% + \expandafter\XINT_flen\romannumeral0\XINT_infrac {#1}% }% -\def\XINT@flen #1#2#3% +\def\XINT_flen #1#2#3% {% \expandafter\space - \the\numexpr -1+\XINT@Abs {#1}+\XINT@Len {#2}+\XINT@Len {#3}\relax + \the\numexpr -1+\XINT_Abs {#1}+\XINT_Len {#2}+\XINT_Len {#3}\relax }% -\def\XINT@outfrac #1#2#3% +\def\XINT_outfrac #1#2#3% {% - \ifcase\XINT@Sgn{#3} - \expandafter \XINT@outfrac@divisionbyzero + \ifcase\XINT_Sgn{#3} + \expandafter \XINT_outfrac_divisionbyzero \or - \expandafter \XINT@outfrac@P + \expandafter \XINT_outfrac_P \else - \expandafter \XINT@outfrac@N + \expandafter \XINT_outfrac_N \fi {#2}{#3}[#1]% }% -\def\XINT@outfrac@divisionbyzero #1#2{\xintError:DivisionByZero\space #1/0}% -\def\XINT@outfrac@P #1#2% +\def\XINT_outfrac_divisionbyzero #1#2{\xintError:DivisionByZero\space #1/0}% +\def\XINT_outfrac_P #1#2% {% - \ifcase\XINT@Sgn{#1} - \expandafter\XINT@outfrac@Zero + \ifcase\XINT_Sgn{#1} + \expandafter\XINT_outfrac_Zero \fi \space #1/#2% }% -\def\XINT@outfrac@Zero #1[#2]{ 0/1[0]}% -\def\XINT@outfrac@N #1#2% +\def\XINT_outfrac_Zero #1[#2]{ 0/1[0]}% +\def\XINT_outfrac_N #1#2% {% - \expandafter\XINT@outfrac@N@a\expandafter - {\romannumeral0\XINT@opp #2}{\romannumeral0\XINT@opp #1}% + \expandafter\XINT_outfrac_N_a\expandafter + {\romannumeral0\XINT_opp #2}{\romannumeral0\XINT_opp #1}% }% -\def\XINT@outfrac@N@a #1#2% +\def\XINT_outfrac_N_a #1#2% {% - \expandafter\XINT@outfrac@P\expandafter {#2}{#1}% + \expandafter\XINT_outfrac_P\expandafter {#2}{#1}% }% -\def\XINT@inFrac {\romannumeral0\XINT@infrac }% -\def\XINT@infrac #1% +\def\XINT_inFrac {\romannumeral0\XINT_infrac }% +\def\XINT_infrac #1% {% - \expandafter\XINT@infrac@ \romannumeral-`0#1[\W]\Z\T + \expandafter\XINT_infrac_ \romannumeral-`0#1[\W]\Z\T }% -\def\XINT@infrac@ #1[#2#3]#4\Z +\def\XINT_infrac_ #1[#2#3]#4\Z {% - \xint@UDwfork - #2\dummy \XINT@infrac@A - \W\dummy \XINT@infrac@B - \xint@UDkrof + \xint_UDwfork + #2\dummy \XINT_infrac_A + \W\dummy \XINT_infrac_B + \krof #1[#2#3]#4% }% -\def\XINT@infrac@A #1[\W]\T +\def\XINT_infrac_A #1[\W]\T {% - \XINT@frac #1/\W\Z + \XINT_frac #1/\W\Z }% -\def\XINT@infrac@B #1% +\def\XINT_infrac_B #1% {% - \xint@zero #1\XINT@infrac@Zero0\XINT@infrac@BB #1% + \xint_gob_til_zero #1\XINT_infrac_Zero0\XINT_infrac_BB #1% }% -\def\XINT@infrac@BB #1[\W]\T {\XINT@infrac@BC #1/\W\Z }% -\def\XINT@infrac@BC #1/#2#3\Z +\def\XINT_infrac_BB #1[\W]\T {\XINT_infrac_BC #1/\W\Z }% +\def\XINT_infrac_BC #1/#2#3\Z {% - \xint@UDwfork - #2\dummy \XINT@infrac@BCa - \W\dummy {\expandafter\XINT@infrac@BCb \romannumeral-`0#2}% - \xint@UDkrof + \xint_UDwfork + #2\dummy \XINT_infrac_BCa + \W\dummy {\expandafter\XINT_infrac_BCb \romannumeral-`0#2}% + \krof #3\Z #1\Z }% -\def\XINT@infrac@BCa \Z #1[#2]#3\Z { {#2}{#1}{1}}% -\def\XINT@infrac@BCb #1[#2]/\W\Z #3\Z { {#2}{#3}{#1}}% -\def\XINT@infrac@Zero #1\T { {0}{0}{1}}% -\def\XINT@frac #1/#2#3\Z +\def\XINT_infrac_BCa \Z #1[#2]#3\Z { {#2}{#1}{1}}% +\def\XINT_infrac_BCb #1[#2]/\W\Z #3\Z { {#2}{#3}{#1}}% +\def\XINT_infrac_Zero #1\T { {0}{0}{1}}% +\def\XINT_frac #1/#2#3\Z {% - \xint@UDwfork - #2\dummy \XINT@frac@A - \W\dummy {\expandafter\XINT@frac@B \romannumeral-`0#2}% - \xint@UDkrof + \xint_UDwfork + #2\dummy \XINT_frac_A + \W\dummy {\expandafter\XINT_frac_B \romannumeral-`0#2}% + \krof #3.\W\Z #1.\W\Z }% -\def\XINT@frac@B #1.#2#3\Z +\def\XINT_frac_B #1.#2#3\Z {% - \xint@UDwfork - #2\dummy \XINT@frac@Ba - \W\dummy {\XINT@frac@Bb #2}% - \xint@UDkrof + \xint_UDwfork + #2\dummy \XINT_frac_Ba + \W\dummy {\XINT_frac_Bb #2}% + \krof #3\Z #1\Z }% -\def\XINT@frac@Bb #1/\W.\W\Z #2\Z +\def\XINT_frac_Bb #1/\W.\W\Z #2\Z {% - \expandafter \XINT@frac@C \expandafter - {\romannumeral0\XINT@length {#1}}{#2#1}% + \expandafter \XINT_frac_C \expandafter + {\romannumeral0\XINT_length {#1}}{#2#1}% }% -\def\XINT@frac@Ba \Z #1/\W\Z {\XINT@frac@C {0}{#1}}% -\def\XINT@frac@A .\W\Z {\XINT@frac@C {0}{1}}% -\def\XINT@frac@C #1#2#3.#4#5\Z +\def\XINT_frac_Ba \Z #1/\W\Z {\XINT_frac_C {0}{#1}}% +\def\XINT_frac_A .\W\Z {\XINT_frac_C {0}{1}}% +\def\XINT_frac_C #1#2#3.#4#5\Z {% - \xint@UDwfork - #4\dummy \XINT@frac@Ca - \W\dummy {\XINT@frac@Cb #4}% - \xint@UDkrof + \xint_UDwfork + #4\dummy \XINT_frac_Ca + \W\dummy {\XINT_frac_Cb #4}% + \krof #5\Z #3\Z {#1}{#2}% }% -\def\XINT@frac@Ca \Z #1\Z {\XINT@frac@D {0}{#1}}% -\def\XINT@frac@Cb #1.\W\Z #2\Z +\def\XINT_frac_Ca \Z #1\Z {\XINT_frac_D {0}{#1}}% +\def\XINT_frac_Cb #1.\W\Z #2\Z {% - \expandafter\XINT@frac@D\expandafter - {\romannumeral0\XINT@length {#1}}{#2#1}% + \expandafter\XINT_frac_D\expandafter + {\romannumeral0\XINT_length {#1}}{#2#1}% }% -\def\XINT@frac@D #1#2#3#4% +\def\XINT_frac_D #1#2#3#4% {% - \expandafter \XINT@frac@E \expandafter + \expandafter \XINT_frac_E \expandafter {\the\numexpr -#1+#3\expandafter}\expandafter - {\romannumeral0\XINT@num@loop #2\R\R\R\R\R\R\R\R\Z }% - {\romannumeral0\XINT@num@loop #4\R\R\R\R\R\R\R\R\Z }% + {\romannumeral0\XINT_num_loop #2% + \xint_relax\xint_relax\xint_relax\xint_relax + \xint_relax\xint_relax\xint_relax\xint_relax\Z }% + {\romannumeral0\XINT_num_loop #4% + \xint_relax\xint_relax\xint_relax\xint_relax + \xint_relax\xint_relax\xint_relax\xint_relax\Z }% }% -\def\XINT@frac@E #1#2#3% +\def\XINT_frac_E #1#2#3% {% - \expandafter \XINT@frac@F #3\Z {#2}{#1}% + \expandafter \XINT_frac_F #3\Z {#2}{#1}% }% -\def\XINT@frac@F #1% +\def\XINT_frac_F #1% {% - \xint@UDzerominusfork - #1-\dummy \XINT@frac@Gdivisionbyzero - 0#1\dummy \XINT@frac@Gneg - 0-\dummy {\XINT@frac@Gpos #1}% - \xint@UDkrof + \xint_UDzerominusfork + #1-\dummy \XINT_frac_Gdivisionbyzero + 0#1\dummy \XINT_frac_Gneg + 0-\dummy {\XINT_frac_Gpos #1}% + \krof }% -\def\XINT@frac@Gdivisionbyzero #1\Z #2#3% +\def\XINT_frac_Gdivisionbyzero #1\Z #2#3% {% \xintError:DivisionByZero\space {0}{#2}{0}% }% -\def\XINT@frac@Gneg #1\Z #2#3% +\def\XINT_frac_Gneg #1\Z #2#3% {% - \expandafter\XINT@frac@H \expandafter{\romannumeral0\XINT@opp #2}{#3}{#1}% + \expandafter\XINT_frac_H \expandafter{\romannumeral0\XINT_opp #2}{#3}{#1}% }% -\def\XINT@frac@H #1#2{ {#2}{#1}}% -\def\XINT@frac@Gpos #1\Z #2#3{ {#3}{#2}{#1}}% -\def\XINT@factortens #1% +\def\XINT_frac_H #1#2{ {#2}{#1}}% +\def\XINT_frac_Gpos #1\Z #2#3{ {#3}{#2}{#1}}% +\def\XINT_factortens #1% {% - \expandafter\XINT@cuz@cnt@loop\expandafter - {\expandafter}\romannumeral0\XINT@rord@main {}#1% - \xint@UNDEF - \xint@undef\xint@undef\xint@undef\xint@undef - \xint@undef\xint@undef\xint@undef\xint@undef - \xint@UNDEF + \expandafter\XINT_cuz_cnt_loop\expandafter + {\expandafter}\romannumeral0\XINT_rord_main {}#1% + \xint_relax + \xint_undef\xint_undef\xint_undef\xint_undef + \xint_undef\xint_undef\xint_undef\xint_undef + \xint_relax \R\R\R\R\R\R\R\R\Z }% -\def\XINT@cuz@cnt #1% +\def\XINT_cuz_cnt #1% {% - \XINT@cuz@cnt@loop {}#1\R\R\R\R\R\R\R\R\Z + \XINT_cuz_cnt_loop {}#1\R\R\R\R\R\R\R\R\Z }% -\def\XINT@cuz@cnt@loop #1#2#3#4#5#6#7#8#9% +\def\XINT_cuz_cnt_loop #1#2#3#4#5#6#7#8#9% {% - \xint@r #9\XINT@cuz@cnt@toofara \R - \expandafter\XINT@cuz@cnt@checka\expandafter + \xint_gob_til_r #9\XINT_cuz_cnt_toofara \R + \expandafter\XINT_cuz_cnt_checka\expandafter {\the\numexpr #1+8\relax}{#2#3#4#5#6#7#8#9}% }% -\def\XINT@cuz@cnt@toofara\R - \expandafter\XINT@cuz@cnt@checka\expandafter #1#2% +\def\XINT_cuz_cnt_toofara\R + \expandafter\XINT_cuz_cnt_checka\expandafter #1#2% {% - \XINT@cuz@cnt@toofarb {#1}#2% + \XINT_cuz_cnt_toofarb {#1}#2% }% -\def\XINT@cuz@cnt@toofarb #1#2\Z {\XINT@cuz@cnt@toofarc #2\Z {#1}}% -\def\XINT@cuz@cnt@toofarc #1#2#3#4#5#6#7#8% +\def\XINT_cuz_cnt_toofarb #1#2\Z {\XINT_cuz_cnt_toofarc #2\Z {#1}}% +\def\XINT_cuz_cnt_toofarc #1#2#3#4#5#6#7#8% {% - \xint@r #2\XINT@cuz@cnt@toofard 7% - #3\XINT@cuz@cnt@toofard 6% - #4\XINT@cuz@cnt@toofard 5% - #5\XINT@cuz@cnt@toofard 4% - #6\XINT@cuz@cnt@toofard 3% - #7\XINT@cuz@cnt@toofard 2% - #8\XINT@cuz@cnt@toofard 1% + \xint_gob_til_r #2\XINT_cuz_cnt_toofard 7% + #3\XINT_cuz_cnt_toofard 6% + #4\XINT_cuz_cnt_toofard 5% + #5\XINT_cuz_cnt_toofard 4% + #6\XINT_cuz_cnt_toofard 3% + #7\XINT_cuz_cnt_toofard 2% + #8\XINT_cuz_cnt_toofard 1% \Z #1#2#3#4#5#6#7#8% }% -\def\XINT@cuz@cnt@toofard #1#2\Z #3\R #4\Z #5% +\def\XINT_cuz_cnt_toofard #1#2\Z #3\R #4\Z #5% {% - \expandafter\XINT@cuz@cnt@toofare + \expandafter\XINT_cuz_cnt_toofare \the\numexpr #3\relax \R\R\R\R\R\R\R\R\Z {\the\numexpr #5-#1\relax}\R\Z }% -\def\XINT@cuz@cnt@toofare #1#2#3#4#5#6#7#8% +\def\XINT_cuz_cnt_toofare #1#2#3#4#5#6#7#8% {% - \xint@r #2\XINT@cuz@cnt@stopc 1% - #3\XINT@cuz@cnt@stopc 2% - #4\XINT@cuz@cnt@stopc 3% - #5\XINT@cuz@cnt@stopc 4% - #6\XINT@cuz@cnt@stopc 5% - #7\XINT@cuz@cnt@stopc 6% - #8\XINT@cuz@cnt@stopc 7% + \xint_gob_til_r #2\XINT_cuz_cnt_stopc 1% + #3\XINT_cuz_cnt_stopc 2% + #4\XINT_cuz_cnt_stopc 3% + #5\XINT_cuz_cnt_stopc 4% + #6\XINT_cuz_cnt_stopc 5% + #7\XINT_cuz_cnt_stopc 6% + #8\XINT_cuz_cnt_stopc 7% \Z #1#2#3#4#5#6#7#8% }% -\def\XINT@cuz@cnt@checka #1#2% +\def\XINT_cuz_cnt_checka #1#2% {% - \expandafter\XINT@cuz@cnt@checkb\the\numexpr #2\relax \Z {#1}% + \expandafter\XINT_cuz_cnt_checkb\the\numexpr #2\relax \Z {#1}% }% -\def\XINT@cuz@cnt@checkb #1% +\def\XINT_cuz_cnt_checkb #1% {% - \xint@zero #1\expandafter\XINT@cuz@cnt@loop\xint@z - 0\XINT@cuz@cnt@stopa #1% + \xint_gob_til_zero #1\expandafter\XINT_cuz_cnt_loop\xint_gob_til_z + 0\XINT_cuz_cnt_stopa #1% }% -\def\XINT@cuz@cnt@stopa #1\Z +\def\XINT_cuz_cnt_stopa #1\Z {% - \XINT@cuz@cnt@stopb #1\R\R\R\R\R\R\R\R\Z % + \XINT_cuz_cnt_stopb #1\R\R\R\R\R\R\R\R\Z % }% -\def\XINT@cuz@cnt@stopb #1#2#3#4#5#6#7#8#9% +\def\XINT_cuz_cnt_stopb #1#2#3#4#5#6#7#8#9% {% - \xint@r #2\XINT@cuz@cnt@stopc 1% - #3\XINT@cuz@cnt@stopc 2% - #4\XINT@cuz@cnt@stopc 3% - #5\XINT@cuz@cnt@stopc 4% - #6\XINT@cuz@cnt@stopc 5% - #7\XINT@cuz@cnt@stopc 6% - #8\XINT@cuz@cnt@stopc 7% - #9\XINT@cuz@cnt@stopc 8% + \xint_gob_til_r #2\XINT_cuz_cnt_stopc 1% + #3\XINT_cuz_cnt_stopc 2% + #4\XINT_cuz_cnt_stopc 3% + #5\XINT_cuz_cnt_stopc 4% + #6\XINT_cuz_cnt_stopc 5% + #7\XINT_cuz_cnt_stopc 6% + #8\XINT_cuz_cnt_stopc 7% + #9\XINT_cuz_cnt_stopc 8% \Z #1#2#3#4#5#6#7#8#9% }% -\def\XINT@cuz@cnt@stopc #1#2\Z #3\R #4\Z #5% +\def\XINT_cuz_cnt_stopc #1#2\Z #3\R #4\Z #5% {% - \expandafter\XINT@cuz@cnt@stopd\expandafter + \expandafter\XINT_cuz_cnt_stopd\expandafter {\the\numexpr #5-#1}#3% }% -\def\XINT@cuz@cnt@stopd #1#2\R #3\Z +\def\XINT_cuz_cnt_stopd #1#2\R #3\Z {% \expandafter\space\expandafter - {\romannumeral0\XINT@rord@main {}#2% - \xint@UNDEF - \xint@undef\xint@undef\xint@undef\xint@undef - \xint@undef\xint@undef\xint@undef\xint@undef - \xint@UNDEF }{#1}% + {\romannumeral0\XINT_rord_main {}#2% + \xint_relax + \xint_undef\xint_undef\xint_undef\xint_undef + \xint_undef\xint_undef\xint_undef\xint_undef + \xint_relax }{#1}% }% \def\xintRaw {\romannumeral0\xintraw }% \def\xintraw {% - \expandafter\XINT@raw\romannumeral0\XINT@infrac + \expandafter\XINT_raw\romannumeral0\XINT_infrac }% -\def\XINT@raw #1% +\def\XINT_raw #1% {% - \ifcase\XINT@Sgn {#1} - \expandafter\XINT@raw@Ba + \ifcase\XINT_Sgn {#1} + \expandafter\XINT_raw_Ba \or - \expandafter\XINT@raw@A + \expandafter\XINT_raw_A \else - \expandafter\XINT@raw@Ba + \expandafter\XINT_raw_Ba \fi {#1}% }% -\def\XINT@raw@A #1#2#3{\xint@dsh {#2}{-#1}/#3}% -\def\XINT@raw@Ba #1#2#3{\expandafter\XINT@raw@Bb - \expandafter{\romannumeral0\xint@dsh {#3}{#1}}{#2}}% -\def\XINT@raw@Bb #1#2{ #2/#1}% +\def\XINT_raw_A #1#2#3{\xint_dsh {#2}{-#1}/#3}% +\def\XINT_raw_Ba #1#2#3{\expandafter\XINT_raw_Bb + \expandafter{\romannumeral0\xint_dsh {#3}{#1}}{#2}}% +\def\XINT_raw_Bb #1#2{ #2/#1}% \def\xintNumerator {\romannumeral0\xintnumerator }% \def\xintnumerator {% - \expandafter\XINT@numer\romannumeral0\XINT@infrac + \expandafter\XINT_numer\romannumeral0\XINT_infrac }% -\def\XINT@numer #1% +\def\XINT_numer #1% {% - \ifcase\XINT@Sgn {#1} - \expandafter\XINT@numer@B + \ifcase\XINT_Sgn {#1} + \expandafter\XINT_numer_B \or - \expandafter\XINT@numer@A + \expandafter\XINT_numer_A \else - \expandafter\XINT@numer@B + \expandafter\XINT_numer_B \fi {#1}% }% -\def\XINT@numer@A #1#2#3{\xint@dsh {#2}{-#1}}% -\def\XINT@numer@B #1#2#3{ #2}% +\def\XINT_numer_A #1#2#3{\xint_dsh {#2}{-#1}}% +\def\XINT_numer_B #1#2#3{ #2}% \def\xintDenominator {\romannumeral0\xintdenominator }% \def\xintdenominator {% - \expandafter\XINT@denom\romannumeral0\XINT@infrac + \expandafter\XINT_denom\romannumeral0\XINT_infrac }% -\def\XINT@denom #1% +\def\XINT_denom #1% {% - \ifcase\XINT@Sgn {#1} - \expandafter\XINT@denom@B + \ifcase\XINT_Sgn {#1} + \expandafter\XINT_denom_B \or - \expandafter\XINT@denom@A + \expandafter\XINT_denom_A \else - \expandafter\XINT@denom@B + \expandafter\XINT_denom_B \fi {#1}% }% -\def\XINT@denom@A #1#2#3{ #3}% -\def\XINT@denom@B #1#2#3{\xint@dsh {#3}{#1}}% +\def\XINT_denom_A #1#2#3{ #3}% +\def\XINT_denom_B #1#2#3{\xint_dsh {#3}{#1}}% \def\xintFrac {\romannumeral0\xintfrac }% \def\xintfrac #1% {% - \expandafter\XINT@@frac@A\romannumeral0\XINT@infrac {#1}% + \expandafter\XINT__frac_A\romannumeral0\XINT_infrac {#1}% }% -\def\XINT@@frac@A #1{\XINT@@frac@B #1\Z }% -\def\XINT@@frac@B #1#2\Z +\def\XINT__frac_A #1{\XINT__frac_B #1\Z }% +\def\XINT__frac_B #1#2\Z {% - \xint@zero #1\XINT@@frac@C 0\XINT@@frac@D {10^{#1#2}}% + \xint_gob_til_zero #1\XINT__frac_C 0\XINT__frac_D {10^{#1#2}}% }% -\def\XINT@@frac@C #1#2#3#4#5% +\def\XINT__frac_C #1#2#3#4#5% {% - \ifcase\XINT@isOne {#5} - \or \xint@afterfi {\expandafter\xint@firstoftwo@andstop\xint@gobble@ii }% + \ifcase\XINT_isOne {#5} + \or \xint_afterfi {\expandafter\xint_firstoftwo_andstop\xint_gobble_ii }% \fi \space \frac {#4}{#5}% }% -\def\XINT@@frac@D #1#2#3% +\def\XINT__frac_D #1#2#3% {% - \ifcase\XINT@isOne {#3} - \or \XINT@@frac@E + \ifcase\XINT_isOne {#3} + \or \XINT__frac_E \fi \space \frac {#2}{#3}#1% }% -\def\XINT@@frac@E \fi #1#2#3#4{\fi \space #3\cdot }% +\def\XINT__frac_E \fi #1#2#3#4{\fi \space #3\cdot }% \def\xintSignedFrac {\romannumeral0\xintsignedfrac }% \def\xintsignedfrac #1% {% - \expandafter\XINT@sgnfrac@a\romannumeral0\XINT@infrac {#1}% + \expandafter\XINT_sgnfrac_a\romannumeral0\XINT_infrac {#1}% }% -\def\XINT@sgnfrac@a #1#2% +\def\XINT_sgnfrac_a #1#2% {% - \XINT@sgnfrac@b #2\Z {#1}% + \XINT_sgnfrac_b #2\Z {#1}% }% -\def\XINT@sgnfrac@b #1% +\def\XINT_sgnfrac_b #1% {% - \xint@UDsignfork - #1\dummy \XINT@sgnfrac@N - -\dummy {\XINT@sgnfrac@P #1}% - \xint@UDkrof + \xint_UDsignfork + #1\dummy \XINT_sgnfrac_N + -\dummy {\XINT_sgnfrac_P #1}% + \krof }% -\def\XINT@sgnfrac@P #1\Z #2% +\def\XINT_sgnfrac_P #1\Z #2% {% - \XINT@@frac@A {#2}{#1}% + \XINT__frac_A {#2}{#1}% }% -\def\XINT@sgnfrac@N +\def\XINT_sgnfrac_N {% - \expandafter\xint@minus@andstop\romannumeral0\XINT@sgnfrac@P + \expandafter\xint_minus_andstop\romannumeral0\XINT_sgnfrac_P }% \def\xintFwOver {\romannumeral0\xintfwover }% \def\xintfwover #1% {% - \expandafter\XINT@fwover@A\romannumeral0\XINT@infrac {#1}% + \expandafter\XINT_fwover_A\romannumeral0\XINT_infrac {#1}% }% -\def\XINT@fwover@A #1{\XINT@fwover@B #1\Z }% -\def\XINT@fwover@B #1#2\Z +\def\XINT_fwover_A #1{\XINT_fwover_B #1\Z }% +\def\XINT_fwover_B #1#2\Z {% - \xint@zero #1\XINT@fwover@C 0\XINT@fwover@D {10^{#1#2}}% + \xint_gob_til_zero #1\XINT_fwover_C 0\XINT_fwover_D {10^{#1#2}}% }% -\def\XINT@fwover@C #1#2#3#4#5% +\def\XINT_fwover_C #1#2#3#4#5% {% - \ifcase\XINT@isOne {#5} - \xint@afterfi { {#4\over #5}}% + \ifcase\XINT_isOne {#5} + \xint_afterfi { {#4\over #5}}% \or - \xint@afterfi { #4}% + \xint_afterfi { #4}% \fi }% -\def\XINT@fwover@D #1#2#3% +\def\XINT_fwover_D #1#2#3% {% - \ifcase\XINT@isOne {#3} - \xint@afterfi { {#2\over #3}}% + \ifcase\XINT_isOne {#3} + \xint_afterfi { {#2\over #3}}% \or - \xint@afterfi { #2\cdot }% + \xint_afterfi { #2\cdot }% \fi #1% }% \def\xintSignedFwOver {\romannumeral0\xintsignedfwover }% \def\xintsignedfwover #1% {% - \expandafter\XINT@sgnfwover@a\romannumeral0\XINT@infrac {#1}% + \expandafter\XINT_sgnfwover_a\romannumeral0\XINT_infrac {#1}% }% -\def\XINT@sgnfwover@a #1#2% +\def\XINT_sgnfwover_a #1#2% {% - \XINT@sgnfwover@b #2\Z {#1}% + \XINT_sgnfwover_b #2\Z {#1}% }% -\def\XINT@sgnfwover@b #1% +\def\XINT_sgnfwover_b #1% {% - \xint@UDsignfork - #1\dummy \XINT@sgnfwover@N - -\dummy {\XINT@sgnfwover@P #1}% - \xint@UDkrof + \xint_UDsignfork + #1\dummy \XINT_sgnfwover_N + -\dummy {\XINT_sgnfwover_P #1}% + \krof }% -\def\XINT@sgnfwover@P #1\Z #2% +\def\XINT_sgnfwover_P #1\Z #2% {% - \XINT@fwover@A {#2}{#1}% + \XINT_fwover_A {#2}{#1}% }% -\def\XINT@sgnfwover@N +\def\XINT_sgnfwover_N {% - \expandafter\xint@minus@andstop\romannumeral0\XINT@sgnfwover@P + \expandafter\xint_minus_andstop\romannumeral0\XINT_sgnfwover_P }% \def\xintREZ {\romannumeral0\xintrez }% \def\xintrez {% - \expandafter\XINT@rez@A\romannumeral0\XINT@infrac + \expandafter\XINT_rez_A\romannumeral0\XINT_infrac }% -\def\XINT@rez@A #1#2% +\def\XINT_rez_A #1#2% {% - \XINT@rez@AB #2\Z {#1}% + \XINT_rez_AB #2\Z {#1}% }% -\def\XINT@rez@AB #1% +\def\XINT_rez_AB #1% {% - \xint@UDzerominusfork - #1-\dummy \XINT@rez@zero - 0#1\dummy \XINT@rez@neg - 0-\dummy {\XINT@rez@B #1}% - \xint@UDkrof + \xint_UDzerominusfork + #1-\dummy \XINT_rez_zero + 0#1\dummy \XINT_rez_neg + 0-\dummy {\XINT_rez_B #1}% + \krof }% -\def\XINT@rez@zero #1\Z #2#3{ 0/1[0]}% -\def\XINT@rez@neg {\expandafter\xint@minus@andstop\romannumeral0\XINT@rez@B }% -\def\XINT@rez@B #1\Z +\def\XINT_rez_zero #1\Z #2#3{ 0/1[0]}% +\def\XINT_rez_neg {\expandafter\xint_minus_andstop\romannumeral0\XINT_rez_B }% +\def\XINT_rez_B #1\Z {% - \expandafter\XINT@rez@C\romannumeral0\XINT@factortens {#1}% + \expandafter\XINT_rez_C\romannumeral0\XINT_factortens {#1}% }% -\def\XINT@rez@C #1#2#3#4% +\def\XINT_rez_C #1#2#3#4% {% - \expandafter\XINT@rez@D\romannumeral0\XINT@factortens {#4}{#3}{#2}{#1}% + \expandafter\XINT_rez_D\romannumeral0\XINT_factortens {#4}{#3}{#2}{#1}% }% -\def\XINT@rez@D #1#2#3#4#5% +\def\XINT_rez_D #1#2#3#4#5% {% - \expandafter\XINT@rez@E\expandafter + \expandafter\XINT_rez_E\expandafter {\the\numexpr #3+#4-#2}{#1}{#5}% }% -\def\XINT@rez@E #1#2#3{ #3/#2[#1]}% +\def\XINT_rez_E #1#2#3{ #3/#2[#1]}% \def\xintIrr {\romannumeral0\xintirr }% \def\xintirr #1% {% - \expandafter\XINT@irr@start\romannumeral0\xintraw {#1}\Z + \expandafter\XINT_irr_start\romannumeral0\xintraw {#1}\Z }% -\def\XINT@irr@start #1#2/#3\Z +\def\XINT_irr_start #1#2/#3\Z {% - \ifcase\XINT@isOne {#3} - \xint@afterfi - {\xint@UDsignfork - #1\dummy \XINT@irr@negative - -\dummy {\XINT@irr@nonneg #1}% - \xint@UDkrof}% + \ifcase\XINT_isOne {#3} + \xint_afterfi + {\xint_UDsignfork + #1\dummy \XINT_irr_negative + -\dummy {\XINT_irr_nonneg #1}% + \krof}% \or - \xint@afterfi{\XINT@irr@denomisone #1}% + \xint_afterfi{\XINT_irr_denomisone #1}% \fi #2\Z {#3}% }% -\def\XINT@irr@denomisone #1\Z #2{ #1}% -\def\XINT@irr@negative #1\Z #2{\XINT@irr@D #1\Z #2\Z \xint@minus@andstop}% -\def\XINT@irr@nonneg #1\Z #2{\XINT@irr@D #1\Z #2\Z \space}% -\def\XINT@irr@D #1#2\Z #3#4\Z -{% - \xint@UDzerosfork - #3#1\dummy \XINT@irr@indeterminate - #30\dummy \XINT@irr@divisionbyzero - #10\dummy \XINT@irr@zero - 00\dummy \XINT@irr@loop@a - \xint@UDkrof +\def\XINT_irr_denomisone #1\Z #2{ #1}% +\def\XINT_irr_negative #1\Z #2{\XINT_irr_D #1\Z #2\Z \xint_minus_andstop}% +\def\XINT_irr_nonneg #1\Z #2{\XINT_irr_D #1\Z #2\Z \space}% +\def\XINT_irr_D #1#2\Z #3#4\Z +{% + \xint_UDzerosfork + #3#1\dummy \XINT_irr_indeterminate + #30\dummy \XINT_irr_divisionbyzero + #10\dummy \XINT_irr_zero + 00\dummy \XINT_irr_loop_a + \krof {#3#4}{#1#2}{#3#4}{#1#2}% }% -\def\XINT@irr@indeterminate #1#2#3#4#5{\xintError:NaN\space 0/0}% -\def\XINT@irr@divisionbyzero #1#2#3#4#5{\xintError:DivisionByZero #5#2/0}% -\def\XINT@irr@zero #1#2#3#4#5{ 0}% -\def\XINT@irr@loop@a #1#2% +\def\XINT_irr_indeterminate #1#2#3#4#5{\xintError:NaN\space 0/0}% +\def\XINT_irr_divisionbyzero #1#2#3#4#5{\xintError:DivisionByZero #5#2/0}% +\def\XINT_irr_zero #1#2#3#4#5{ 0}% +\def\XINT_irr_loop_a #1#2% {% - \expandafter\XINT@irr@loop@d - \romannumeral0\XINT@div@prepare {#1}{#2}{#1}% + \expandafter\XINT_irr_loop_d + \romannumeral0\XINT_div_prepare {#1}{#2}{#1}% }% -\def\XINT@irr@loop@d #1#2% +\def\XINT_irr_loop_d #1#2% {% - \XINT@irr@loop@e #2\Z + \XINT_irr_loop_e #2\Z }% -\def\XINT@irr@loop@e #1#2\Z +\def\XINT_irr_loop_e #1#2\Z {% - \xint@zero #1\xint@irr@loop@exit0\XINT@irr@loop@a {#1#2}% + \xint_gob_til_zero #1\xint_irr_loop_exit0\XINT_irr_loop_a {#1#2}% }% -\def\xint@irr@loop@exit0\XINT@irr@loop@a #1#2#3#4% +\def\xint_irr_loop_exit0\XINT_irr_loop_a #1#2#3#4% {% - \expandafter\XINT@irr@loop@exitb\expandafter + \expandafter\XINT_irr_loop_exitb\expandafter {\romannumeral0\xintiquo {#3}{#2}}% {\romannumeral0\xintiquo {#4}{#2}}% }% -\def\XINT@irr@loop@exitb #1#2% +\def\XINT_irr_loop_exitb #1#2% {% - \expandafter\XINT@irr@finish\expandafter {#2}{#1}% + \expandafter\XINT_irr_finish\expandafter {#2}{#1}% }% -\def\XINT@irr@finish #1#2#3% +\def\XINT_irr_finish #1#2#3% {% - \ifcase\XINT@isOne {#2} - \xint@afterfi {#3#1/#2}% + \ifcase\XINT_isOne {#2} + \xint_afterfi {#3#1/#2}% \or - \xint@afterfi {#3#1}% + \xint_afterfi {#3#1}% \fi }% \def\xintNum {\romannumeral0\xintnum }% -\def\xintnum #1{\expandafter\XINT@intcheck\romannumeral0\xintirr {#1}/\W\Z }% -\def\XINT@intcheck #1/#2#3\Z +\def\xintnum #1{\expandafter\XINT_intcheck\romannumeral0\xintirr {#1}/\W\Z }% +\def\XINT_intcheck #1/#2#3\Z {% - \xint@w #2\xint@gobble@ii\W\xintError:NotAnInteger + \xint_gob_til_w #2\xint_gobble_ii\W + \xintError:NotAnInteger \space #1% }% \def\xintJrr {\romannumeral0\xintjrr }% \def\xintjrr #1% {% - \expandafter\XINT@jrr@start\romannumeral0\xintraw {#1}\Z + \expandafter\XINT_jrr_start\romannumeral0\xintraw {#1}\Z }% -\def\XINT@jrr@start #1#2/#3\Z +\def\XINT_jrr_start #1#2/#3\Z {% - \ifcase\XINT@isOne {#3} - \xint@afterfi - {\xint@UDsignfork - #1\dummy \XINT@jrr@negative - -\dummy {\XINT@jrr@nonneg #1}% - \xint@UDkrof}% + \ifcase\XINT_isOne {#3} + \xint_afterfi + {\xint_UDsignfork + #1\dummy \XINT_jrr_negative + -\dummy {\XINT_jrr_nonneg #1}% + \krof}% \or - \xint@afterfi{\XINT@jrr@denomisone #1}% + \xint_afterfi{\XINT_jrr_denomisone #1}% \fi #2\Z {#3}% }% -\def\XINT@jrr@denomisone #1\Z #2{ #1}% -\def\XINT@jrr@negative #1\Z #2{\XINT@jrr@D #1\Z #2\Z \xint@minus@andstop }% -\def\XINT@jrr@nonneg #1\Z #2{\XINT@jrr@D #1\Z #2\Z \space}% -\def\XINT@jrr@D #1#2\Z #3#4\Z -{% - \xint@UDzerosfork - #3#1\dummy \XINT@jrr@indeterminate - #30\dummy \XINT@jrr@divisionbyzero - #10\dummy \XINT@jrr@zero - 00\dummy \XINT@jrr@loop@a - \xint@UDkrof +\def\XINT_jrr_denomisone #1\Z #2{ #1}% +\def\XINT_jrr_negative #1\Z #2{\XINT_jrr_D #1\Z #2\Z \xint_minus_andstop }% +\def\XINT_jrr_nonneg #1\Z #2{\XINT_jrr_D #1\Z #2\Z \space}% +\def\XINT_jrr_D #1#2\Z #3#4\Z +{% + \xint_UDzerosfork + #3#1\dummy \XINT_jrr_indeterminate + #30\dummy \XINT_jrr_divisionbyzero + #10\dummy \XINT_jrr_zero + 00\dummy \XINT_jrr_loop_a + \krof {#3#4}{#1#2}1001% }% -\def\XINT@jrr@indeterminate #1#2#3#4#5#6#7{\xintError:NaN\space 0/0}% -\def\XINT@jrr@divisionbyzero #1#2#3#4#5#6#7{\xintError:DivisionByZero #7#2/0}% -\def\XINT@jrr@zero #1#2#3#4#5#6#7{ 0}% -\def\XINT@jrr@loop@a #1#2% +\def\XINT_jrr_indeterminate #1#2#3#4#5#6#7{\xintError:NaN\space 0/0}% +\def\XINT_jrr_divisionbyzero #1#2#3#4#5#6#7{\xintError:DivisionByZero #7#2/0}% +\def\XINT_jrr_zero #1#2#3#4#5#6#7{ 0}% +\def\XINT_jrr_loop_a #1#2% {% - \expandafter\XINT@jrr@loop@b - \romannumeral0\XINT@div@prepare {#1}{#2}{#1}% + \expandafter\XINT_jrr_loop_b + \romannumeral0\XINT_div_prepare {#1}{#2}{#1}% }% -\def\XINT@jrr@loop@b #1#2#3#4#5#6#7% +\def\XINT_jrr_loop_b #1#2#3#4#5#6#7% {% - \expandafter \XINT@jrr@loop@c \expandafter - {\romannumeral0\xintiadd{\XINT@Mul{#4}{#1}}{#6}}% - {\romannumeral0\xintiadd{\XINT@Mul{#5}{#1}}{#7}}% + \expandafter \XINT_jrr_loop_c \expandafter + {\romannumeral0\xintiadd{\XINT_Mul{#4}{#1}}{#6}}% + {\romannumeral0\xintiadd{\XINT_Mul{#5}{#1}}{#7}}% {#2}{#3}{#4}{#5}% }% -\def\XINT@jrr@loop@c #1#2% +\def\XINT_jrr_loop_c #1#2% {% - \expandafter \XINT@jrr@loop@d \expandafter{#2}{#1}% + \expandafter \XINT_jrr_loop_d \expandafter{#2}{#1}% }% -\def\XINT@jrr@loop@d #1#2#3#4% +\def\XINT_jrr_loop_d #1#2#3#4% {% - \XINT@jrr@loop@e #3\Z {#4}{#2}{#1}% + \XINT_jrr_loop_e #3\Z {#4}{#2}{#1}% }% -\def\XINT@jrr@loop@e #1#2\Z +\def\XINT_jrr_loop_e #1#2\Z {% - \xint@zero #1\xint@jrr@loop@exit0\XINT@jrr@loop@a {#1#2}% + \xint_gob_til_zero #1\xint_jrr_loop_exit0\XINT_jrr_loop_a {#1#2}% }% -\def\xint@jrr@loop@exit0\XINT@jrr@loop@a #1#2#3#4#5#6% +\def\xint_jrr_loop_exit0\XINT_jrr_loop_a #1#2#3#4#5#6% {% - \XINT@irr@finish {#3}{#4}% + \XINT_irr_finish {#3}{#4}% }% \def\xintTrunc {\romannumeral0\xinttrunc }% \def\xintiTrunc {\romannumeral0\xintitrunc }% \def\xinttrunc #1% {% - \expandafter\XINT@trunc\expandafter {\the\numexpr #1}% + \expandafter\XINT_trunc\expandafter {\the\numexpr #1}% }% -\def\XINT@trunc #1#2% +\def\XINT_trunc #1#2% {% - \expandafter\XINT@trunc@G - \romannumeral0\expandafter\XINT@trunc@A - \romannumeral0\XINT@infrac {#2}{#1}{#1}% + \expandafter\XINT_trunc_G + \romannumeral0\expandafter\XINT_trunc_A + \romannumeral0\XINT_infrac {#2}{#1}{#1}% }% \def\xintitrunc #1% {% - \expandafter\XINT@itrunc\expandafter {\the\numexpr #1}% + \expandafter\XINT_itrunc\expandafter {\the\numexpr #1}% }% -\def\XINT@itrunc #1#2% +\def\XINT_itrunc #1#2% {% - \expandafter\XINT@itrunc@G - \romannumeral0\expandafter\XINT@trunc@A - \romannumeral0\XINT@infrac {#2}{#1}{#1}% + \expandafter\XINT_itrunc_G + \romannumeral0\expandafter\XINT_trunc_A + \romannumeral0\XINT_infrac {#2}{#1}{#1}% }% -\def\XINT@trunc@A #1#2#3#4% +\def\XINT_trunc_A #1#2#3#4% {% - \expandafter\XINT@trunc@checkifzero + \expandafter\XINT_trunc_checkifzero \expandafter{\the\numexpr #1+#4}#2\Z {#3}% }% -\def\XINT@trunc@checkifzero #1#2#3\Z +\def\XINT_trunc_checkifzero #1#2#3\Z {% - \xint@zero #2\XINT@trunc@iszero0\XINT@trunc@B {#1}{#2#3}% + \xint_gob_til_zero #2\XINT_trunc_iszero0\XINT_trunc_B {#1}{#2#3}% }% -\def\XINT@trunc@iszero #1#2#3#4#5{ 0\Z 0}% -\def\XINT@trunc@B #1% +\def\XINT_trunc_iszero #1#2#3#4#5{ 0\Z 0}% +\def\XINT_trunc_B #1% {% - \ifcase\XINT@Sgn {#1} - \expandafter\XINT@trunc@D + \ifcase\XINT_Sgn {#1} + \expandafter\XINT_trunc_D \or - \expandafter\XINT@trunc@D + \expandafter\XINT_trunc_D \else - \expandafter\XINT@trunc@C + \expandafter\XINT_trunc_C \fi {#1}% }% -\def\XINT@trunc@C #1#2#3% +\def\XINT_trunc_C #1#2#3% {% - \expandafter \XINT@trunc@E - \romannumeral0\xint@dsh {#3}{#1}\Z #2\Z + \expandafter \XINT_trunc_E + \romannumeral0\xint_dsh {#3}{#1}\Z #2\Z }% -\def\XINT@trunc@D #1#2% +\def\XINT_trunc_D #1#2% {% - \expandafter \XINT@trunc@DE \expandafter - {\romannumeral0\xint@dsh {#2}{-#1}}% + \expandafter \XINT_trunc_DE \expandafter + {\romannumeral0\xint_dsh {#2}{-#1}}% }% -\def\XINT@trunc@DE #1#2{\XINT@trunc@E #2\Z #1\Z }% -\def\XINT@trunc@E #1#2\Z #3#4\Z +\def\XINT_trunc_DE #1#2{\XINT_trunc_E #2\Z #1\Z }% +\def\XINT_trunc_E #1#2\Z #3#4\Z {% - \xint@UDsignsfork - #1#3\dummy \XINT@trunc@minusminus - #1-\dummy {\XINT@trunc@minusplus #3}% - #3-\dummy {\XINT@trunc@plusminus #1}% - --\dummy {\XINT@trunc@plusplus #3#1}% - \xint@UDkrof + \xint_UDsignsfork + #1#3\dummy \XINT_trunc_minusminus + #1-\dummy {\XINT_trunc_minusplus #3}% + #3-\dummy {\XINT_trunc_plusminus #1}% + --\dummy {\XINT_trunc_plusplus #3#1}% + \krof {#4}{#2}% }% -\def\XINT@trunc@minusminus #1#2{\xintiquo {#1}{#2}\Z \space}% -\def\XINT@trunc@minusplus #1#2#3{\xintiquo {#1#2}{#3}\Z \xint@minus@andstop}% -\def\XINT@trunc@plusminus #1#2#3{\xintiquo {#2}{#1#3}\Z \xint@minus@andstop}% -\def\XINT@trunc@plusplus #1#2#3#4{\xintiquo {#1#3}{#2#4}\Z \space}% -\def\XINT@itrunc@G #1#2\Z #3#4% +\def\XINT_trunc_minusminus #1#2{\xintiquo {#1}{#2}\Z \space}% +\def\XINT_trunc_minusplus #1#2#3{\xintiquo {#1#2}{#3}\Z \xint_minus_andstop}% +\def\XINT_trunc_plusminus #1#2#3{\xintiquo {#2}{#1#3}\Z \xint_minus_andstop}% +\def\XINT_trunc_plusplus #1#2#3#4{\xintiquo {#1#3}{#2#4}\Z \space}% +\def\XINT_itrunc_G #1#2\Z #3#4% {% - \xint@zero #1\XINT@trunc@zero 0\xint@firstoftwo {#3#1#2}0% + \xint_gob_til_zero #1\XINT_trunc_zero 0\xint_firstoftwo {#3#1#2}0% }% -\def\XINT@trunc@G #1\Z #2#3% +\def\XINT_trunc_G #1\Z #2#3% {% - \xint@zero #2\XINT@trunc@zero 0% - \expandafter\XINT@trunc@H\expandafter - {\the\numexpr\romannumeral0\XINT@length {#1}-#3}{#3}{#1}#2% + \xint_gob_til_zero #2\XINT_trunc_zero 0% + \expandafter\XINT_trunc_H\expandafter + {\the\numexpr\romannumeral0\XINT_length {#1}-#3}{#3}{#1}#2% }% -\def\XINT@trunc@zero 0#10{ 0}% -\def\XINT@trunc@H #1#2% +\def\XINT_trunc_zero 0#10{ 0}% +\def\XINT_trunc_H #1#2% {% \ifnum #1 > 0 - \xint@afterfi {\XINT@trunc@Ha {#2}}% + \xint_afterfi {\XINT_trunc_Ha {#2}}% \else - \xint@afterfi {\XINT@trunc@Hb {-#1}}% -0,--1,--2, .... + \xint_afterfi {\XINT_trunc_Hb {-#1}}% -0,--1,--2, .... \fi }% -\def\XINT@trunc@Ha +\def\XINT_trunc_Ha {% - \expandafter\XINT@trunc@Haa\romannumeral0\xintdecsplit + \expandafter\XINT_trunc_Haa\romannumeral0\xintdecsplit }% -\def\XINT@trunc@Haa #1#2#3% +\def\XINT_trunc_Haa #1#2#3% {% #3#1.#2% }% -\def\XINT@trunc@Hb #1#2#3% +\def\XINT_trunc_Hb #1#2#3% {% \expandafter #3\expandafter0\expandafter.% - \romannumeral0\XINT@dsx@zeroloop {#1}\Z {}#2% #1=-0 possible! + \romannumeral0\XINT_dsx_zeroloop {#1}\Z {}#2% #1=-0 possible! }% \def\xintRound {\romannumeral0\xintround }% \def\xintiRound {\romannumeral0\xintiround }% \def\xintround #1% {% - \expandafter\XINT@round\expandafter {\the\numexpr #1}% + \expandafter\XINT_round\expandafter {\the\numexpr #1}% }% -\def\XINT@round +\def\XINT_round {% - \expandafter\XINT@trunc@G\romannumeral0\XINT@round@A + \expandafter\XINT_trunc_G\romannumeral0\XINT_round_A }% \def\xintiround #1% {% - \expandafter\XINT@iround\expandafter {\the\numexpr #1}% + \expandafter\XINT_iround\expandafter {\the\numexpr #1}% }% -\def\XINT@iround +\def\XINT_iround {% - \expandafter\XINT@itrunc@G\romannumeral0\XINT@round@A + \expandafter\XINT_itrunc_G\romannumeral0\XINT_round_A }% -\def\XINT@round@A #1#2% +\def\XINT_round_A #1#2% {% - \expandafter\XINT@round@B - \romannumeral0\expandafter\XINT@trunc@A - \romannumeral0\XINT@infrac {#2}{\the\numexpr #1+1\relax}{#1}% + \expandafter\XINT_round_B + \romannumeral0\expandafter\XINT_trunc_A + \romannumeral0\XINT_infrac {#2}{\the\numexpr #1+1\relax}{#1}% }% -\def\XINT@round@B #1\Z +\def\XINT_round_B #1\Z {% - \expandafter\XINT@round@C - \romannumeral0\XINT@rord@main {}#1% - \xint@UNDEF - \xint@undef\xint@undef\xint@undef\xint@undef - \xint@undef\xint@undef\xint@undef\xint@undef - \xint@UNDEF + \expandafter\XINT_round_C + \romannumeral0\XINT_rord_main {}#1% + \xint_relax + \xint_undef\xint_undef\xint_undef\xint_undef + \xint_undef\xint_undef\xint_undef\xint_undef + \xint_relax \Z }% -\def\XINT@round@C #1% +\def\XINT_round_C #1% {% \ifnum #1<5 - \expandafter\XINT@round@Daa + \expandafter\XINT_round_Daa \else - \expandafter\XINT@round@Dba + \expandafter\XINT_round_Dba \fi }% -\def\XINT@round@Daa #1% +\def\XINT_round_Daa #1% {% - \xint@z #1\XINT@round@Daz\Z \XINT@round@Da #1% + \xint_gob_til_z #1\XINT_round_Daz\Z \XINT_round_Da #1% }% -\def\XINT@round@Daz\Z \XINT@round@Da \Z { 0\Z }% -\def\XINT@round@Da #1\Z +\def\XINT_round_Daz\Z \XINT_round_Da \Z { 0\Z }% +\def\XINT_round_Da #1\Z {% - \XINT@rord@main {}#1% - \xint@UNDEF - \xint@undef\xint@undef\xint@undef\xint@undef - \xint@undef\xint@undef\xint@undef\xint@undef - \xint@UNDEF \Z + \XINT_rord_main {}#1% + \xint_relax + \xint_undef\xint_undef\xint_undef\xint_undef + \xint_undef\xint_undef\xint_undef\xint_undef + \xint_relax \Z }% -\def\XINT@round@Dba #1% +\def\XINT_round_Dba #1% {% - \xint@z #1\XINT@round@Dbz\Z \XINT@round@Db #1% + \xint_gob_til_z #1\XINT_round_Dbz\Z \XINT_round_Db #1% }% -\def\XINT@round@Dbz\Z \XINT@round@Db \Z { 1\Z }% -\def\XINT@round@Db #1\Z +\def\XINT_round_Dbz\Z \XINT_round_Db \Z { 1\Z }% +\def\XINT_round_Db #1\Z {% - \XINT@addm@A 0{}1000\W\X\Y\Z #1000\W\X\Y\Z \Z + \XINT_addm_A 0{}1000\W\X\Y\Z #1000\W\X\Y\Z \Z }% \def\xintAdd {\romannumeral0\xintadd }% \def\xintadd #1% {% - \expandafter\xint@fadd\expandafter {\romannumeral0\XINT@infrac {#1}}% + \expandafter\xint_fadd\expandafter {\romannumeral0\XINT_infrac {#1}}% }% -\def\xint@fadd #1#2{\expandafter\XINT@fadd@A\romannumeral0\XINT@infrac{#2}#1}% -\def\XINT@fadd@A #1#2#3#4% +\def\xint_fadd #1#2{\expandafter\XINT_fadd_A\romannumeral0\XINT_infrac{#2}#1}% +\def\XINT_fadd_A #1#2#3#4% {% \ifnum #4 > #1 - \xint@afterfi {\XINT@fadd@B {#1}}% + \xint_afterfi {\XINT_fadd_B {#1}}% \else - \xint@afterfi {\XINT@fadd@B {#4}}% + \xint_afterfi {\XINT_fadd_B {#4}}% \fi {#1}{#4}{#2}{#3}% }% -\def\XINT@fadd@B #1#2#3#4#5#6#7% +\def\XINT_fadd_B #1#2#3#4#5#6#7% {% - \expandafter\XINT@fadd@C\expandafter + \expandafter\XINT_fadd_C\expandafter {\romannumeral0\xintimul {#7}{#5}}% {\romannumeral0\xintiadd {\romannumeral0\xintimul {\xintDSH {\the\numexpr -#3+#1\relax}{#6}}{#5}}% @@ -911,30 +917,30 @@ }% {#1}% }% -\def\XINT@fadd@C #1#2#3% +\def\XINT_fadd_C #1#2#3% {% - \expandafter\XINT@fadd@D\expandafter {#2}{#3}{#1}% + \expandafter\XINT_fadd_D\expandafter {#2}{#3}{#1}% }% -\def\XINT@fadd@D #1#2{\XINT@outfrac {#2}{#1}}% +\def\XINT_fadd_D #1#2{\XINT_outfrac {#2}{#1}}% \def\xintSub {\romannumeral0\xintsub }% \def\xintsub #1% {% - \expandafter\xint@fsub\expandafter {\romannumeral0\XINT@infrac {#1}}% + \expandafter\xint_fsub\expandafter {\romannumeral0\XINT_infrac {#1}}% }% -\def\xint@fsub #1#2% - {\expandafter\XINT@fsub@A\romannumeral0\XINT@infrac {#2}#1}% -\def\XINT@fsub@A #1#2#3#4% +\def\xint_fsub #1#2% + {\expandafter\XINT_fsub_A\romannumeral0\XINT_infrac {#2}#1}% +\def\XINT_fsub_A #1#2#3#4% {% \ifnum #4 > #1 - \xint@afterfi {\XINT@fsub@B {#1}}% + \xint_afterfi {\XINT_fsub_B {#1}}% \else - \xint@afterfi {\XINT@fsub@B {#4}}% + \xint_afterfi {\XINT_fsub_B {#4}}% \fi {#1}{#4}{#2}{#3}% }% -\def\XINT@fsub@B #1#2#3#4#5#6#7% +\def\XINT_fsub_B #1#2#3#4#5#6#7% {% - \expandafter\XINT@fsub@C\expandafter + \expandafter\XINT_fsub_C\expandafter {\romannumeral0\xintimul {#7}{#5}}% {\romannumeral0\xintisub {\romannumeral0\xintimul {\xintDSH {\the\numexpr -#3+#1\relax}{#6}}{#5}}% @@ -942,151 +948,151 @@ }% {#1}% }% -\def\XINT@fsub@C #1#2#3% +\def\XINT_fsub_C #1#2#3% {% - \expandafter\XINT@fsub@D\expandafter {#2}{#3}{#1}% + \expandafter\XINT_fsub_D\expandafter {#2}{#3}{#1}% }% -\def\XINT@fsub@D #1#2{\XINT@outfrac {#2}{#1}}% +\def\XINT_fsub_D #1#2{\XINT_outfrac {#2}{#1}}% \def\xintSum {\romannumeral0\xintsum }% \def\xintsum #1{\xintsumexpr #1\relax }% \def\xintSumExpr {\romannumeral0\xintsumexpr }% -\def\xintsumexpr {\expandafter\XINT@fsumexpr\romannumeral-`0}% -\def\XINT@fsumexpr {\XINT@fsum@loop@a {0/1[0]}}% -\def\XINT@fsum@loop@a #1#2% +\def\xintsumexpr {\expandafter\XINT_fsumexpr\romannumeral-`0}% +\def\XINT_fsumexpr {\XINT_fsum_loop_a {0/1[0]}}% +\def\XINT_fsum_loop_a #1#2% {% - \expandafter\XINT@fsum@loop@b \romannumeral-`0#2\Z {#1}% + \expandafter\XINT_fsum_loop_b \romannumeral-`0#2\Z {#1}% }% -\def\XINT@fsum@loop@b #1% +\def\XINT_fsum_loop_b #1% {% - \xint@relax #1\XINT@fsum@finished\relax - \XINT@fsum@loop@c #1% + \xint_gob_til_relax #1\XINT_fsum_finished\relax + \XINT_fsum_loop_c #1% }% -\def\XINT@fsum@loop@c #1\Z #2% +\def\XINT_fsum_loop_c #1\Z #2% {% - \expandafter\XINT@fsum@loop@a\expandafter{\romannumeral0\xintadd {#2}{#1}}% + \expandafter\XINT_fsum_loop_a\expandafter{\romannumeral0\xintadd {#2}{#1}}% }% -\def\XINT@fsum@finished #1\Z #2{ #2}% +\def\XINT_fsum_finished #1\Z #2{ #2}% \def\xintMul {\romannumeral0\xintmul }% \def\xintmul #1% {% - \expandafter\xint@fmul\expandafter {\romannumeral0\XINT@infrac {#1}}% + \expandafter\xint_fmul\expandafter {\romannumeral0\XINT_infrac {#1}}% }% -\def\xint@fmul #1#2% - {\expandafter\XINT@fmul@A\romannumeral0\XINT@infrac {#2}#1}% -\def\XINT@fmul@A #1#2#3#4#5#6% +\def\xint_fmul #1#2% + {\expandafter\XINT_fmul_A\romannumeral0\XINT_infrac {#2}#1}% +\def\XINT_fmul_A #1#2#3#4#5#6% {% - \expandafter\XINT@fmul@B + \expandafter\XINT_fmul_B \expandafter{\the\numexpr #1+#4\expandafter}% \expandafter{\romannumeral0\xintimul {#6}{#3}}% {\romannumeral0\xintimul {#5}{#2}}% }% -\def\XINT@fmul@B #1#2#3% +\def\XINT_fmul_B #1#2#3% {% - \expandafter \XINT@fmul@C \expandafter{#3}{#1}{#2}% + \expandafter \XINT_fmul_C \expandafter{#3}{#1}{#2}% }% -\def\XINT@fmul@C #1#2{\XINT@outfrac {#2}{#1}}% +\def\XINT_fmul_C #1#2{\XINT_outfrac {#2}{#1}}% \def\xintSqr {\romannumeral0\xintsqr }% \def\xintsqr #1% {% - \expandafter\xint@fsqr\expandafter{\romannumeral0\XINT@infrac {#1}}% + \expandafter\xint_fsqr\expandafter{\romannumeral0\XINT_infrac {#1}}% }% -\def\xint@fsqr #1{\XINT@fmul@A #1#1}% +\def\xint_fsqr #1{\XINT_fmul_A #1#1}% \def\xintPow {\romannumeral0\xintpow }% \def\xintpow #1% {% - \expandafter\xint@fpow\expandafter {\romannumeral0\XINT@infrac {#1}}% + \expandafter\xint_fpow\expandafter {\romannumeral0\XINT_infrac {#1}}% }% -\def\xint@fpow #1#2% +\def\xint_fpow #1#2% {% - \expandafter\XINT@fpow@fork\the\numexpr #2\relax\Z #1% + \expandafter\XINT_fpow_fork\the\numexpr #2\relax\Z #1% }% -\def\XINT@fpow@fork #1#2\Z +\def\XINT_fpow_fork #1#2\Z {% - \xint@UDzerominusfork - #1-\dummy \XINT@fpow@zero - 0#1\dummy \XINT@fpow@neg - 0-\dummy {\XINT@fpow@pos #1}% - \xint@UDkrof + \xint_UDzerominusfork + #1-\dummy \XINT_fpow_zero + 0#1\dummy \XINT_fpow_neg + 0-\dummy {\XINT_fpow_pos #1}% + \krof {#2}% }% -\def\XINT@fpow@zero #1#2#3#4% +\def\XINT_fpow_zero #1#2#3#4% {% \space 1/1[0]% }% -\def\XINT@fpow@pos #1#2#3#4#5% +\def\XINT_fpow_pos #1#2#3#4#5% {% - \expandafter\XINT@fpow@pos@A\expandafter + \expandafter\XINT_fpow_pos_A\expandafter {\the\numexpr #1#2*#3\expandafter}\expandafter {\romannumeral0\xintipow {#5}{#1#2}}% {\romannumeral0\xintipow {#4}{#1#2}}% }% -\def\XINT@fpow@neg #1#2#3#4% +\def\XINT_fpow_neg #1#2#3#4% {% - \expandafter\XINT@fpow@pos@A\expandafter + \expandafter\XINT_fpow_pos_A\expandafter {\the\numexpr -#1*#2\expandafter}\expandafter {\romannumeral0\xintipow {#3}{#1}}% {\romannumeral0\xintipow {#4}{#1}}% }% -\def\XINT@fpow@pos@A #1#2#3% +\def\XINT_fpow_pos_A #1#2#3% {% - \expandafter\XINT@fpow@pos@B\expandafter {#3}{#1}{#2}% + \expandafter\XINT_fpow_pos_B\expandafter {#3}{#1}{#2}% }% -\def\XINT@fpow@pos@B #1#2{\XINT@outfrac {#2}{#1}}% +\def\XINT_fpow_pos_B #1#2{\XINT_outfrac {#2}{#1}}% \def\xintPrd {\romannumeral0\xintprd }% \def\xintprd #1{\xintprdexpr #1\relax }% \def\xintPrdExpr {\romannumeral0\xintprdexpr }% -\def\xintprdexpr {\expandafter\XINT@fprdexpr \romannumeral-`0}% -\def\XINT@fprdexpr {\XINT@fprod@loop@a {1/1[0]}}% -\def\XINT@fprod@loop@a #1#2% +\def\xintprdexpr {\expandafter\XINT_fprdexpr \romannumeral-`0}% +\def\XINT_fprdexpr {\XINT_fprod_loop_a {1/1[0]}}% +\def\XINT_fprod_loop_a #1#2% {% - \expandafter\XINT@fprod@loop@b \romannumeral-`0#2\Z {#1}% + \expandafter\XINT_fprod_loop_b \romannumeral-`0#2\Z {#1}% }% -\def\XINT@fprod@loop@b #1% +\def\XINT_fprod_loop_b #1% {% - \xint@relax #1\XINT@fprod@finished\relax - \XINT@fprod@loop@c #1% + \xint_gob_til_relax #1\XINT_fprod_finished\relax + \XINT_fprod_loop_c #1% }% -\def\XINT@fprod@loop@c #1\Z #2% +\def\XINT_fprod_loop_c #1\Z #2% {% - \expandafter\XINT@fprod@loop@a\expandafter{\romannumeral0\xintmul {#1}{#2}}% + \expandafter\XINT_fprod_loop_a\expandafter{\romannumeral0\xintmul {#1}{#2}}% }% -\def\XINT@fprod@finished #1\Z #2{ #2}% +\def\XINT_fprod_finished #1\Z #2{ #2}% \def\xintDiv {\romannumeral0\xintdiv }% \def\xintdiv #1% {% - \expandafter\xint@fdiv\expandafter {\romannumeral0\XINT@infrac {#1}}% + \expandafter\xint_fdiv\expandafter {\romannumeral0\XINT_infrac {#1}}% }% -\def\xint@fdiv #1#2% - {\expandafter\XINT@fdiv@A\romannumeral0\XINT@infrac {#2}#1}% -\def\XINT@fdiv@A #1#2#3#4#5#6% +\def\xint_fdiv #1#2% + {\expandafter\XINT_fdiv_A\romannumeral0\XINT_infrac {#2}#1}% +\def\XINT_fdiv_A #1#2#3#4#5#6% {% - \expandafter\XINT@fdiv@B + \expandafter\XINT_fdiv_B \expandafter{\the\numexpr #4-#1\expandafter}% \expandafter{\romannumeral0\xintimul {#2}{#6}}% {\romannumeral0\xintimul {#3}{#5}}% }% -\def\XINT@fdiv@B #1#2#3% +\def\XINT_fdiv_B #1#2#3% {% - \expandafter\XINT@fdiv@C + \expandafter\XINT_fdiv_C \expandafter{#3}{#1}{#2}% }% -\def\XINT@fdiv@C #1#2{\XINT@outfrac {#2}{#1}}% +\def\XINT_fdiv_C #1#2{\XINT_outfrac {#2}{#1}}% \def\xintCmp {\romannumeral0\xintcmp }% \def\xintcmp #1% {% - \expandafter\xint@fcmp\expandafter {\romannumeral0\XINT@infrac {#1}}% + \expandafter\xint_fcmp\expandafter {\romannumeral0\XINT_infrac {#1}}% }% -\def\xint@fcmp #1#2{\expandafter\XINT@fcmp@A\romannumeral0\XINT@infrac {#2}#1}% -\def\XINT@fcmp@A #1#2#3#4% +\def\xint_fcmp #1#2{\expandafter\XINT_fcmp_A\romannumeral0\XINT_infrac {#2}#1}% +\def\XINT_fcmp_A #1#2#3#4% {% \ifnum #4 > #1 - \xint@afterfi {\XINT@fcmp@B {#1}}% + \xint_afterfi {\XINT_fcmp_B {#1}}% \else - \xint@afterfi {\XINT@fcmp@B {#4}}% + \xint_afterfi {\XINT_fcmp_B {#4}}% \fi {#1}{#4}{#2}{#3}% }% -\def\XINT@fcmp@B #1#2#3#4#5#6#7% +\def\XINT_fcmp_B #1#2#3#4#5#6#7% {% \xinticmp {\romannumeral0\xintimul {\xintDSH {\the\numexpr -#3+#1\relax}{#6}}{#5}}% @@ -1095,150 +1101,150 @@ \def\xintMax {\romannumeral0\xintmax }% \def\xintmax #1% {% - \expandafter\xint@fmax\expandafter {\romannumeral0\XINT@infrac {#1}}% + \expandafter\xint_fmax\expandafter {\romannumeral0\XINT_infrac {#1}}% }% -\def\xint@fmax #1#2{\expandafter\XINT@outfrac - \romannumeral0\expandafter\XINT@fmax@A - \romannumeral0\XINT@infrac {#2}#1}% -\def\XINT@fmax@A #1#2#3#4#5#6% +\def\xint_fmax #1#2{\expandafter\XINT_outfrac + \romannumeral0\expandafter\XINT_fmax_A + \romannumeral0\XINT_infrac {#2}#1}% +\def\XINT_fmax_A #1#2#3#4#5#6% {% \ifnum #4 > #1 - \xint@afterfi {\XINT@fmax@B {#1}}% + \xint_afterfi {\XINT_fmax_B {#1}}% \else - \xint@afterfi {\XINT@fmax@B {#4}}% + \xint_afterfi {\XINT_fmax_B {#4}}% \fi {#1}{#4}{#2}{#3}{#5}{#6}{{#4}{#5}{#6}}{{#1}{#2}{#3}}% }% -\def\XINT@fmax@B #1#2#3#4#5#6#7% +\def\XINT_fmax_B #1#2#3#4#5#6#7% {% - \expandafter\XINT@fmax@C\expandafter + \expandafter\XINT_fmax_C\expandafter {\romannumeral0\xintimul {\xintDSH {\the\numexpr -#3+#1\relax}{#6}}{#5}}% {\romannumeral0\xintimul {#7}{\xintDSH {\the\numexpr -#2+#1\relax}{#4}}}% }% -\def\XINT@fmax@C #1#2% +\def\XINT_fmax_C #1#2% {% - \expandafter\XINT@max@fork #2\Z #1\Z + \expandafter\XINT_max_fork #2\Z #1\Z }% \def\xintMin {\romannumeral0\xintmin }% \def\xintmin #1% {% - \expandafter\xint@fmin\expandafter {\romannumeral0\XINT@infrac {#1}}% + \expandafter\xint_fmin\expandafter {\romannumeral0\XINT_infrac {#1}}% }% -\def\xint@fmin #1#2% +\def\xint_fmin #1#2% {% - \expandafter\XINT@outfrac - \romannumeral0\expandafter\XINT@fmin@A - \romannumeral0\XINT@infrac {#2}#1% + \expandafter\XINT_outfrac + \romannumeral0\expandafter\XINT_fmin_A + \romannumeral0\XINT_infrac {#2}#1% }% -\def\XINT@fmin@A #1#2#3#4#5#6% +\def\XINT_fmin_A #1#2#3#4#5#6% {% \ifnum #4 > #1 - \xint@afterfi {\XINT@fmin@B {#1}}% + \xint_afterfi {\XINT_fmin_B {#1}}% \else - \xint@afterfi {\XINT@fmin@B {#4}}% + \xint_afterfi {\XINT_fmin_B {#4}}% \fi {#1}{#4}{#2}{#3}{#5}{#6}{{#4}{#5}{#6}}{{#1}{#2}{#3}}% }% -\def\XINT@fmin@B #1#2#3#4#5#6#7% +\def\XINT_fmin_B #1#2#3#4#5#6#7% {% - \expandafter\XINT@fmin@C\expandafter + \expandafter\XINT_fmin_C\expandafter {\romannumeral0\xintimul {\xintDSH {\the\numexpr -#3+#1\relax}{#6}}{#5}}% {\romannumeral0\xintimul {#7}{\xintDSH {\the\numexpr -#2+#1\relax}{#4}}}% }% -\def\XINT@fmin@C #1#2% +\def\XINT_fmin_C #1#2% {% - \expandafter\XINT@min@fork #2\Z #1\Z + \expandafter\XINT_min_fork #2\Z #1\Z }% \def\xintAbs {\romannumeral0\xintabs }% \def\xintabs #1% {% - \expandafter\xint@fabs\romannumeral0\XINT@infrac {#1}% + \expandafter\xint_fabs\romannumeral0\XINT_infrac {#1}% }% -\def\xint@fabs #1#2% +\def\xint_fabs #1#2% {% - \expandafter\XINT@outfrac\expandafter + \expandafter\XINT_outfrac\expandafter {\the\numexpr #1\expandafter}\expandafter - {\romannumeral0\XINT@abs #2}% + {\romannumeral0\XINT_abs #2}% }% \def\xintOpp {\romannumeral0\xintopp }% \def\xintopp #1% {% - \expandafter\xint@fopp\romannumeral0\XINT@infrac {#1}% + \expandafter\xint_fopp\romannumeral0\XINT_infrac {#1}% }% -\def\xint@fopp #1#2% +\def\xint_fopp #1#2% {% - \expandafter\XINT@outfrac\expandafter + \expandafter\XINT_outfrac\expandafter {\the\numexpr #1\expandafter}\expandafter - {\romannumeral0\XINT@opp #2}% + {\romannumeral0\XINT_opp #2}% }% \def\xintSgn {\romannumeral0\xintsgn }% \def\xintsgn #1% {% - \expandafter\xint@fsgn\romannumeral0\XINT@infrac {#1}% + \expandafter\xint_fsgn\romannumeral0\XINT_infrac {#1}% }% -\def\xint@fsgn #1#2#3{\xintisgn {#2}}% +\def\xint_fsgn #1#2#3{\xintisgn {#2}}% \def\xintGeq {\romannumeral0\xintgeq }% \def\xintgeq #1% {% - \expandafter\xint@xgeq\expandafter{\romannumeral0\xintnum {#1}}% + \expandafter\xint_xgeq\expandafter{\romannumeral0\xintnum {#1}}% }% -\def\xint@xgeq #1#2% +\def\xint_xgeq #1#2% {% - \expandafter\XINT@geq@fork\romannumeral0\xintnum {#2}\Z #1\Z + \expandafter\XINT_geq_fork\romannumeral0\xintnum {#2}\Z #1\Z }% \def\xintDivision {\romannumeral0\xintdivision }% \def\xintdivision #1% {% - \expandafter\xint@xdivision\expandafter{\romannumeral0\xintnum {#1}}% + \expandafter\xint_xdivision\expandafter{\romannumeral0\xintnum {#1}}% }% -\def\xint@xdivision #1#2% +\def\xint_xdivision #1#2% {% - \expandafter\XINT@div@fork\romannumeral0\xintnum {#2}\Z #1\Z + \expandafter\XINT_div_fork\romannumeral0\xintnum {#2}\Z #1\Z }% \def\xintQuo {\romannumeral0\xintquo }% \def\xintRem {\romannumeral0\xintrem }% -\def\xintquo {\expandafter\xint@firstoftwo@andstop +\def\xintquo {\expandafter\xint_firstoftwo_andstop \romannumeral0\xintdivision }% -\def\xintrem {\expandafter\xint@secondoftwo@andstop +\def\xintrem {\expandafter\xint_secondoftwo_andstop \romannumeral0\xintdivision }% \def\xintFDg {\romannumeral0\xintfdg }% \def\xintfdg #1% {% - \expandafter\XINT@fdg\romannumeral0\xintnum {#1}\W\Z + \expandafter\XINT_fdg\romannumeral0\xintnum {#1}\W\Z }% \def\xintLDg {\romannumeral0\xintldg }% \def\xintldg #1% {% - \expandafter\XINT@ldg\expandafter{\romannumeral0\xintnum {#1}}% + \expandafter\XINT_ldg\expandafter{\romannumeral0\xintnum {#1}}% }% \def\xintMON {\romannumeral0\xintmon }% \def\xintmon #1% {% \ifodd\xintLDg {#1} - \xint@afterfi{ -1}% + \xint_afterfi{ -1}% \else - \xint@afterfi{ 1}% + \xint_afterfi{ 1}% \fi }% \def\xintMMON {\romannumeral0\xintmmon }% \def\xintmmon #1% {% \ifodd\xintLDg {#1} - \xint@afterfi{ 1}% + \xint_afterfi{ 1}% \else - \xint@afterfi{ -1}% + \xint_afterfi{ -1}% \fi }% \def\xintOdd {\romannumeral0\xintodd }% \def\xintodd #1% {% \ifodd\xintLDg{#1} - \xint@afterfi{ 1}% + \xint_afterfi{ 1}% \else - \xint@afterfi{ 0}% + \xint_afterfi{ 0}% \fi }% -\XINT@frac@restorecatcodes@endinput% +\XINT_frac_restorecatcodes_endinput% \endinput %% %% End of file `xintfrac.sty'. |