summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/xint/xintcfrac.sty
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/generic/xint/xintcfrac.sty')
-rw-r--r--Master/texmf-dist/tex/generic/xint/xintcfrac.sty63
1 files changed, 35 insertions, 28 deletions
diff --git a/Master/texmf-dist/tex/generic/xint/xintcfrac.sty b/Master/texmf-dist/tex/generic/xint/xintcfrac.sty
index 8600e32fff7..6b3f15c7534 100644
--- a/Master/texmf-dist/tex/generic/xint/xintcfrac.sty
+++ b/Master/texmf-dist/tex/generic/xint/xintcfrac.sty
@@ -22,7 +22,7 @@
%% in the same archive or directory.)
%%
%%----------------------------------------------------------------
-%% The xint bundle (version 1.04 of April 25, 2013)
+%% The xint bundle (version 1.05 of May 1st, 2013)
%% xintcfrac: Expandable continued fractions with xint package
%% Copyright (C) 2013 by Jean-Francois Burnol
%%----------------------------------------------------------------
@@ -134,7 +134,7 @@
\endlinechar=\the\endlinechar
\catcode13=\the\catcode13 % ^^M
\catcode32=\the\catcode32 %
- \catcode61=\the\catcode61 % =
+ \catcode61=\the\catcode61\relax % =
\noexpand\endinput
}%
\XINT@setcatcodes
@@ -162,7 +162,7 @@
\fi
\expandafter\x\csname ver@xintcfrac.sty\endcsname
\ProvidesPackage{xintcfrac}%
- [2013/04/25 v1.04 Expandable continued fractions with xint package (jfB)]%
+ [2013/05/01 v1.05 Expandable continued fractions with xint package (jfB)]%
\def\xintCFrac {\romannumeral0\xintcfrac }%
\def\xintcfrac #1%
{%
@@ -198,7 +198,7 @@
}%
\def\XINT@cfrac@A #1/#2\Z
{%
- \expandafter\XINT@cfrac@B\romannumeral0\xintdivision {#1}{#2}{#2}%
+ \expandafter\XINT@cfrac@B\romannumeral0\xintidivision {#1}{#2}{#2}%
}%
\def\XINT@cfrac@B #1#2%
{%
@@ -293,6 +293,23 @@
\XINT@gcfrac@@end #3%
}%
\def\XINT@gcfrac@@end #1\cfrac#2#3{ #3}%
+\def\xintGCtoGCx {\romannumeral0\xintgctogcx }%
+\def\xintgctogcx #1#2#3%
+{%
+ \expandafter\expandafter\expandafter\XINT@gctgcx@start
+ \expandafter\expandafter\expandafter {#3}{#1}{#2}%
+}%
+\def\XINT@gctgcx@start #1#2#3{\XINT@gctgcx@loop@a {}{#2}{#3}#1+\W/}%
+\def\XINT@gctgcx@loop@a #1#2#3#4+#5/%
+{%
+ \xint@w #5\XINT@gctgcx@end\W
+ \XINT@gctgcx@loop@b {#1{#4}}{#2{#5}#3}{#2}{#3}%
+}%
+\def\XINT@gctgcx@loop@b #1#2%
+{%
+ \XINT@gctgcx@loop@a {#1#2}%
+}%
+\def\XINT@gctgcx@end\W\XINT@gctgcx@loop@b #1#2#3#4{ #1}%
\def\xintFtoCs {\romannumeral0\xintftocs }%
\def\xintftocs #1%
{%
@@ -300,7 +317,7 @@
}%
\def\XINT@ftc@A #1/#2\Z
{%
- \expandafter\XINT@ftc@B\romannumeral0\xintdivision {#1}{#2}{#2}%
+ \expandafter\XINT@ftc@B\romannumeral0\xintidivision {#1}{#2}{#2}%
}%
\def\XINT@ftc@B #1#2%
{%
@@ -336,7 +353,7 @@
}%
\def\XINT@ftcx@A #1/#2\Z
{%
- \expandafter\XINT@ftcx@B\romannumeral0\xintdivision {#1}{#2}{#2}%
+ \expandafter\XINT@ftcx@B\romannumeral0\xintidivision {#1}{#2}{#2}%
}%
\def\XINT@ftcx@B #1#2%
{%
@@ -379,7 +396,7 @@
}%
\def\XINT@ftcc@B #1/#2\Z
{%
- \expandafter\XINT@ftcc@C\expandafter {\romannumeral0\xintquo {#1}{#2}}%
+ \expandafter\XINT@ftcc@C\expandafter {\romannumeral0\xintiquo {#1}{#2}}%
}%
\def\XINT@ftcc@C #1#2%
{%
@@ -412,7 +429,7 @@
\def\XINT@ftcc@loop@b #1/#2\Z
{%
\expandafter\XINT@ftcc@loop@c\expandafter
- {\romannumeral0\xintquo {#1}{#2}}%
+ {\romannumeral0\xintiquo {#1}{#2}}%
}%
\def\XINT@ftcc@loop@c #1#2%
{%
@@ -451,8 +468,7 @@
\def\xintCstoF {\romannumeral0\xintcstof }%
\def\xintcstof #1%
{%
- \expandafter\expandafter\expandafter
- \XINT@cstf@prep #1,\W,%
+ \expandafter\expandafter\expandafter\XINT@cstf@prep #1,\W,%
}%
\def\XINT@cstf@prep
{%
@@ -487,8 +503,7 @@
\def\xintiCstoF {\romannumeral0\xinticstof }%
\def\xinticstof #1%
{%
- \expandafter\expandafter\expandafter
- \XINT@icstf@prep #1,\W,%
+ \expandafter\expandafter\expandafter\XINT@icstf@prep #1,\W,%
}%
\def\XINT@icstf@prep
{%
@@ -515,8 +530,7 @@
\def\xintGCtoF {\romannumeral0\xintgctof }%
\def\xintgctof #1%
{%
- \expandafter\expandafter\expandafter
- \XINT@gctf@prep #1+\W/%
+ \expandafter\expandafter\expandafter\XINT@gctf@prep #1+\W/%
}%
\def\XINT@gctf@prep
{%
@@ -576,8 +590,7 @@
\def\xintiGCtoF {\romannumeral0\xintigctof }%
\def\xintigctof #1%
{%
- \expandafter\expandafter\expandafter
- \XINT@igctf@prep #1+\W/%
+ \expandafter\expandafter\expandafter\XINT@igctf@prep #1+\W/%
}%
\def\XINT@igctf@prep
{%
@@ -623,8 +636,7 @@
\def\xintCstoCv {\romannumeral0\xintcstocv }%
\def\xintcstocv #1%
{%
- \expandafter\expandafter\expandafter
- \XINT@cstcv@prep #1,\W,%
+ \expandafter\expandafter\expandafter\XINT@cstcv@prep #1,\W,%
}%
\def\XINT@cstcv@prep
{%
@@ -666,8 +678,7 @@
\def\xintiCstoCv {\romannumeral0\xinticstocv }%
\def\xinticstocv #1%
{%
- \expandafter\expandafter\expandafter
- \XINT@icstcv@prep #1,\W,%
+ \expandafter\expandafter\expandafter\XINT@icstcv@prep #1,\W,%
}%
\def\XINT@icstcv@prep
{%
@@ -700,8 +711,7 @@
\def\xintGCtoCv {\romannumeral0\xintgctocv }%
\def\xintgctocv #1%
{%
- \expandafter\expandafter\expandafter
- \XINT@gctcv@prep #1+\W/%
+ \expandafter\expandafter\expandafter\XINT@gctcv@prep #1+\W/%
}%
\def\XINT@gctcv@prep
{%
@@ -771,8 +781,7 @@
\def\xintiGCtoCv {\romannumeral0\xintigctocv }%
\def\xintigctocv #1%
{%
- \expandafter\expandafter\expandafter
- \XINT@igctcv@prep #1+\W/%
+ \expandafter\expandafter\expandafter\XINT@igctcv@prep #1+\W/%
}%
\def\XINT@igctcv@prep
{%
@@ -1022,8 +1031,7 @@
\def\xintCstoGC {\romannumeral0\xintcstogc }%
\def\xintcstogc #1%
{%
- \expandafter\expandafter\expandafter
- \XINT@cstc@prep #1,\W,%
+ \expandafter\expandafter\expandafter\XINT@cstc@prep #1,\W,%
}%
\def\XINT@cstc@prep #1,{\XINT@cstc@loop@a {{#1}}}%
\def\XINT@cstc@loop@a #1#2,%
@@ -1035,8 +1043,7 @@
\def\xintGCtoGC {\romannumeral0\xintgctogc }%
\def\xintgctogc #1%
{%
- \expandafter\expandafter\expandafter
- \XINT@gctgc@start #1+\W/%
+ \expandafter\expandafter\expandafter\XINT@gctgc@start #1+\W/%
}%
\def\XINT@gctgc@start {\XINT@gctgc@loop@a {}}%
\def\XINT@gctgc@loop@a #1#2+#3/%