%% %% This is file `xintcfrac.sty', %% generated with the docstrip utility. %% %% The original source files were: %% %% xint.dtx (with options: `xintcfrac') %% %% IMPORTANT NOTICE: %% %% For the copyright see the source file. %% %% Any modified versions of this file must be renamed %% with new filenames distinct from xintcfrac.sty. %% %% For distribution of the original source see the terms %% for copying and modification in the file xint.dtx. %% %% This generated file may be distributed as long as the %% original source files, as listed above, are part of the %% same distribution. (The sources need not necessarily be %% in the same archive or directory.) %% %%---------------------------------------------------------------- %% The xint bundle (version 1.07a of May 26, 2013) %% xintcfrac: Expandable continued fractions with xint package %% Copyright (C) 2013 by Jean-Francois Burnol %%---------------------------------------------------------------- %% \begingroup\catcode61\catcode48\catcode32=10\relax% \catcode13=5 % ^^M \endlinechar=13 % \catcode123=1 % { \catcode125=2 % } \catcode64=11 % @ \catcode35=6 % # \catcode44=12 % , \catcode45=12 % - \catcode46=12 % . \catcode58=12 % : \def\space { }% \let\z\endgroup \expandafter\let\expandafter\x\csname ver@xintcfrac.sty\endcsname \expandafter\let\expandafter\w\csname ver@xintfrac.sty\endcsname \expandafter \ifx\csname PackageInfo\endcsname\relax \def\y#1#2{\immediate\write-1{Package #1 Info: #2.}}% \else \def\y#1#2{\PackageInfo{#1}{#2}}% \fi \expandafter \ifx\csname numexpr\endcsname\relax \y{xintcfrac}{\numexpr not available, aborting input}% \aftergroup\endinput \else \ifx\x\relax % plain-TeX, first loading of xintcfrac.sty \ifx\w\relax % but xintfrac.sty not yet loaded. \y{xintcfrac}{Package xintfrac is required}% \y{xintcfrac}{Will try \string\input\space xintfrac.sty}% \def\z{\endgroup\input xintfrac.sty\relax}% \fi \else \def\empty {}% \ifx\x\empty % LaTeX, first loading, % variable is initialized, but \ProvidesPackage not yet seen \ifx\w\relax % xintfrac.sty not yet loaded. \y{xintcfrac}{Package xintfrac is required}% \y{xintcfrac}{Will try \string\RequirePackage{xintfrac}}% \def\z{\endgroup\RequirePackage{xintfrac}}% \fi \else \y{xintcfrac}{I was already loaded, aborting input}% \aftergroup\endinput \fi \fi \fi \z% \begingroup\catcode61\catcode48\catcode32=10\relax% \catcode13=5 % ^^M \endlinechar=13 % \catcode123=1 % { \catcode125=2 % } \catcode64=11 % @ \catcode35=6 % # \catcode44=12 % , \catcode45=12 % - \catcode46=12 % . \catcode58=12 % : \expandafter \ifx\csname PackageInfo\endcsname\relax \def\y#1#2{\immediate\write-1{Package #1 Info: #2.}}% \else \def\y#1#2{\PackageInfo{#1}{#2}}% \fi \def\empty {}% \expandafter\let\expandafter\w\csname ver@xintfrac.sty\endcsname \ifx\w\relax % Plain TeX, user gave a file name at the prompt \y{xintcfrac}{Loading of package xintfrac failed, aborting input}% \aftergroup\endinput \fi \ifx\w\empty % LaTeX, user gave a file name at the prompt \y{xintcfrac}{Loading of package xintfrac failed, aborting input}% \aftergroup\endinput \fi \endgroup% \begingroup\catcode61\catcode48\catcode32=10\relax% \catcode13=5 % ^^M \endlinechar=13 % \catcode123=1 % { \catcode125=2 % } \catcode95=11 % _ \def\x {% \endgroup \edef\XINT_cfrac_restorecatcodes_endinput {% \catcode93=\the\catcode93 % ] \catcode91=\the\catcode91 % [ \catcode96=\the\catcode96 % ` \catcode47=\the\catcode47 % / \catcode41=\the\catcode41 % ) \catcode40=\the\catcode40 % ( \catcode42=\the\catcode42 % * \catcode43=\the\catcode43 % + \catcode62=\the\catcode62 % > \catcode60=\the\catcode60 % < \catcode58=\the\catcode58 % : \catcode46=\the\catcode46 % . \catcode45=\the\catcode45 % - \catcode44=\the\catcode44 % , \catcode35=\the\catcode35 % # \catcode95=\the\catcode95 % _ \catcode125=\the\catcode125 % } \catcode123=\the\catcode123 % { \endlinechar=\the\endlinechar \catcode13=\the\catcode13 % ^^M \catcode32=\the\catcode32 % \catcode61=\the\catcode61\relax % = \noexpand\endinput }% \XINT_setcatcodes \catcode91=12 % [ \catcode93=12 % ] }% \x \begingroup \catcode64=11 % @ \catcode58=12 % : \expandafter\ifx\csname ProvidesPackage\endcsname\relax \def\x#1#2#3[#4]{\endgroup \immediate\write-1{Package: #3 #4}% \xdef#1{#4}% }% \else \def\x#1#2[#3]{\endgroup #2[{#3}]% \ifx#1\@undefined \xdef#1{#3}% \fi \ifx#1\relax \xdef#1{#3}% \fi }% \fi \expandafter\x\csname ver@xintcfrac.sty\endcsname \ProvidesPackage{xintcfrac}% [2013/05/26 v1.07a Expandable continued fractions with xint package (jfB)]% \def\xintCFrac {\romannumeral0\xintcfrac }% \def\xintcfrac #1% {% \XINT_cfrac_opt_a #1\Z }% \def\XINT_cfrac_opt_a #1% {% \ifx#1[\XINT_cfrac_opt_b\fi \XINT_cfrac_noopt #1% }% \def\XINT_cfrac_noopt #1\Z {% \expandafter\XINT_cfrac_A\romannumeral0\xintrawwithzeros {#1}\Z \relax\relax }% \def\XINT_cfrac_opt_b\fi\XINT_cfrac_noopt [\Z #1]% {% \fi\csname XINT_cfrac_opt#1\endcsname }% \def\XINT_cfrac_optl #1% {% \expandafter\XINT_cfrac_A\romannumeral0\xintrawwithzeros {#1}\Z \relax\hfill }% \def\XINT_cfrac_optc #1% {% \expandafter\XINT_cfrac_A\romannumeral0\xintrawwithzeros {#1}\Z \relax\relax }% \def\XINT_cfrac_optr #1% {% \expandafter\XINT_cfrac_A\romannumeral0\xintrawwithzeros {#1}\Z \hfill\relax }% \def\XINT_cfrac_A #1/#2\Z {% \expandafter\XINT_cfrac_B\romannumeral0\xintidivision {#1}{#2}{#2}% }% \def\XINT_cfrac_B #1#2% {% \XINT_cfrac_C #2\Z {#1}% }% \def\XINT_cfrac_C #1% {% \xint_gob_til_zero #1\XINT_cfrac_integer 0\XINT_cfrac_D #1% }% \def\XINT_cfrac_integer 0\XINT_cfrac_D 0#1\Z #2#3#4#5{ #2}% \def\XINT_cfrac_D #1\Z #2#3{\XINT_cfrac_loop_a {#1}{#3}{#1}{{#2}}}% \def\XINT_cfrac_loop_a {% \expandafter\XINT_cfrac_loop_d\romannumeral0\XINT_div_prepare }% \def\XINT_cfrac_loop_d #1#2% {% \XINT_cfrac_loop_e #2.{#1}% }% \def\XINT_cfrac_loop_e #1% {% \xint_gob_til_zero #1\xint_cfrac_loop_exit0\XINT_cfrac_loop_f #1% }% \def\XINT_cfrac_loop_f #1.#2#3#4% {% \XINT_cfrac_loop_a {#1}{#3}{#1}{{#2}#4}% }% \def\xint_cfrac_loop_exit0\XINT_cfrac_loop_f #1.#2#3#4#5#6% {\XINT_cfrac_T #5#6{#2}#4\Z }% \def\XINT_cfrac_T #1#2#3#4% {% \xint_gob_til_z #4\XINT_cfrac_end\Z\XINT_cfrac_T #1#2{#4+\cfrac{#11#2}{#3}}% }% \def\XINT_cfrac_end\Z\XINT_cfrac_T #1#2#3% {% \XINT_cfrac__end #3% }% \def\XINT_cfrac__end \Z+\cfrac#1#2{ #2}% \def\xintGCFrac {\romannumeral0\xintgcfrac }% \def\xintgcfrac #1{\XINT_gcfrac_opt_a #1\Z }% \def\XINT_gcfrac_opt_a #1% {% \ifx#1[\XINT_gcfrac_opt_b\fi \XINT_gcfrac_noopt #1% }% \def\XINT_gcfrac_noopt #1\Z {% \XINT_gcfrac #1+\W/\relax\relax }% \def\XINT_gcfrac_opt_b\fi\XINT_gcfrac_noopt [\Z #1]% {% \fi\csname XINT_gcfrac_opt#1\endcsname }% \def\XINT_gcfrac_optl #1% {% \XINT_gcfrac #1+\W/\relax\hfill }% \def\XINT_gcfrac_optc #1% {% \XINT_gcfrac #1+\W/\relax\relax }% \def\XINT_gcfrac_optr #1% {% \XINT_gcfrac #1+\W/\hfill\relax }% \def\XINT_gcfrac {% \expandafter\XINT_gcfrac_enter\romannumeral-`0% }% \def\XINT_gcfrac_enter {\XINT_gcfrac_loop {}}% \def\XINT_gcfrac_loop #1#2+#3/% {% \xint_gob_til_w #3\XINT_gcfrac_endloop\W \XINT_gcfrac_loop {{#3}{#2}#1}% }% \def\XINT_gcfrac_endloop\W\XINT_gcfrac_loop #1#2#3% {% \XINT_gcfrac_T #2#3#1\Z\Z }% \def\XINT_gcfrac_T #1#2#3#4{\XINT_gcfrac_U #1#2{\xintFrac{#4}}}% \def\XINT_gcfrac_U #1#2#3#4#5% {% \xint_gob_til_z #5\XINT_gcfrac_end\Z\XINT_gcfrac_U #1#2{\xintFrac{#5}% \ifcase\xintSgn{#4} +\or+\else-\fi \cfrac{#1\xintFrac{\xintAbs{#4}}#2}{#3}}% }% \def\XINT_gcfrac_end\Z\XINT_gcfrac_U #1#2#3% {% \XINT_gcfrac__end #3% }% \def\XINT_gcfrac__end #1\cfrac#2#3{ #3}% \def\xintGCtoGCx {\romannumeral0\xintgctogcx }% \def\xintgctogcx #1#2#3% {% \expandafter\XINT_gctgcx_start\expandafter {\romannumeral-`0#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_gob_til_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% {% \expandafter\XINT_ftc_A\romannumeral0\xintrawwithzeros {#1}\Z }% \def\XINT_ftc_A #1/#2\Z {% \expandafter\XINT_ftc_B\romannumeral0\xintidivision {#1}{#2}{#2}% }% \def\XINT_ftc_B #1#2% {% \XINT_ftc_C #2.{#1}% }% \def\XINT_ftc_C #1% {% \xint_gob_til_zero #1\XINT_ftc_integer 0\XINT_ftc_D #1% }% \def\XINT_ftc_integer 0\XINT_ftc_D 0#1.#2#3{ #2}% \def\XINT_ftc_D #1.#2#3{\XINT_ftc_loop_a {#1}{#3}{#1}{#2,}}% \def\XINT_ftc_loop_a {% \expandafter\XINT_ftc_loop_d\romannumeral0\XINT_div_prepare }% \def\XINT_ftc_loop_d #1#2% {% \XINT_ftc_loop_e #2.{#1}% }% \def\XINT_ftc_loop_e #1% {% \xint_gob_til_zero #1\xint_ftc_loop_exit0\XINT_ftc_loop_f #1% }% \def\XINT_ftc_loop_f #1.#2#3#4% {% \XINT_ftc_loop_a {#1}{#3}{#1}{#4#2,}% }% \def\xint_ftc_loop_exit0\XINT_ftc_loop_f #1.#2#3#4{ #4#2}% \def\xintFtoCx {\romannumeral0\xintftocx }% \def\xintftocx #1#2% {% \expandafter\XINT_ftcx_A\romannumeral0\xintrawwithzeros {#2}\Z {#1}% }% \def\XINT_ftcx_A #1/#2\Z {% \expandafter\XINT_ftcx_B\romannumeral0\xintidivision {#1}{#2}{#2}% }% \def\XINT_ftcx_B #1#2% {% \XINT_ftcx_C #2.{#1}% }% \def\XINT_ftcx_C #1% {% \xint_gob_til_zero #1\XINT_ftcx_integer 0\XINT_ftcx_D #1% }% \def\XINT_ftcx_integer 0\XINT_ftcx_D 0#1.#2#3#4{ #2}% \def\XINT_ftcx_D #1.#2#3#4{\XINT_ftcx_loop_a {#1}{#3}{#1}{#2#4}{#4}}% \def\XINT_ftcx_loop_a {% \expandafter\XINT_ftcx_loop_d\romannumeral0\XINT_div_prepare }% \def\XINT_ftcx_loop_d #1#2% {% \XINT_ftcx_loop_e #2.{#1}% }% \def\XINT_ftcx_loop_e #1% {% \xint_gob_til_zero #1\xint_ftcx_loop_exit0\XINT_ftcx_loop_f #1% }% \def\XINT_ftcx_loop_f #1.#2#3#4#5% {% \XINT_ftcx_loop_a {#1}{#3}{#1}{#4{#2}#5}{#5}% }% \def\xint_ftcx_loop_exit0\XINT_ftcx_loop_f #1.#2#3#4#5{ #4{#2}}% \def\xintFtoGC {\romannumeral0\xintftogc }% \def\xintftogc {\xintftocx {+1/}}% \def\xintFtoCC {\romannumeral0\xintftocc }% \def\xintftocc #1% {% \expandafter\XINT_ftcc_A\expandafter {\romannumeral0\xintrawwithzeros {#1}}% }% \def\XINT_ftcc_A #1% {% \expandafter\XINT_ftcc_B \romannumeral0\xintrawwithzeros {\xintAdd {1/2[0]}{#1[0]}}\Z {#1[0]}% }% \def\XINT_ftcc_B #1/#2\Z {% \expandafter\XINT_ftcc_C\expandafter {\romannumeral0\xintiquo {#1}{#2}}% }% \def\XINT_ftcc_C #1#2% {% \expandafter\XINT_ftcc_D\romannumeral0\xintsub {#2}{#1}\Z {#1}% }% \def\XINT_ftcc_D #1% {% \xint_UDzerominusfork #1-\dummy \XINT_ftcc_integer 0#1\dummy \XINT_ftcc_En 0-\dummy {\XINT_ftcc_Ep #1}% \krof }% \def\XINT_ftcc_Ep #1\Z #2% {% \expandafter\XINT_ftcc_loop_a\expandafter {\romannumeral0\xintdiv {1[0]}{#1}}{#2+1/}% }% \def\XINT_ftcc_En #1\Z #2% {% \expandafter\XINT_ftcc_loop_a\expandafter {\romannumeral0\xintdiv {1[0]}{#1}}{#2+-1/}% }% \def\XINT_ftcc_integer #1\Z #2{ #2}% \def\XINT_ftcc_loop_a #1% {% \expandafter\XINT_ftcc_loop_b \romannumeral0\xintrawwithzeros {\xintAdd {1/2[0]}{#1}}\Z {#1}% }% \def\XINT_ftcc_loop_b #1/#2\Z {% \expandafter\XINT_ftcc_loop_c\expandafter {\romannumeral0\xintiquo {#1}{#2}}% }% \def\XINT_ftcc_loop_c #1#2% {% \expandafter\XINT_ftcc_loop_d \romannumeral0\xintsub {#2}{#1[0]}\Z {#1}% }% \def\XINT_ftcc_loop_d #1% {% \xint_UDzerominusfork #1-\dummy \XINT_ftcc_end 0#1\dummy \XINT_ftcc_loop_N 0-\dummy {\XINT_ftcc_loop_P #1}% \krof }% \def\XINT_ftcc_end #1\Z #2#3{ #3#2}% \def\XINT_ftcc_loop_P #1\Z #2#3% {% \expandafter\XINT_ftcc_loop_a\expandafter {\romannumeral0\xintdiv {1[0]}{#1}}{#3#2+1/}% }% \def\XINT_ftcc_loop_N #1\Z #2#3% {% \expandafter\XINT_ftcc_loop_a\expandafter {\romannumeral0\xintdiv {1[0]}{#1}}{#3#2+-1/}% }% \def\xintFtoCv {\romannumeral0\xintftocv }% \def\xintftocv #1% {% \xinticstocv {\xintFtoCs {#1}}% }% \def\xintFtoCCv {\romannumeral0\xintftoccv }% \def\xintftoccv #1% {% \xintigctocv {\xintFtoCC {#1}}% }% \def\xintCstoF {\romannumeral0\xintcstof }% \def\xintcstof #1% {% \expandafter\XINT_cstf_prep \romannumeral-`0#1,\W,% }% \def\XINT_cstf_prep {% \XINT_cstf_loop_a 1001% }% \def\XINT_cstf_loop_a #1#2#3#4#5,% {% \xint_gob_til_w #5\XINT_cstf_end\W \expandafter\XINT_cstf_loop_b \romannumeral0\xintrawwithzeros {#5}.{#1}{#2}{#3}{#4}% }% \def\XINT_cstf_loop_b #1/#2.#3#4#5#6% {% \expandafter\XINT_cstf_loop_c\expandafter {\romannumeral0\XINT_mul_fork #2\Z #4\Z }% {\romannumeral0\XINT_mul_fork #2\Z #3\Z }% {\romannumeral0\xintiadd {\XINT_Mul {#2}{#6}}{\XINT_Mul {#1}{#4}}}% {\romannumeral0\xintiadd {\XINT_Mul {#2}{#5}}{\XINT_Mul {#1}{#3}}}% }% \def\XINT_cstf_loop_c #1#2% {% \expandafter\XINT_cstf_loop_d\expandafter {\expandafter{#2}{#1}}% }% \def\XINT_cstf_loop_d #1#2% {% \expandafter\XINT_cstf_loop_e\expandafter {\expandafter{#2}#1}% }% \def\XINT_cstf_loop_e #1#2% {% \expandafter\XINT_cstf_loop_a\expandafter{#2}#1% }% \def\XINT_cstf_end #1.#2#3#4#5{\xintrawwithzeros {#2/#3}[0]}% \def\xintiCstoF {\romannumeral0\xinticstof }% \def\xinticstof #1% {% \expandafter\XINT_icstf_prep \romannumeral-`0#1,\W,% }% \def\XINT_icstf_prep {% \XINT_icstf_loop_a 1001% }% \def\XINT_icstf_loop_a #1#2#3#4#5,% {% \xint_gob_til_w #5\XINT_icstf_end\W \expandafter \XINT_icstf_loop_b \romannumeral-`0#5.{#1}{#2}{#3}{#4}% }% \def\XINT_icstf_loop_b #1.#2#3#4#5% {% \expandafter\XINT_icstf_loop_c\expandafter {\romannumeral0\xintiadd {#5}{\XINT_Mul {#1}{#3}}}% {\romannumeral0\xintiadd {#4}{\XINT_Mul {#1}{#2}}}% {#2}{#3}% }% \def\XINT_icstf_loop_c #1#2% {% \expandafter\XINT_icstf_loop_a\expandafter {#2}{#1}% }% \def\XINT_icstf_end#1.#2#3#4#5{\xintrawwithzeros {#2/#3}[0]}% \def\xintGCtoF {\romannumeral0\xintgctof }% \def\xintgctof #1% {% \expandafter\XINT_gctf_prep \romannumeral-`0#1+\W/% }% \def\XINT_gctf_prep {% \XINT_gctf_loop_a 1001% }% \def\XINT_gctf_loop_a #1#2#3#4#5+% {% \expandafter\XINT_gctf_loop_b \romannumeral0\xintrawwithzeros {#5}.{#1}{#2}{#3}{#4}% }% \def\XINT_gctf_loop_b #1/#2.#3#4#5#6% {% \expandafter\XINT_gctf_loop_c\expandafter {\romannumeral0\XINT_mul_fork #2\Z #4\Z }% {\romannumeral0\XINT_mul_fork #2\Z #3\Z }% {\romannumeral0\xintiadd {\XINT_Mul {#2}{#6}}{\XINT_Mul {#1}{#4}}}% {\romannumeral0\xintiadd {\XINT_Mul {#2}{#5}}{\XINT_Mul {#1}{#3}}}% }% \def\XINT_gctf_loop_c #1#2% {% \expandafter\XINT_gctf_loop_d\expandafter {\expandafter{#2}{#1}}% }% \def\XINT_gctf_loop_d #1#2% {% \expandafter\XINT_gctf_loop_e\expandafter {\expandafter{#2}#1}% }% \def\XINT_gctf_loop_e #1#2% {% \expandafter\XINT_gctf_loop_f\expandafter {\expandafter{#2}#1}% }% \def\XINT_gctf_loop_f #1#2/% {% \xint_gob_til_w #2\XINT_gctf_end\W \expandafter\XINT_gctf_loop_g \romannumeral0\xintrawwithzeros {#2}.#1% }% \def\XINT_gctf_loop_g #1/#2.#3#4#5#6% {% \expandafter\XINT_gctf_loop_h\expandafter {\romannumeral0\XINT_mul_fork #1\Z #6\Z }% {\romannumeral0\XINT_mul_fork #1\Z #5\Z }% {\romannumeral0\XINT_mul_fork #2\Z #4\Z }% {\romannumeral0\XINT_mul_fork #2\Z #3\Z }% }% \def\XINT_gctf_loop_h #1#2% {% \expandafter\XINT_gctf_loop_i\expandafter {\expandafter{#2}{#1}}% }% \def\XINT_gctf_loop_i #1#2% {% \expandafter\XINT_gctf_loop_j\expandafter {\expandafter{#2}#1}% }% \def\XINT_gctf_loop_j #1#2% {% \expandafter\XINT_gctf_loop_a\expandafter {#2}#1% }% \def\XINT_gctf_end #1.#2#3#4#5{\xintrawwithzeros {#2/#3}[0]}% \def\xintiGCtoF {\romannumeral0\xintigctof }% \def\xintigctof #1% {% \expandafter\XINT_igctf_prep \romannumeral-`0#1+\W/% }% \def\XINT_igctf_prep {% \XINT_igctf_loop_a 1001% }% \def\XINT_igctf_loop_a #1#2#3#4#5+% {% \expandafter\XINT_igctf_loop_b \romannumeral-`0#5.{#1}{#2}{#3}{#4}% }% \def\XINT_igctf_loop_b #1.#2#3#4#5% {% \expandafter\XINT_igctf_loop_c\expandafter {\romannumeral0\xintiadd {#5}{\XINT_Mul {#1}{#3}}}% {\romannumeral0\xintiadd {#4}{\XINT_Mul {#1}{#2}}}% {#2}{#3}% }% \def\XINT_igctf_loop_c #1#2% {% \expandafter\XINT_igctf_loop_f\expandafter {\expandafter{#2}{#1}}% }% \def\XINT_igctf_loop_f #1#2#3#4/% {% \xint_gob_til_w #4\XINT_igctf_end\W \expandafter\XINT_igctf_loop_g \romannumeral-`0#4.{#2}{#3}#1% }% \def\XINT_igctf_loop_g #1.#2#3% {% \expandafter\XINT_igctf_loop_h\expandafter {\romannumeral0\XINT_mul_fork #1\Z #3\Z }% {\romannumeral0\XINT_mul_fork #1\Z #2\Z }% }% \def\XINT_igctf_loop_h #1#2% {% \expandafter\XINT_igctf_loop_i\expandafter {#2}{#1}% }% \def\XINT_igctf_loop_i #1#2#3#4% {% \XINT_igctf_loop_a {#3}{#4}{#1}{#2}% }% \def\XINT_igctf_end #1.#2#3#4#5{\xintrawwithzeros {#4/#5}[0]}% \def\xintCstoCv {\romannumeral0\xintcstocv }% \def\xintcstocv #1% {% \expandafter\XINT_cstcv_prep \romannumeral-`0#1,\W,% }% \def\XINT_cstcv_prep {% \XINT_cstcv_loop_a {}1001% }% \def\XINT_cstcv_loop_a #1#2#3#4#5#6,% {% \xint_gob_til_w #6\XINT_cstcv_end\W \expandafter\XINT_cstcv_loop_b \romannumeral0\xintrawwithzeros {#6}.{#2}{#3}{#4}{#5}{#1}% }% \def\XINT_cstcv_loop_b #1/#2.#3#4#5#6% {% \expandafter\XINT_cstcv_loop_c\expandafter {\romannumeral0\XINT_mul_fork #2\Z #4\Z }% {\romannumeral0\XINT_mul_fork #2\Z #3\Z }% {\romannumeral0\xintiadd {\XINT_Mul {#2}{#6}}{\XINT_Mul {#1}{#4}}}% {\romannumeral0\xintiadd {\XINT_Mul {#2}{#5}}{\XINT_Mul {#1}{#3}}}% }% \def\XINT_cstcv_loop_c #1#2% {% \expandafter\XINT_cstcv_loop_d\expandafter {\expandafter{#2}{#1}}% }% \def\XINT_cstcv_loop_d #1#2% {% \expandafter\XINT_cstcv_loop_e\expandafter {\expandafter{#2}#1}% }% \def\XINT_cstcv_loop_e #1#2% {% \expandafter\XINT_cstcv_loop_f\expandafter{#2}#1% }% \def\XINT_cstcv_loop_f #1#2#3#4#5% {% \expandafter\XINT_cstcv_loop_g\expandafter {\romannumeral0\xintrawwithzeros {#1/#2}}{#5}{#1}{#2}{#3}{#4}% }% \def\XINT_cstcv_loop_g #1#2{\XINT_cstcv_loop_a {#2{#1[0]}}}% \def\XINT_cstcv_end #1.#2#3#4#5#6{ #6}% \def\xintiCstoCv {\romannumeral0\xinticstocv }% \def\xinticstocv #1% {% \expandafter\XINT_icstcv_prep \romannumeral-`0#1,\W,% }% \def\XINT_icstcv_prep {% \XINT_icstcv_loop_a {}1001% }% \def\XINT_icstcv_loop_a #1#2#3#4#5#6,% {% \xint_gob_til_w #6\XINT_icstcv_end\W \expandafter \XINT_icstcv_loop_b \romannumeral-`0#6.{#2}{#3}{#4}{#5}{#1}% }% \def\XINT_icstcv_loop_b #1.#2#3#4#5% {% \expandafter\XINT_icstcv_loop_c\expandafter {\romannumeral0\xintiadd {#5}{\XINT_Mul {#1}{#3}}}% {\romannumeral0\xintiadd {#4}{\XINT_Mul {#1}{#2}}}% {{#2}{#3}}% }% \def\XINT_icstcv_loop_c #1#2% {% \expandafter\XINT_icstcv_loop_d\expandafter {#2}{#1}% }% \def\XINT_icstcv_loop_d #1#2% {% \expandafter\XINT_icstcv_loop_e\expandafter {\romannumeral0\xintrawwithzeros {#1/#2}}{{#1}{#2}}% }% \def\XINT_icstcv_loop_e #1#2#3#4{\XINT_icstcv_loop_a {#4{#1[0]}}#2#3}% \def\XINT_icstcv_end #1.#2#3#4#5#6{ #6}% \def\xintGCtoCv {\romannumeral0\xintgctocv }% \def\xintgctocv #1% {% \expandafter\XINT_gctcv_prep \romannumeral-`0#1+\W/% }% \def\XINT_gctcv_prep {% \XINT_gctcv_loop_a {}1001% }% \def\XINT_gctcv_loop_a #1#2#3#4#5#6+% {% \expandafter\XINT_gctcv_loop_b \romannumeral0\xintrawwithzeros {#6}.{#2}{#3}{#4}{#5}{#1}% }% \def\XINT_gctcv_loop_b #1/#2.#3#4#5#6% {% \expandafter\XINT_gctcv_loop_c\expandafter {\romannumeral0\XINT_mul_fork #2\Z #4\Z }% {\romannumeral0\XINT_mul_fork #2\Z #3\Z }% {\romannumeral0\xintiadd {\XINT_Mul {#2}{#6}}{\XINT_Mul {#1}{#4}}}% {\romannumeral0\xintiadd {\XINT_Mul {#2}{#5}}{\XINT_Mul {#1}{#3}}}% }% \def\XINT_gctcv_loop_c #1#2% {% \expandafter\XINT_gctcv_loop_d\expandafter {\expandafter{#2}{#1}}% }% \def\XINT_gctcv_loop_d #1#2% {% \expandafter\XINT_gctcv_loop_e\expandafter {\expandafter{#2}{#1}}% }% \def\XINT_gctcv_loop_e #1#2% {% \expandafter\XINT_gctcv_loop_f\expandafter {#2}#1% }% \def\XINT_gctcv_loop_f #1#2% {% \expandafter\XINT_gctcv_loop_g\expandafter {\romannumeral0\xintrawwithzeros {#1/#2}}{{#1}{#2}}% }% \def\XINT_gctcv_loop_g #1#2#3#4% {% \XINT_gctcv_loop_h {#4{#1[0]}}{#2#3}% }% \def\XINT_gctcv_loop_h #1#2#3/% {% \xint_gob_til_w #3\XINT_gctcv_end\W \expandafter\XINT_gctcv_loop_i \romannumeral0\xintrawwithzeros {#3}.#2{#1}% }% \def\XINT_gctcv_loop_i #1/#2.#3#4#5#6% {% \expandafter\XINT_gctcv_loop_j\expandafter {\romannumeral0\XINT_mul_fork #1\Z #6\Z }% {\romannumeral0\XINT_mul_fork #1\Z #5\Z }% {\romannumeral0\XINT_mul_fork #2\Z #4\Z }% {\romannumeral0\XINT_mul_fork #2\Z #3\Z }% }% \def\XINT_gctcv_loop_j #1#2% {% \expandafter\XINT_gctcv_loop_k\expandafter {\expandafter{#2}{#1}}% }% \def\XINT_gctcv_loop_k #1#2% {% \expandafter\XINT_gctcv_loop_l\expandafter {\expandafter{#2}#1}% }% \def\XINT_gctcv_loop_l #1#2% {% \expandafter\XINT_gctcv_loop_m\expandafter {\expandafter{#2}#1}% }% \def\XINT_gctcv_loop_m #1#2{\XINT_gctcv_loop_a {#2}#1}% \def\XINT_gctcv_end #1.#2#3#4#5#6{ #6}% \def\xintiGCtoCv {\romannumeral0\xintigctocv }% \def\xintigctocv #1% {% \expandafter\XINT_igctcv_prep \romannumeral-`0#1+\W/% }% \def\XINT_igctcv_prep {% \XINT_igctcv_loop_a {}1001% }% \def\XINT_igctcv_loop_a #1#2#3#4#5#6+% {% \expandafter\XINT_igctcv_loop_b \romannumeral-`0#6.{#2}{#3}{#4}{#5}{#1}% }% \def\XINT_igctcv_loop_b #1.#2#3#4#5% {% \expandafter\XINT_igctcv_loop_c\expandafter {\romannumeral0\xintiadd {#5}{\XINT_Mul {#1}{#3}}}% {\romannumeral0\xintiadd {#4}{\XINT_Mul {#1}{#2}}}% {{#2}{#3}}% }% \def\XINT_igctcv_loop_c #1#2% {% \expandafter\XINT_igctcv_loop_f\expandafter {\expandafter{#2}{#1}}% }% \def\XINT_igctcv_loop_f #1#2#3#4/% {% \xint_gob_til_w #4\XINT_igctcv_end_a\W \expandafter\XINT_igctcv_loop_g \romannumeral-`0#4.#1#2{#3}% }% \def\XINT_igctcv_loop_g #1.#2#3#4#5% {% \expandafter\XINT_igctcv_loop_h\expandafter {\romannumeral0\XINT_mul_fork #1\Z #5\Z }% {\romannumeral0\XINT_mul_fork #1\Z #4\Z }% {{#2}{#3}}% }% \def\XINT_igctcv_loop_h #1#2% {% \expandafter\XINT_igctcv_loop_i\expandafter {\expandafter{#2}{#1}}% }% \def\XINT_igctcv_loop_i #1#2{\XINT_igctcv_loop_k #2{#2#1}}% \def\XINT_igctcv_loop_k #1#2% {% \expandafter\XINT_igctcv_loop_l\expandafter {\romannumeral0\xintrawwithzeros {#1/#2}}% }% \def\XINT_igctcv_loop_l #1#2#3{\XINT_igctcv_loop_a {#3{#1[0]}}#2}% \def\XINT_igctcv_end_a #1.#2#3#4#5% {% \expandafter\XINT_igctcv_end_b\expandafter {\romannumeral0\xintrawwithzeros {#2/#3}}% }% \def\XINT_igctcv_end_b #1#2{ #2{#1[0]}}% \def\xintCntoF {\romannumeral0\xintcntof }% \def\xintcntof #1% {% \expandafter\XINT_cntf\expandafter {\the\numexpr #1}% }% \def\XINT_cntf #1#2% {% \ifnum #1>0 \xint_afterfi {\expandafter\XINT_cntf_loop\expandafter {\the\numexpr #1-1\expandafter}\expandafter {\romannumeral-`0#2{#1}}{#2}}% \else \xint_afterfi {\ifnum #1=0 \xint_afterfi {\expandafter\space \romannumeral-`0#2{0}}% \else \xint_afterfi { 0/1[0]}% \fi}% \fi }% \def\XINT_cntf_loop #1#2#3% {% \ifnum #1>0 \else \XINT_cntf_exit \fi \expandafter\XINT_cntf_loop\expandafter {\the\numexpr #1-1\expandafter }\expandafter {\romannumeral0\xintadd {\xintDiv {1[0]}{#2}}{#3{#1}}}% {#3}% }% \def\XINT_cntf_exit \fi \expandafter\XINT_cntf_loop\expandafter #1\expandafter #2#3% {% \fi\xint_gobble_ii #2% }% \def\xintGCntoF {\romannumeral0\xintgcntof }% \def\xintgcntof #1% {% \expandafter\XINT_gcntf\expandafter {\the\numexpr #1}% }% \def\XINT_gcntf #1#2#3% {% \ifnum #1>0 \xint_afterfi {\expandafter\XINT_gcntf_loop\expandafter {\the\numexpr #1-1\expandafter}\expandafter {\romannumeral-`0#2{#1}}{#2}{#3}}% \else \xint_afterfi {\ifnum #1=0 \xint_afterfi {\expandafter\space\romannumeral-`0#2{0}}% \else \xint_afterfi { 0/1[0]}% \fi}% \fi }% \def\XINT_gcntf_loop #1#2#3#4% {% \ifnum #1>0 \else \XINT_gcntf_exit \fi \expandafter\XINT_gcntf_loop\expandafter {\the\numexpr #1-1\expandafter }\expandafter {\romannumeral0\xintadd {\xintDiv {#4{#1}}{#2}}{#3{#1}}}% {#3}{#4}% }% \def\XINT_gcntf_exit \fi \expandafter\XINT_gcntf_loop\expandafter #1\expandafter #2#3#4% {% \fi\xint_gobble_ii #2% }% \def\xintCntoCs {\romannumeral0\xintcntocs }% \def\xintcntocs #1% {% \expandafter\XINT_cntcs\expandafter {\the\numexpr #1}% }% \def\XINT_cntcs #1#2% {% \ifnum #1<0 \xint_afterfi { 0/1[0]}% \else \xint_afterfi {\expandafter\XINT_cntcs_loop\expandafter {\the\numexpr #1-1\expandafter}\expandafter {\expandafter{\romannumeral-`0#2{#1}}}{#2}}% \fi }% \def\XINT_cntcs_loop #1#2#3% {% \ifnum #1>-1 \else \XINT_cntcs_exit \fi \expandafter\XINT_cntcs_loop\expandafter {\the\numexpr #1-1\expandafter }\expandafter {\expandafter{\romannumeral-`0#3{#1}},#2}{#3}% }% \def\XINT_cntcs_exit \fi \expandafter\XINT_cntcs_loop\expandafter #1\expandafter #2#3% {% \fi\XINT_cntcs__exit #2% }% \def\XINT_cntcs__exit #1,{ }% \def\xintCntoGC {\romannumeral0\xintcntogc }% \def\xintcntogc #1% {% \expandafter\XINT_cntgc\expandafter {\the\numexpr #1}% }% \def\XINT_cntgc #1#2% {% \ifnum #1<0 \xint_afterfi { 0/1[0]}% \else \xint_afterfi {\expandafter\XINT_cntgc_loop\expandafter {\the\numexpr #1-1\expandafter}\expandafter {\expandafter{\romannumeral-`0#2{#1}}}{#2}}% \fi }% \def\XINT_cntgc_loop #1#2#3% {% \ifnum #1>-1 \else \XINT_cntgc_exit \fi \expandafter\XINT_cntgc_loop\expandafter {\the\numexpr #1-1\expandafter }\expandafter {\expandafter{\romannumeral-`0#3{#1}}+1/#2}{#3}% }% \def\XINT_cntgc_exit \fi \expandafter\XINT_cntgc_loop\expandafter #1\expandafter #2#3% {% \fi\XINT_cntgc__exit #2% }% \def\XINT_cntgc__exit #1+1/{ }% \def\xintGCntoGC {\romannumeral0\xintgcntogc }% \def\xintgcntogc #1% {% \expandafter\XINT_gcntgc\expandafter {\the\numexpr #1}% }% \def\XINT_gcntgc #1#2#3% {% \ifnum #1<0 \xint_afterfi { {0/1[0]}}% \else \xint_afterfi {\expandafter\XINT_gcntgc_loop\expandafter {\the\numexpr #1-1\expandafter}\expandafter {\expandafter{\romannumeral-`0#2{#1}}}{#2}{#3}}% \fi }% \def\XINT_gcntgc_loop #1#2#3#4% {% \ifnum #1>-1 \else \XINT_gcntgc_exit \fi \expandafter\XINT_gcntgc_loop_b\expandafter {\expandafter{\romannumeral-`0#4{#1}}/#2}{#3{#1}}{#1}{#3}{#4}% }% \def\XINT_gcntgc_loop_b #1#2#3% {% \expandafter\XINT_gcntgc_loop\expandafter {\the\numexpr #3-1\expandafter}\expandafter {\expandafter{\romannumeral-`0#2}+#1}% }% \def\XINT_gcntgc_exit \fi \expandafter\XINT_gcntgc_loop_b\expandafter #1#2#3#4#5% {% \fi\XINT_gcntgc__exit #1% }% \def\XINT_gcntgc__exit #1/{ }% \def\xintCstoGC {\romannumeral0\xintcstogc }% \def\xintcstogc #1% {% \expandafter\XINT_cstc_prep \romannumeral-`0#1,\W,% }% \def\XINT_cstc_prep #1,{\XINT_cstc_loop_a {{#1}}}% \def\XINT_cstc_loop_a #1#2,% {% \xint_gob_til_w #2\XINT_cstc_end\W \XINT_cstc_loop_b {#1}{#2}% }% \def\XINT_cstc_loop_b #1#2{\XINT_cstc_loop_a {#1+1/{#2}}}% \def\XINT_cstc_end\W\XINT_cstc_loop_b #1#2{ #1}% \def\xintGCtoGC {\romannumeral0\xintgctogc }% \def\xintgctogc #1% {% \expandafter\XINT_gctgc_start \romannumeral-`0#1+\W/% }% \def\XINT_gctgc_start {\XINT_gctgc_loop_a {}}% \def\XINT_gctgc_loop_a #1#2+#3/% {% \xint_gob_til_w #3\XINT_gctgc_end\W \expandafter\XINT_gctgc_loop_b\expandafter {\romannumeral-`0#2}{#3}{#1}% }% \def\XINT_gctgc_loop_b #1#2% {% \expandafter\XINT_gctgc_loop_c\expandafter {\romannumeral-`0#2}{#1}% }% \def\XINT_gctgc_loop_c #1#2#3% {% \XINT_gctgc_loop_a {#3{#2}+{#1}/}% }% \def\XINT_gctgc_end\W\expandafter\XINT_gctgc_loop_b {% \expandafter\XINT_gctgc__end }% \def\XINT_gctgc__end #1#2#3{ #3{#1}}% \XINT_cfrac_restorecatcodes_endinput% \endinput %% %% End of file `xintcfrac.sty'.