summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/xint/xintgcd.sty
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/generic/xint/xintgcd.sty')
-rw-r--r--Master/texmf-dist/tex/generic/xint/xintgcd.sty48
1 files changed, 24 insertions, 24 deletions
diff --git a/Master/texmf-dist/tex/generic/xint/xintgcd.sty b/Master/texmf-dist/tex/generic/xint/xintgcd.sty
index 288daeae9d5..a6e141b3084 100644
--- a/Master/texmf-dist/tex/generic/xint/xintgcd.sty
+++ b/Master/texmf-dist/tex/generic/xint/xintgcd.sty
@@ -22,7 +22,7 @@
%% in the same archive or directory.)
%%
%%----------------------------------------------------------------
-%% The xint bundle (version 1.09f of November 4, 2013)
+%% The xint bundle (version 1.09g of November 22, 2013)
%% xintgcd: Euclidean algorithm with xint package
%% Copyright (C) 2013 by Jean-Francois Burnol
%%----------------------------------------------------------------
@@ -105,7 +105,7 @@
\XINTsetupcatcodes%
\XINT_providespackage
\ProvidesPackage{xintgcd}%
- [2013/11/04 v1.09f Euclide algorithm with xint package (jfB)]%
+ [2013/11/22 v1.09g Euclide algorithm with xint package (jfB)]%
\def\xintGCD {\romannumeral0\xintgcd }%
\def\xintgcd #1%
{%
@@ -447,15 +447,15 @@
\edef\A{\U2}\edef\B{\U4}\edef\N{\U1}%
\setbox 0 \vbox{\halign {$##$\cr \A\cr \B \cr}}%
\noindent
- \count 255 1
+ \XINT_count 1
\loop
- \hbox to \wd 0 {\hfil$\U{\numexpr 2*\count 255\relax}$}%
- ${} = \U{\numexpr 2*\count 255 + 3\relax}
- \times \U{\numexpr 2*\count 255 + 2\relax}
- + \U{\numexpr 2*\count 255 + 4\relax}$%
- \ifnum \count 255 < \N
+ \hbox to \wd 0 {\hfil$\U{\numexpr 2*\XINT_count\relax}$}%
+ ${} = \U{\numexpr 2*\XINT_count + 3\relax}
+ \times \U{\numexpr 2*\XINT_count + 2\relax}
+ + \U{\numexpr 2*\XINT_count + 4\relax}$%
+ \ifnum \XINT_count < \N
\hfill\break
- \advance \count 255 1
+ \advance \XINT_count 1
\repeat
\par
\endgroup
@@ -468,24 +468,24 @@
\xintAssignArray\xintBezoutAlgorithm {#1}{#2}\to\BEZ
\edef\A{\BEZ2}\edef\B{\BEZ6}\edef\N{\BEZ1}% A = |#1|, B = |#2|
\setbox 0 \vbox{\halign {$##$\cr \A\cr \B \cr}}%
- \count 255 1
+ \XINT_count 1
\loop
\noindent
- \hbox to \wd 0 {\hfil$\BEZ{4*\count 255 - 2}$}%
- ${} = \BEZ{4*\count 255 + 5}
- \times \BEZ{4*\count 255 + 2}
- + \BEZ{4*\count 255 + 6}$\hfill\break
- \hbox to \wd 0 {\hfil$\BEZ{4*\count 255 +7}$}%
- ${} = \BEZ{4*\count 255 + 5}
- \times \BEZ{4*\count 255 + 3}
- + \BEZ{4*\count 255 - 1}$\hfill\break
- \hbox to \wd 0 {\hfil$\BEZ{4*\count 255 +8}$}%
- ${} = \BEZ{4*\count 255 + 5}
- \times \BEZ{4*\count 255 + 4}
- + \BEZ{4*\count 255 }$
+ \hbox to \wd 0 {\hfil$\BEZ{4*\XINT_count - 2}$}%
+ ${} = \BEZ{4*\XINT_count + 5}
+ \times \BEZ{4*\XINT_count + 2}
+ + \BEZ{4*\XINT_count + 6}$\hfill\break
+ \hbox to \wd 0 {\hfil$\BEZ{4*\XINT_count +7}$}%
+ ${} = \BEZ{4*\XINT_count + 5}
+ \times \BEZ{4*\XINT_count + 3}
+ + \BEZ{4*\XINT_count - 1}$\hfill\break
+ \hbox to \wd 0 {\hfil$\BEZ{4*\XINT_count +8}$}%
+ ${} = \BEZ{4*\XINT_count + 5}
+ \times \BEZ{4*\XINT_count + 4}
+ + \BEZ{4*\XINT_count }$
\endgraf
- \ifnum \count 255 < \N
- \advance \count 255 1
+ \ifnum \XINT_count < \N
+ \advance \XINT_count 1
\repeat
\par
\edef\U{\BEZ{4*\N + 4}}%