diff options
Diffstat (limited to 'Master/texmf-dist/tex/generic/xint/xint.sty')
-rw-r--r-- | Master/texmf-dist/tex/generic/xint/xint.sty | 44 |
1 files changed, 20 insertions, 24 deletions
diff --git a/Master/texmf-dist/tex/generic/xint/xint.sty b/Master/texmf-dist/tex/generic/xint/xint.sty index da74f7916af..a2f9a610e2d 100644 --- a/Master/texmf-dist/tex/generic/xint/xint.sty +++ b/Master/texmf-dist/tex/generic/xint/xint.sty @@ -22,7 +22,7 @@ %% in the same archive or directory.) %% %%---------------------------------------------------------------- -%% The xint bundle (version 1.09g of November 22, 2013) +%% The xint bundle (version 1.09h of November 28, 2013) %% xint: Expandable operations on long numbers %% Copyright (C) 2013 by Jean-Francois Burnol %%---------------------------------------------------------------- @@ -105,10 +105,10 @@ \XINTsetupcatcodes% \XINT_providespackage \ProvidesPackage{xint}% - [2013/11/22 v1.09g Expandable operations on long numbers (jfB)]% -\def\xint_firstofthree #1#2#3{#1}% -\def\xint_secondofthree #1#2#3{#2}% -\def\xint_thirdofthree #1#2#3{#3}% + [2013/11/28 v1.09h Expandable operations on long numbers (jfB)]% +\long\def\xint_firstofthree #1#2#3{#1}% +\long\def\xint_secondofthree #1#2#3{#2}% +\long\def\xint_thirdofthree #1#2#3{#3}% \def\xint_gob_til_zero #10{}% \def\xint_gob_til_zeros_iii #1000{}% \def\xint_gob_til_zeros_iv #10000{}% @@ -1530,12 +1530,12 @@ {\expandafter\XINT_iminof_b\romannumeral0\xintimin {#1}}% \def\XINT_iminof_e #1\Z #2\Z { #2}% \let\xintMinof\xintiMinof \let\xintminof\xintiminof -\def\xintiSum {\romannumeral0\xintisum }% -\def\xintisum #1{\xintisumexpr #1\relax }% -\def\xintiSumExpr {\romannumeral0\xintisumexpr }% -\def\xintisumexpr {\expandafter\XINT_sumexpr\romannumeral-`0}% -\let\xintSum\xintiSum \let\xintsum\xintisum -\let\xintSumExpr\xintiSumExpr \let\xintsumexpr\xintisumexpr +\def\xintiiSum {\romannumeral0\xintiisum }% +\def\xintiisum #1{\xintiisumexpr #1\relax }% +\def\xintiiSumExpr {\romannumeral0\xintiisumexpr }% +\def\xintiisumexpr {\expandafter\XINT_sumexpr\romannumeral-`0}% +\let\xintSum\xintiiSum \let\xintsum\xintiisum +\let\xintSumExpr\xintiiSumExpr \let\xintsumexpr\xintiisumexpr \def\XINT_sumexpr {\XINT_sum_loop {0000}{0000}}% \def\XINT_sum_loop #1#2#3% {% @@ -1968,14 +1968,14 @@ \XINT_RQ {}#1\R\R\R\R\R\R\R\R\Z \Z\Z\Z\Z #1\W\W\W\W }% -\def\xintiPrd {\romannumeral0\xintiprd }% -\def\xintiprd #1{\xintiprdexpr #1\relax }% -\let\xintPrd\xintiPrd -\let\xintprd\xintiprd -\def\xintiPrdExpr {\romannumeral0\xintiprdexpr }% -\def\xintiprdexpr {\expandafter\XINT_prdexpr\romannumeral-`0}% -\let\xintPrdExpr\xintiPrdExpr -\let\xintprdexpr\xintiprdexpr +\def\xintiiPrd {\romannumeral0\xintiiprd }% +\def\xintiiprd #1{\xintiiprdexpr #1\relax }% +\let\xintPrd\xintiiPrd +\let\xintprd\xintiiprd +\def\xintiiPrdExpr {\romannumeral0\xintiiprdexpr }% +\def\xintiiprdexpr {\expandafter\XINT_prdexpr\romannumeral-`0}% +\let\xintPrdExpr\xintiiPrdExpr +\let\xintprdexpr\xintiiprdexpr \def\XINT_prdexpr {\XINT_prod_loop_a 1\Z }% \def\XINT_prod_loop_a #1\Z #2% {% @@ -1996,11 +1996,7 @@ {% \expandafter\XINT_fac_fork\expandafter{\the\numexpr #1}% }% -\def\xintFac {\romannumeral0\xintfac }% -\def\xintfac #1% -{% - \expandafter\XINT_fac_fork\expandafter{\romannumeral0\xintnum{#1}}% -}% +\let\xintFac\xintiFac \let\xintfac\xintifac \def\XINT_fac_fork #1% {% \ifcase\XINT_Sgn {#1} |