xint (28oct14)

git-svn-id: svn://tug.org/texlive/trunk@35458 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 2104 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/generic/xint/xintcore.sty b/Master/texmf-dist/tex/generic/xint/xintcore.sty
new file mode 100644
index 00000000000..a23eb23cb84
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/xint/xintcore.sty
@@ -0,0 +1,2104 @@
+%%
+%% This is file `xintcore.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% xint.dtx  (with options: `xintcore')
+%% 
+%% IMPORTANT NOTICE:
+%% 
+%% For the copyright see the source file.
+%% 
+%% Any modified versions of this file must be renamed
+%% with new filenames distinct from xintcore.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 v1.1 (2014/10/28)
+%% Copyright (C) 2013-2014 by Jean-Francois Burnol
+%% xintcore: Expandable arithmetic on big integers
+%% ---------------------------------------------------------------
+\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   % :
+  \let\z\endgroup
+  \expandafter\let\expandafter\x\csname ver@xintcore.sty\endcsname
+  \expandafter\let\expandafter\w\csname ver@xintkernel.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{xintcore}{\numexpr not available, aborting input}%
+     \aftergroup\endinput
+  \else
+    \ifx\x\relax   % plain-TeX, first loading of xintcore.sty
+      \ifx\w\relax % but xintkernel.sty not yet loaded.
+         \def\z{\endgroup\input xintkernel.sty\relax}%
+      \fi
+    \else
+      \def\empty {}%
+      \ifx\x\empty % LaTeX, first loading,
+      % variable is initialized, but \ProvidesPackage not yet seen
+          \ifx\w\relax % xintkernel.sty not yet loaded.
+            \def\z{\endgroup\RequirePackage{xintkernel}}%
+          \fi
+      \else
+        \aftergroup\endinput % xinttools already loaded.
+      \fi
+    \fi
+  \fi
+\z%
+\XINTsetupcatcodes% defined in xintkernel.sty
+\XINT_providespackage
+\ProvidesPackage{xintcore}%
+  [2014/10/28 v1.1 Expandable arithmetic on big integers (jfB)]%
+\def\xint_minus_thenstop { -}%
+\def\xint_gob_til_zeros_iii #1000{}%
+\def\xint_gob_til_zeros_iv  #10000{}%
+\def\xint_gob_til_one   #11{}%
+\def\xint_gob_til_G     #1G{}%
+\def\xint_gob_til_minus #1-{}%
+\def\xint_gob_til_relax #1\relax {}%
+\def\xint_exchangetwo_keepbraces          #1#2{{#2}{#1}}%
+\def\xint_exchangetwo_keepbraces_thenstop #1#2{ {#2}{#1}}%
+\def\xint_UDzerofork       #10#2#3\krof {#2}%
+\def\xint_UDsignfork       #1-#2#3\krof {#2}%
+\def\xint_UDwfork         #1\W#2#3\krof {#2}%
+\def\xint_UDzerosfork     #100#2#3\krof {#2}%
+\def\xint_UDonezerofork   #110#2#3\krof {#2}%
+\def\xint_UDsignsfork     #1--#2#3\krof {#2}%
+\chardef\xint_c_ix     9
+\chardef\xint_c_x     10
+\chardef\xint_c_ii^v  32 % not used in xint, common to xintfrac and xintbinhex
+\chardef\xint_c_ii^vi 64
+\mathchardef\xint_c_ixixixix 9999
+\mathchardef\xint_c_x^iv    10000
+\newcount\xint_c_x^viii  \xint_c_x^viii 100000000
+\def\XINT_RQ #1#2#3#4#5#6#7#8#9%
+{%
+    \xint_gob_til_R #9\XINT_RQ_end_a\R\XINT_RQ {#9#8#7#6#5#4#3#2#1}%
+}%
+\def\XINT_RQ_end_a\R\XINT_RQ #1#2\Z
+{%
+    \XINT_RQ_end_b #1\Z
+}%
+\def\XINT_RQ_end_b #1#2#3#4#5#6#7#8%
+{%
+    \xint_gob_til_R
+            #8\XINT_RQ_end_viii
+            #7\XINT_RQ_end_vii
+            #6\XINT_RQ_end_vi
+            #5\XINT_RQ_end_v
+            #4\XINT_RQ_end_iv
+            #3\XINT_RQ_end_iii
+            #2\XINT_RQ_end_ii
+            \R\XINT_RQ_end_i
+            \Z #2#3#4#5#6#7#8%
+}%
+\def\XINT_RQ_end_viii #1\Z #2#3#4#5#6#7#8#9\Z { #9}%
+\def\XINT_RQ_end_vii  #1\Z #2#3#4#5#6#7#8#9\Z { #8#9000}%
+\def\XINT_RQ_end_vi   #1\Z #2#3#4#5#6#7#8#9\Z { #7#8#900}%
+\def\XINT_RQ_end_v    #1\Z #2#3#4#5#6#7#8#9\Z { #6#7#8#90}%
+\def\XINT_RQ_end_iv   #1\Z #2#3#4#5#6#7#8#9\Z { #5#6#7#8#9}%
+\def\XINT_RQ_end_iii  #1\Z #2#3#4#5#6#7#8#9\Z { #4#5#6#7#8#9000}%
+\def\XINT_RQ_end_ii   #1\Z #2#3#4#5#6#7#8#9\Z { #3#4#5#6#7#8#900}%
+\def\XINT_RQ_end_i      \Z #1#2#3#4#5#6#7#8\Z { #1#2#3#4#5#6#7#80}%
+\def\XINT_OQ #1#2#3#4#5#6#7#8#9%
+{%
+    \xint_gob_til_R #9\XINT_OQ_end_a\R\XINT_OQ {#9#8#7#6#5#4#3#2#1}%
+}%
+\def\XINT_OQ_end_a\R\XINT_OQ #1#2\Z
+{%
+    \XINT_OQ_end_b #1\Z
+}%
+\def\XINT_OQ_end_b #1#2#3#4#5#6#7#8%
+{%
+    \xint_gob_til_R
+            #8\XINT_OQ_end_viii
+            #7\XINT_OQ_end_vii
+            #6\XINT_OQ_end_vi
+            #5\XINT_OQ_end_v
+            #4\XINT_OQ_end_iv
+            #3\XINT_OQ_end_iii
+            #2\XINT_OQ_end_ii
+            \R\XINT_OQ_end_i
+            \Z #2#3#4#5#6#7#8%
+}%
+\def\XINT_OQ_end_viii #1\Z #2#3#4#5#6#7#8#9\Z { #9}%
+\def\XINT_OQ_end_vii  #1\Z #2#3#4#5#6#7#8#9\Z { #8#90000000}%
+\def\XINT_OQ_end_vi   #1\Z #2#3#4#5#6#7#8#9\Z { #7#8#9000000}%
+\def\XINT_OQ_end_v    #1\Z #2#3#4#5#6#7#8#9\Z { #6#7#8#900000}%
+\def\XINT_OQ_end_iv   #1\Z #2#3#4#5#6#7#8#9\Z { #5#6#7#8#90000}%
+\def\XINT_OQ_end_iii  #1\Z #2#3#4#5#6#7#8#9\Z { #4#5#6#7#8#9000}%
+\def\XINT_OQ_end_ii   #1\Z #2#3#4#5#6#7#8#9\Z { #3#4#5#6#7#8#900}%
+\def\XINT_OQ_end_i      \Z #1#2#3#4#5#6#7#8\Z { #1#2#3#4#5#6#7#80}%
+\edef\xint_cleanupzeros_andstop #1#2#3#4%
+{%
+    \noexpand\expandafter\space\noexpand\the\numexpr #1#2#3#4\relax
+}%
+\def\xint_cleanupzeros_nostop #1#2#3#4%
+{%
+    \the\numexpr #1#2#3#4\relax
+}%
+\def\XINT_rev_andcuz #1%
+{%
+    \expandafter\xint_cleanupzeros_andstop
+    \romannumeral0\XINT_rord_main {}#1%
+      \xint_relax
+        \xint_bye\xint_bye\xint_bye\xint_bye
+        \xint_bye\xint_bye\xint_bye\xint_bye
+      \xint_relax
+}%
+\def\XINT_cuz #1%
+{%
+    \XINT_cuz_loop #1\W\W\W\W\W\W\W\Z%
+}%
+\def\XINT_cuz_loop #1#2#3#4#5#6#7#8%
+{%
+    \xint_gob_til_W #8\xint_cuz_end_a\W
+    \xint_gob_til_Z #8\xint_cuz_end_A\Z
+    \XINT_cuz_check_a {#1#2#3#4#5#6#7#8}%
+}%
+\def\xint_cuz_end_a #1\XINT_cuz_check_a #2%
+{%
+    \xint_cuz_end_b #2%
+}%
+\edef\xint_cuz_end_b #1#2#3#4#5\Z
+{%
+    \noexpand\expandafter\space\noexpand\the\numexpr #1#2#3#4\relax
+}%
+\def\xint_cuz_end_A \Z\XINT_cuz_check_a #1{ 0}%
+\def\XINT_cuz_check_a #1%
+{%
+    \expandafter\XINT_cuz_check_b\the\numexpr #1\relax
+}%
+\def\XINT_cuz_check_b #1%
+{%
+    \xint_gob_til_zero #1\xint_cuz_backtoloop 0\XINT_cuz_stop #1%
+}%
+\def\XINT_cuz_stop #1\W #2\Z{ #1}%
+\def\xint_cuz_backtoloop 0\XINT_cuz_stop 0{\XINT_cuz_loop }%
+\def\xintiNum {\romannumeral0\xintinum }%
+\def\xintinum #1%
+{%
+    \expandafter\XINT_num_loop
+    \romannumeral-`0#1\xint_relax\xint_relax\xint_relax\xint_relax
+                      \xint_relax\xint_relax\xint_relax\xint_relax\Z
+}%
+\let\xintNum\xintiNum \let\xintnum\xintinum
+\def\XINT_num #1%
+{%
+    \XINT_num_loop #1\xint_relax\xint_relax\xint_relax\xint_relax
+                     \xint_relax\xint_relax\xint_relax\xint_relax\Z
+}%
+\def\XINT_num_loop #1#2#3#4#5#6#7#8%
+{%
+    \xint_gob_til_xint_relax #8\XINT_num_end\xint_relax
+    \XINT_num_NumEight #1#2#3#4#5#6#7#8%
+}%
+\edef\XINT_num_end\xint_relax\XINT_num_NumEight #1\xint_relax #2\Z
+{%
+    \noexpand\expandafter\space\noexpand\the\numexpr #1+\xint_c_\relax
+}%
+\def\XINT_num_NumEight #1#2#3#4#5#6#7#8%
+{%
+    \ifnum \numexpr #1#2#3#4#5#6#7#8+\xint_c_= \xint_c_
+      \xint_afterfi {\expandafter\XINT_num_keepsign_a
+                     \the\numexpr #1#2#3#4#5#6#7#81\relax}%
+    \else
+      \xint_afterfi {\expandafter\XINT_num_finish
+                     \the\numexpr #1#2#3#4#5#6#7#8\relax}%
+    \fi
+}%
+\def\XINT_num_keepsign_a #1%
+{%
+    \xint_gob_til_one#1\XINT_num_gobacktoloop 1\XINT_num_keepsign_b
+}%
+\def\XINT_num_gobacktoloop 1\XINT_num_keepsign_b {\XINT_num_loop }%
+\def\XINT_num_keepsign_b #1{\XINT_num_loop -}%
+\def\XINT_num_finish #1\xint_relax #2\Z { #1}%
+\def\xintiiSgn {\romannumeral0\xintiisgn }%
+\def\xintiisgn #1%
+{%
+    \expandafter\XINT_sgn \romannumeral-`0#1\Z%
+}%
+\def\xintSgn {\romannumeral0\xintsgn }%
+\def\xintsgn #1%
+{%
+    \expandafter\XINT_sgn \romannumeral0\xintnum{#1}\Z%
+}%
+\def\XINT_sgn #1#2\Z
+{%
+    \xint_UDzerominusfork
+      #1-{ 0}%
+      0#1{ -1}%
+       0-{ 1}%
+    \krof
+}%
+\def\XINT_Sgn #1#2\Z
+{%
+    \xint_UDzerominusfork
+      #1-{0}%
+      0#1{-1}%
+       0-{1}%
+    \krof
+}%
+\def\XINT_cntSgn #1#2\Z
+{%
+    \xint_UDzerominusfork
+      #1-\xint_c_
+      0#1\m@ne % I will not allocate a count only for -1?
+       0-\xint_c_i
+    \krof
+}%
+\def\xintiiOpp {\romannumeral0\xintiiopp }%
+\def\xintiiopp #1%
+{%
+    \expandafter\XINT_opp \romannumeral-`0#1%
+}%
+\def\xintiOpp {\romannumeral0\xintiopp }%
+\def\xintiopp #1%
+{%
+    \expandafter\XINT_opp \romannumeral0\xintnum{#1}%
+}%
+\let\xintOpp\xintiOpp \let\xintopp\xintiopp
+\def\XINT_Opp #1{\romannumeral0\XINT_opp #1}%
+\def\XINT_opp #1%
+{%
+    \xint_UDzerominusfork
+      #1-{ 0}%      zero
+      0#1{ }%     negative
+       0-{ -#1}%  positive
+    \krof
+}%
+\def\xintiiAbs {\romannumeral0\xintiiabs }%
+\def\xintiiabs #1%
+{%
+    \expandafter\XINT_abs \romannumeral-`0#1%
+}%
+\def\xintiAbs {\romannumeral0\xintiabs }%
+\def\xintiabs #1%
+{%
+    \expandafter\XINT_abs \romannumeral0\xintnum{#1}%
+}%
+\let\xintAbs\xintiAbs \let\xintabs\xintiabs
+\def\XINT_Abs #1{\romannumeral0\XINT_abs #1}%
+\def\XINT_abs #1%
+{%
+    \xint_UDsignfork
+      #1{ }%
+       -{ #1}%
+    \krof
+}%
+\def\XINT_add_A #1#2#3#4#5#6%
+{%
+    \xint_gob_til_W #3\xint_add_az\W
+    \XINT_add_AB #1{#3#4#5#6}{#2}%
+}%
+\def\xint_add_az\W\XINT_add_AB #1#2%
+{%
+    \XINT_add_AC_checkcarry #1%
+}%
+\def\XINT_add_AB #1#2#3#4\W\X\Y\Z #5#6#7#8%
+{%
+    \xint_gob_til_W #5\xint_add_bz\W
+    \XINT_add_ABE #1#2{#8#7#6#5}{#3}#4\W\X\Y\Z
+}%
+\def\XINT_add_ABE #1#2#3#4#5#6%
+{%
+    \expandafter\XINT_add_ABEA\the\numexpr #1+10#5#4#3#2+#6.%
+}%
+\def\XINT_add_ABEA #1#2#3.#4%
+{%
+    \XINT_add_A  #2{#3#4}%
+}%
+\def\xint_add_bz\W\XINT_add_ABE #1#2#3#4#5#6%
+{%
+    \expandafter\XINT_add_CC\the\numexpr #1+10#5#4#3#2.%
+}%
+\def\XINT_add_CC #1#2#3.#4%
+{%
+    \XINT_add_AC_checkcarry  #2{#3#4}% on va examiner et \'eliminer #2
+}%
+\def\XINT_add_AC_checkcarry #1%
+{%
+    \xint_gob_til_zero #1\xint_add_AC_nocarry 0\XINT_add_C
+}%
+\def\xint_add_AC_nocarry 0\XINT_add_C #1#2\W\X\Y\Z
+{%
+    \expandafter
+    \xint_cleanupzeros_andstop
+    \romannumeral0%
+    \XINT_rord_main {}#2%
+      \xint_relax
+        \xint_bye\xint_bye\xint_bye\xint_bye
+        \xint_bye\xint_bye\xint_bye\xint_bye
+      \xint_relax
+    #1%
+}%
+\def\XINT_add_C #1#2#3#4#5%
+{%
+    \xint_gob_til_W #2\xint_add_cz\W
+    \XINT_add_CD {#5#4#3#2}{#1}%
+}%
+\def\XINT_add_CD #1%
+{%
+    \expandafter\XINT_add_CC\the\numexpr 1+10#1.%
+}%
+\def\xint_add_cz\W\XINT_add_CD #1#2{ 1#2}%
+\def\XINT_addr_A #1#2#3#4#5#6%
+{%
+    \xint_gob_til_W #3\xint_addr_az\W
+    \XINT_addr_B #1{#3#4#5#6}{#2}%
+}%
+\def\xint_addr_az\W\XINT_addr_B #1#2%
+{%
+    \XINT_addr_AC_checkcarry #1%
+}%
+\def\XINT_addr_B #1#2#3#4\W\X\Y\Z #5#6#7#8%
+{%
+    \xint_gob_til_W #5\xint_addr_bz\W
+    \XINT_addr_E #1#2{#8#7#6#5}{#3}#4\W\X\Y\Z
+}%
+\def\XINT_addr_E #1#2#3#4#5#6%
+{%
+    \expandafter\XINT_addr_ABEA\the\numexpr #1+10#5#4#3#2+#6\relax
+}%
+\def\XINT_addr_ABEA #1#2#3#4#5#6#7%
+{%
+    \XINT_addr_A  #2{#7#6#5#4#3}%
+}%
+\def\xint_addr_bz\W\XINT_addr_E #1#2#3#4#5#6%
+{%
+    \expandafter\XINT_addr_CC\the\numexpr #1+10#5#4#3#2\relax
+}%
+\def\XINT_addr_CC #1#2#3#4#5#6#7%
+{%
+    \XINT_addr_AC_checkcarry  #2{#7#6#5#4#3}%
+}%
+\def\XINT_addr_AC_checkcarry #1%
+{%
+    \xint_gob_til_zero #1\xint_addr_AC_nocarry 0\XINT_addr_C
+}%
+\def\xint_addr_AC_nocarry 0\XINT_addr_C #1#2\W\X\Y\Z { #1#2}%
+\def\XINT_addr_C #1#2#3#4#5%
+{%
+    \xint_gob_til_W #2\xint_addr_cz\W
+    \XINT_addr_D {#5#4#3#2}{#1}%
+}%
+\def\XINT_addr_D #1%
+{%
+    \expandafter\XINT_addr_CC\the\numexpr 1+10#1\relax
+}%
+\def\xint_addr_cz\W\XINT_addr_D #1#2{ #21000}%
+\def\XINT_addm_A #1#2#3#4#5#6%
+{%
+    \xint_gob_til_W #3\xint_addm_az\W
+    \XINT_addm_AB #1{#3#4#5#6}{#2}%
+}%
+\def\xint_addm_az\W\XINT_addm_AB #1#2%
+{%
+    \XINT_addm_AC_checkcarry #1%
+}%
+\def\XINT_addm_AB #1#2#3#4\W\X\Y\Z #5#6#7#8%
+{%
+    \XINT_addm_ABE #1#2{#8#7#6#5}{#3}#4\W\X\Y\Z
+}%
+\def\XINT_addm_ABE #1#2#3#4#5#6%
+{%
+    \expandafter\XINT_addm_ABEA\the\numexpr #1+10#5#4#3#2+#6.%
+}%
+\def\XINT_addm_ABEA #1#2#3.#4%
+{%
+    \XINT_addm_A  #2{#3#4}%
+}%
+\def\XINT_addm_AC_checkcarry #1%
+{%
+    \xint_gob_til_zero #1\xint_addm_AC_nocarry 0\XINT_addm_C
+}%
+\def\xint_addm_AC_nocarry 0\XINT_addm_C #1#2\W\X\Y\Z
+{%
+    \expandafter
+    \xint_cleanupzeros_andstop
+    \romannumeral0%
+    \XINT_rord_main {}#2%
+      \xint_relax
+        \xint_bye\xint_bye\xint_bye\xint_bye
+        \xint_bye\xint_bye\xint_bye\xint_bye
+      \xint_relax
+    #1%
+}%
+\def\XINT_addm_C #1#2#3#4#5%
+{%
+    \xint_gob_til_W
+    #5\xint_addm_cw
+    #4\xint_addm_cx
+    #3\xint_addm_cy
+    #2\xint_addm_cz
+    \W\XINT_addm_CD {#5#4#3#2}{#1}%
+}%
+\def\XINT_addm_CD #1%
+{%
+    \expandafter\XINT_addm_CC\the\numexpr 1+10#1.%
+}%
+\def\XINT_addm_CC #1#2#3.#4%
+{%
+    \XINT_addm_AC_checkcarry  #2{#3#4}%
+}%
+\def\xint_addm_cw
+    #1\xint_addm_cx
+    #2\xint_addm_cy
+    #3\xint_addm_cz
+    \W\XINT_addm_CD
+{%
+    \expandafter\XINT_addm_CDw\the\numexpr 1+#1#2#3.%
+}%
+\def\XINT_addm_CDw #1.#2#3\X\Y\Z
+{%
+    \XINT_addm_end #1#3%
+}%
+\def\xint_addm_cx
+    #1\xint_addm_cy
+    #2\xint_addm_cz
+    \W\XINT_addm_CD
+{%
+    \expandafter\XINT_addm_CDx\the\numexpr 1+#1#2.%
+}%
+\def\XINT_addm_CDx #1.#2#3\Y\Z
+{%
+    \XINT_addm_end #1#3%
+}%
+\def\xint_addm_cy
+    #1\xint_addm_cz
+    \W\XINT_addm_CD
+{%
+    \expandafter\XINT_addm_CDy\the\numexpr 1+#1.%
+}%
+\def\XINT_addm_CDy  #1.#2#3\Z
+{%
+    \XINT_addm_end #1#3%
+}%
+\def\xint_addm_cz\W\XINT_addm_CD #1#2#3{\XINT_addm_end #1#3}%
+\edef\XINT_addm_end #1#2#3#4#5%
+    {\noexpand\expandafter\space\noexpand\the\numexpr #1#2#3#4#5\relax}%
+\def\XINT_addp_A #1#2#3#4#5#6%
+{%
+    \xint_gob_til_W #3\xint_addp_az\W
+    \XINT_addp_AB #1{#3#4#5#6}{#2}%
+}%
+\def\xint_addp_az\W\XINT_addp_AB #1#2%
+{%
+    \XINT_addp_AC_checkcarry #1%
+}%
+\def\XINT_addp_AC_checkcarry #1%
+{%
+    \xint_gob_til_zero #1\xint_addp_AC_nocarry 0\XINT_addp_C
+}%
+\def\xint_addp_AC_nocarry 0\XINT_addp_C
+{%
+    \XINT_addp_F
+}%
+\def\XINT_addp_AB #1#2#3#4\W\X\Y\Z #5#6#7#8%
+{%
+    \XINT_addp_ABE #1#2{#8#7#6#5}{#3}#4\W\X\Y\Z
+}%
+\def\XINT_addp_ABE #1#2#3#4#5#6%
+{%
+    \expandafter\XINT_addp_ABEA\the\numexpr #1+10#5#4#3#2+#6\relax
+}%
+\def\XINT_addp_ABEA #1#2#3#4#5#6#7%
+{%
+   \XINT_addp_A  #2{#7#6#5#4#3}%<-- attention on met donc \`a droite
+}%
+\def\XINT_addp_C #1#2#3#4#5%
+{%
+    \xint_gob_til_W
+    #5\xint_addp_cw
+    #4\xint_addp_cx
+    #3\xint_addp_cy
+    #2\xint_addp_cz
+    \W\XINT_addp_CD   {#5#4#3#2}{#1}%
+}%
+\def\XINT_addp_CD #1%
+{%
+    \expandafter\XINT_addp_CC\the\numexpr 1+10#1\relax
+}%
+\def\XINT_addp_CC #1#2#3#4#5#6#7%
+{%
+    \XINT_addp_AC_checkcarry  #2{#7#6#5#4#3}%
+}%
+\def\xint_addp_cw
+    #1\xint_addp_cx
+    #2\xint_addp_cy
+    #3\xint_addp_cz
+    \W\XINT_addp_CD
+{%
+    \expandafter\XINT_addp_CDw\the\numexpr \xint_c_i+10#1#2#3\relax
+}%
+\def\XINT_addp_CDw #1#2#3#4#5#6%
+{%
+    \xint_gob_til_zeros_iv #2#3#4#5\XINT_addp_endDw_zeros
+                          0000\XINT_addp_endDw #2#3#4#5%
+}%
+\def\XINT_addp_endDw_zeros 0000\XINT_addp_endDw 0000#1\X\Y\Z{ #1}%
+\def\XINT_addp_endDw #1#2#3#4#5\X\Y\Z{ #5#4#3#2#1}%
+\def\xint_addp_cx
+    #1\xint_addp_cy
+    #2\xint_addp_cz
+    \W\XINT_addp_CD
+{%
+    \expandafter\XINT_addp_CDx\the\numexpr \xint_c_i+100#1#2\relax
+}%
+\def\XINT_addp_CDx #1#2#3#4#5#6%
+{%
+    \xint_gob_til_zeros_iv #2#3#4#5\XINT_addp_endDx_zeros
+                          0000\XINT_addp_endDx #2#3#4#5%
+}%
+\def\XINT_addp_endDx_zeros 0000\XINT_addp_endDx 0000#1\Y\Z{ #1}%
+\def\XINT_addp_endDx #1#2#3#4#5\Y\Z{ #5#4#3#2#1}%
+\def\xint_addp_cy #1\xint_addp_cz\W\XINT_addp_CD
+{%
+    \expandafter\XINT_addp_CDy\the\numexpr \xint_c_i+1000#1\relax
+}%
+\def\XINT_addp_CDy #1#2#3#4#5#6%
+{%
+    \xint_gob_til_zeros_iv #2#3#4#5\XINT_addp_endDy_zeros
+                          0000\XINT_addp_endDy #2#3#4#5%
+}%
+\def\XINT_addp_endDy_zeros 0000\XINT_addp_endDy 0000#1\Z{ #1}%
+\def\XINT_addp_endDy #1#2#3#4#5\Z{ #5#4#3#2#1}%
+\def\xint_addp_cz\W\XINT_addp_CD #1#2{ #21000}%
+\def\XINT_addp_F #1#2#3#4#5%
+{%
+    \xint_gob_til_W
+    #5\xint_addp_Gw
+    #4\xint_addp_Gx
+    #3\xint_addp_Gy
+    #2\xint_addp_Gz
+    \W\XINT_addp_G   {#2#3#4#5}{#1}%
+}%
+\def\XINT_addp_G #1#2%
+{%
+    \XINT_addp_F {#2#1}%
+}%
+\def\xint_addp_Gw
+    #1\xint_addp_Gx
+    #2\xint_addp_Gy
+    #3\xint_addp_Gz
+    \W\XINT_addp_G #4%
+{%
+    \xint_gob_til_zeros_iv  #3#2#10\XINT_addp_endGw_zeros
+                          0000\XINT_addp_endGw #3#2#10%
+}%
+\def\XINT_addp_endGw_zeros 0000\XINT_addp_endGw 0000#1\X\Y\Z{ #1}%
+\def\XINT_addp_endGw #1#2#3#4#5\X\Y\Z{ #5#1#2#3#4}%
+\def\xint_addp_Gx
+    #1\xint_addp_Gy
+    #2\xint_addp_Gz
+    \W\XINT_addp_G #3%
+{%
+    \xint_gob_til_zeros_iv  #2#100\XINT_addp_endGx_zeros
+                         0000\XINT_addp_endGx #2#100%
+}%
+\def\XINT_addp_endGx_zeros 0000\XINT_addp_endGx 0000#1\Y\Z{ #1}%
+\def\XINT_addp_endGx #1#2#3#4#5\Y\Z{ #5#1#2#3#4}%
+\def\xint_addp_Gy
+    #1\xint_addp_Gz
+    \W\XINT_addp_G #2%
+{%
+    \xint_gob_til_zeros_iv   #1000\XINT_addp_endGy_zeros
+                         0000\XINT_addp_endGy #1000%
+}%
+\def\XINT_addp_endGy_zeros 0000\XINT_addp_endGy 0000#1\Z{ #1}%
+\def\XINT_addp_endGy #1#2#3#4#5\Z{ #5#1#2#3#4}%
+\def\xint_addp_Gz\W\XINT_addp_G #1#2{ #2}%
+\def\xintiiAdd {\romannumeral0\xintiiadd }%
+\def\xintiiadd #1{\expandafter\xint_iiadd\romannumeral-`0#1\Z  }%
+\def\xint_iiadd #1#2\Z #3%
+{%
+    \expandafter\XINT_add_fork\expandafter #1\romannumeral-`0#3\Z #2\Z
+}%
+\def\xintiAdd {\romannumeral0\xintiadd }%
+\def\xintiadd #1%
+{%
+    \expandafter\xint_add\romannumeral0\xintnum{#1}\Z
+}%
+\def\xint_add #1#2\Z #3%
+{%
+    \expandafter\XINT_add_fork\expandafter #1\romannumeral0\xintnum{#3}\Z #2\Z
+}%
+\let\xintAdd\xintiAdd \let\xintadd\xintiadd
+\def\XINT_add_fork #1#2%
+{%
+    \xint_UDzerofork
+      #1\XINT_add_firstiszero
+      #2\XINT_add_secondiszero
+       0{}%
+    \krof
+    \xint_UDsignsfork
+          #1#2\XINT_add_minusminus
+           #1-\XINT_add_minusplus
+           #2-\XINT_add_plusminus
+            --\XINT_add_plusplus
+    \krof #1#2%
+}%
+\def\XINT_add_firstiszero  #1\krof #2#3\Z #4\Z { #3}%
+\def\XINT_add_secondiszero #1\krof #2#3\Z #4\Z { #2#4}%
+\def\XINT_add_plusplus     #1#2#3\Z #4\Z {\XINT_add_pre {#1#4}{#2#3}}%
+\def\XINT_add_minusminus   #1#2#3\Z #4\Z
+   {\expandafter\xint_minus_thenstop\romannumeral0\XINT_add_pre {#4}{#3}}%
+\def\XINT_add_minusplus    #1#2#3\Z #4\Z {\XINT_sub_pre {#2#3}{#4}}%
+\def\XINT_add_plusminus    #1#2#3\Z #4\Z {\XINT_sub_pre {#1#4}{#3}}%
+\def\XINT_add_pre #1%
+{%
+  \expandafter\XINT_add_pre_b\expandafter
+  {\romannumeral0\XINT_RQ {}#1\R\R\R\R\R\R\R\R\Z }%
+}%
+\def\XINT_add_pre_b #1#2%
+{%
+    \expandafter\XINT_add_A
+        \expandafter0\expandafter{\expandafter}%
+    \romannumeral0\XINT_RQ {}#2\R\R\R\R\R\R\R\R\Z
+        \W\X\Y\Z #1\W\X\Y\Z
+}%
+\def\xintiiSub   {\romannumeral0\xintiisub }%
+\def\xintiisub #1{\expandafter\xint_iisub\romannumeral-`0#1\Z  }%
+\def\xint_iisub #1#2\Z #3%
+{%
+    \expandafter\XINT_sub_fork\expandafter #1\romannumeral-`0#3\Z #2\Z
+}%
+\def\xintiSub {\romannumeral0\xintisub }%
+\def\xintisub #1%
+{%
+    \expandafter\xint_sub\romannumeral0\xintnum{#1}\Z
+}%
+\def\xint_sub #1#2\Z #3%
+{%
+    \expandafter\XINT_sub_fork\expandafter #1\romannumeral0\xintnum{#3}\Z #2\Z
+}%
+\let\xintSub\xintiSub \let\xintsub\xintisub
+\def\XINT_sub_fork #1#2%
+{%
+    \xint_UDzerofork
+      #1\XINT_sub_firstiszero
+      #2\XINT_sub_secondiszero
+       0{}%
+    \krof
+    \xint_UDsignsfork
+          #1#2\XINT_sub_minusminus
+           #1-\XINT_sub_minusplus
+           #2-\XINT_sub_plusminus
+            --\XINT_sub_plusplus
+    \krof #1#2%
+}%
+\def\XINT_sub_firstiszero  #1\krof #2#3\Z #4\Z {\XINT_opp #3}%
+\def\XINT_sub_secondiszero #1\krof #2#3\Z #4\Z { #2#4}%
+\def\XINT_sub_plusplus     #1#2#3\Z #4\Z {\XINT_sub_pre {#1#4}{#2#3}}%
+\def\XINT_sub_minusminus   #1#2#3\Z #4\Z {\XINT_sub_pre {#3}{#4}}%
+\def\XINT_sub_minusplus    #1#2#3\Z #4\Z
+   {\expandafter\xint_minus_thenstop\romannumeral0\XINT_add_pre {#4}{#2#3}}%
+\def\XINT_sub_plusminus    #1#2#3\Z #4\Z {\XINT_add_pre {#1#4}{#3}}%
+\def\XINT_sub_pre #1%
+{%
+  \expandafter\XINT_sub_pre_b\expandafter
+  {\romannumeral0\XINT_RQ {}#1\R\R\R\R\R\R\R\R\Z }%
+}%
+\def\XINT_sub_pre_b #1#2%
+{%
+    \expandafter\XINT_sub_A
+        \expandafter1\expandafter{\expandafter}%
+    \romannumeral0\XINT_RQ {}#2\R\R\R\R\R\R\R\R\Z
+        \W\X\Y\Z #1 \W\X\Y\Z
+}%
+\def\XINT_sub_A #1#2#3\W\X\Y\Z #4#5#6#7%
+{%
+    \xint_gob_til_W
+    #4\xint_sub_az
+    \W\XINT_sub_B #1{#4#5#6#7}{#2}#3\W\X\Y\Z
+}%
+\def\XINT_sub_B #1#2#3#4#5#6#7%
+{%
+    \xint_gob_til_W
+    #4\xint_sub_bz
+    \W\XINT_sub_onestep #1#2{#7#6#5#4}{#3}%
+}%
+\def\XINT_sub_onestep #1#2#3#4#5#6%
+{%
+    \expandafter\XINT_sub_backtoA\the\numexpr 11#5#4#3#2-#6+#1-\xint_c_i.%
+}%
+\def\XINT_sub_backtoA #1#2#3.#4%
+{%
+    \XINT_sub_A #2{#3#4}%
+}%
+\def\xint_sub_bz
+    \W\XINT_sub_onestep #1#2#3#4#5#6#7%
+{%
+    \xint_UDzerofork
+      #1\XINT_sub_C   % une retenue
+       0\XINT_sub_D   % pas de retenue
+    \krof
+    {#7}#2#3#4#5%
+}%
+\def\XINT_sub_D #1#2\W\X\Y\Z
+{%
+    \expandafter
+    \xint_cleanupzeros_andstop
+    \romannumeral0%
+    \XINT_rord_main {}#2%
+      \xint_relax
+        \xint_bye\xint_bye\xint_bye\xint_bye
+        \xint_bye\xint_bye\xint_bye\xint_bye
+      \xint_relax
+    #1%
+}%
+\def\XINT_sub_C #1#2#3#4#5%
+{%
+    \xint_gob_til_W
+    #2\xint_sub_cz
+    \W\XINT_sub_AC_onestep {#5#4#3#2}{#1}%
+}%
+\def\XINT_sub_AC_onestep #1%
+{%
+    \expandafter\XINT_sub_backtoC\the\numexpr 11#1-\xint_c_i.%
+}%
+\def\XINT_sub_backtoC #1#2#3.#4%
+{%
+    \XINT_sub_AC_checkcarry #2{#3#4}% la retenue va \^etre examin\'ee
+}%
+\def\XINT_sub_AC_checkcarry #1%
+{%
+    \xint_gob_til_one #1\xint_sub_AC_nocarry 1\XINT_sub_C
+}%
+\def\xint_sub_AC_nocarry 1\XINT_sub_C #1#2\W\X\Y\Z
+{%
+    \expandafter
+    \XINT_cuz_loop
+    \romannumeral0%
+    \XINT_rord_main {}#2%
+      \xint_relax
+        \xint_bye\xint_bye\xint_bye\xint_bye
+        \xint_bye\xint_bye\xint_bye\xint_bye
+      \xint_relax
+    #1\W\W\W\W\W\W\W\Z
+}%
+\def\xint_sub_cz\W\XINT_sub_AC_onestep #1%
+{%
+    \XINT_cuz
+}%
+\def\xint_sub_az\W\XINT_sub_B #1#2#3#4#5#6#7%
+{%
+    \xint_gob_til_W
+    #4\xint_sub_ez
+    \W\XINT_sub_Eenter #1{#3}#4#5#6#7%
+}%
+\def\XINT_sub_Eenter #1#2%
+{%
+    \expandafter
+    \XINT_sub_E\expandafter1\expandafter{\expandafter}%
+    \romannumeral0%
+    \XINT_rord_main {}#2%
+      \xint_relax
+        \xint_bye\xint_bye\xint_bye\xint_bye
+        \xint_bye\xint_bye\xint_bye\xint_bye
+      \xint_relax
+    \W\X\Y\Z #1%
+}%
+\def\XINT_sub_E #1#2#3#4#5#6%
+{%
+    \xint_gob_til_W #3\xint_sub_F\W
+    \XINT_sub_Eonestep #1{#6#5#4#3}{#2}%
+}%
+\def\XINT_sub_Eonestep #1#2%
+{%
+    \expandafter\XINT_sub_backtoE\the\numexpr 109999-#2+#1.%
+}%
+\def\XINT_sub_backtoE #1#2#3.#4%
+{%
+    \XINT_sub_E #2{#3#4}%
+}%
+\def\xint_sub_F\W\XINT_sub_Eonestep #1#2#3#4%
+{%
+    \xint_UDonezerofork
+      #4#1{\XINT_sub_Fdec 0}% soustraire  1. Et faire signe -
+      #1#4{\XINT_sub_Finc 1}% additionner 1. Et faire signe -
+        10\XINT_sub_DD     % terminer. Mais avec signe -
+    \krof
+    {#3}%
+}%
+\def\XINT_sub_DD {\expandafter\xint_minus_thenstop\romannumeral0\XINT_sub_D }%
+\def\XINT_sub_Fdec #1#2#3#4#5#6%
+{%
+    \xint_gob_til_W #3\xint_sub_Fdec_finish\W
+    \XINT_sub_Fdec_onestep #1{#6#5#4#3}{#2}%
+}%
+\def\XINT_sub_Fdec_onestep #1#2%
+{%
+    \expandafter\XINT_sub_backtoFdec\the\numexpr 11#2+#1-\xint_c_i.%
+}%
+\def\XINT_sub_backtoFdec #1#2#3.#4%
+{%
+    \XINT_sub_Fdec #2{#3#4}%
+}%
+\def\xint_sub_Fdec_finish\W\XINT_sub_Fdec_onestep #1#2%
+{%
+    \expandafter\xint_minus_thenstop\romannumeral0\XINT_cuz
+}%
+\def\XINT_sub_Finc #1#2#3#4#5#6%
+{%
+    \xint_gob_til_W #3\xint_sub_Finc_finish\W
+    \XINT_sub_Finc_onestep #1{#6#5#4#3}{#2}%
+}%
+\def\XINT_sub_Finc_onestep #1#2%
+{%
+    \expandafter\XINT_sub_backtoFinc\the\numexpr 10#2+#1.%
+}%
+\def\XINT_sub_backtoFinc #1#2#3.#4%
+{%
+    \XINT_sub_Finc #2{#3#4}%
+}%
+\def\xint_sub_Finc_finish\W\XINT_sub_Finc_onestep #1#2#3%
+{%
+    \xint_UDzerofork
+     #1{\expandafter\expandafter\expandafter
+        \xint_minus_thenstop\xint_cleanupzeros_nostop}%
+      0{ -1}%
+    \krof
+    #3%
+}%
+\def\xint_sub_ez\W\XINT_sub_Eenter #1%
+{%
+    \xint_UDzerofork
+      #1\XINT_sub_K % il y a une retenue
+       0\XINT_sub_L % pas de retenue
+    \krof
+}%
+\def\XINT_sub_L #1\W\X\Y\Z {\XINT_cuz_loop #1\W\W\W\W\W\W\W\Z }%
+\def\XINT_sub_K #1%
+{%
+    \expandafter
+    \XINT_sub_KK\expandafter1\expandafter{\expandafter}%
+    \romannumeral0%
+    \XINT_rord_main {}#1%
+      \xint_relax
+        \xint_bye\xint_bye\xint_bye\xint_bye
+        \xint_bye\xint_bye\xint_bye\xint_bye
+      \xint_relax
+}%
+\def\XINT_sub_KK #1#2#3#4#5#6%
+{%
+    \xint_gob_til_W #3\xint_sub_KK_finish\W
+    \XINT_sub_KK_onestep #1{#6#5#4#3}{#2}%
+}%
+\def\XINT_sub_KK_onestep #1#2%
+{%
+    \expandafter\XINT_sub_backtoKK\the\numexpr 109999-#2+#1.%
+}%
+\def\XINT_sub_backtoKK #1#2#3.#4%
+{%
+    \XINT_sub_KK #2{#3#4}%
+}%
+\def\xint_sub_KK_finish\W\XINT_sub_KK_onestep #1#2#3%
+{%
+    \expandafter\xint_minus_thenstop
+    \romannumeral0\XINT_cuz_loop #3\W\W\W\W\W\W\W\Z
+}%
+\def\xintiiMul {\romannumeral0\xintiimul }%
+\def\xintiimul #1%
+{%
+    \expandafter\xint_iimul\expandafter {\romannumeral-`0#1}%
+}%
+\def\xint_iimul #1#2%
+{%
+    \expandafter\XINT_mul_fork \romannumeral-`0#2\Z #1\Z
+}%
+\def\xintiMul {\romannumeral0\xintimul }%
+\def\xintimul #1%
+{%
+    \expandafter\xint_mul\expandafter {\romannumeral0\xintnum{#1}}%
+}%
+\def\xint_mul #1#2%
+{%
+    \expandafter\XINT_mul_fork \romannumeral0\xintnum{#2}\Z #1\Z
+}%
+\let\xintMul\xintiMul \let\xintmul\xintimul
+\def\XINT_Mul #1#2{\romannumeral0\XINT_mul_fork #2\Z #1\Z }%
+\def\XINT_mul_fork #1#2\Z #3#4\Z
+{%
+    \xint_UDzerofork
+      #1\XINT_mul_zero
+      #3\XINT_mul_zero
+       0{}%
+    \krof
+    \xint_UDsignsfork
+          #1#3\XINT_mul_minusminus          % #1 = #3 = -
+           #1-{\XINT_mul_minusplus #3}%          % #1 = -
+           #3-{\XINT_mul_plusminus #1}%          % #3 = -
+            --{\XINT_mul_plusplus #1#3}%
+    \krof
+    {#2}{#4}%
+}%
+\def\XINT_mul_zero #1\krof #2#3{ 0}%
+\def\XINT_mul_minusminus #1#2%
+{%
+      \expandafter\XINT_mul_choice_a
+      \expandafter{\romannumeral0\xintlength {#2}}%
+      {\romannumeral0\xintlength {#1}}{#1}{#2}%
+}%
+\def\XINT_mul_minusplus #1#2#3%
+{%
+    \expandafter\xint_minus_thenstop\romannumeral0\expandafter
+    \XINT_mul_choice_a
+    \expandafter{\romannumeral0\xintlength {#1#3}}%
+    {\romannumeral0\xintlength {#2}}{#2}{#1#3}%
+}%
+\def\XINT_mul_plusminus #1#2#3%
+{%
+    \expandafter\xint_minus_thenstop\romannumeral0\expandafter
+    \XINT_mul_choice_a
+    \expandafter{\romannumeral0\xintlength {#3}}%
+    {\romannumeral0\xintlength {#1#2}}{#1#2}{#3}%
+}%
+\def\XINT_mul_plusplus #1#2#3#4%
+{%
+    \expandafter\XINT_mul_choice_a
+    \expandafter{\romannumeral0\xintlength {#2#4}}%
+    {\romannumeral0\xintlength {#1#3}}{#1#3}{#2#4}%
+}%
+\def\XINT_mul_choice_a #1#2%
+{%
+    \expandafter\XINT_mul_choice_b\expandafter{#2}{#1}%
+}%
+\def\XINT_mul_choice_b #1#2%
+{%
+    \ifnum #1<\xint_c_v
+       \expandafter\XINT_mul_choice_littlebyfirst
+    \else
+    \ifnum #2<\xint_c_v
+      \expandafter\expandafter\expandafter\XINT_mul_choice_littlebysecond
+      \else
+      \expandafter\expandafter\expandafter\XINT_mul_choice_compare
+      \fi
+    \fi
+    {#1}{#2}%
+}%
+\def\XINT_mul_choice_littlebyfirst #1#2#3#4%
+{%
+    \expandafter\XINT_mul_M
+    \expandafter{\the\numexpr #3\expandafter}%
+    \romannumeral0\XINT_RQ {}#4\R\R\R\R\R\R\R\R\Z \Z\Z\Z\Z
+}%
+\def\XINT_mul_choice_littlebysecond #1#2#3#4%
+{%
+    \expandafter\XINT_mul_M
+    \expandafter{\the\numexpr #4\expandafter}%
+    \romannumeral0\XINT_RQ {}#3\R\R\R\R\R\R\R\R\Z \Z\Z\Z\Z
+}%
+\def\XINT_mul_choice_compare #1#2%
+{%
+    \ifnum #1>#2
+        \expandafter \XINT_mul_choice_i
+    \else
+        \expandafter \XINT_mul_choice_ii
+    \fi
+    {#1}{#2}%
+}%
+\def\XINT_mul_choice_i #1#2%
+{%
+   \ifnum #1<\numexpr\ifcase \numexpr (#2-\xint_c_iii)/\xint_c_iv\relax
+                     \or 330\or 168\or 109\or 80\or 66\or 52\else 0\fi\relax
+       \expandafter\XINT_mul_choice_same
+   \else
+       \expandafter\XINT_mul_choice_permute
+   \fi
+}%
+\def\XINT_mul_choice_ii #1#2%
+{%
+   \ifnum #2<\numexpr\ifcase \numexpr (#1-\xint_c_iii)/\xint_c_iv\relax
+                     \or 330\or 168\or 109\or 80\or 66\or 52\else 0\fi\relax
+       \expandafter\XINT_mul_choice_permute
+   \else
+       \expandafter\XINT_mul_choice_same
+   \fi
+}%
+\def\XINT_mul_choice_same #1#2%
+{%
+    \expandafter\XINT_mul_enter
+    \romannumeral0\XINT_RQ {}#1\R\R\R\R\R\R\R\R\Z
+    \Z\Z\Z\Z #2\W\W\W\W
+}%
+\def\XINT_mul_choice_permute #1#2%
+{%
+    \expandafter\XINT_mul_enter
+    \romannumeral0\XINT_RQ {}#2\R\R\R\R\R\R\R\R\Z
+    \Z\Z\Z\Z #1\W\W\W\W
+}%
+\def\XINT_mul_Ar #1#2#3#4#5#6%
+{%
+    \xint_gob_til_Z #6\xint_mul_br\Z\XINT_mul_Br #1{#6#5#4#3}{#2}%
+}%
+\def\xint_mul_br\Z\XINT_mul_Br #1#2%
+{%
+     \XINT_addr_AC_checkcarry #1%
+}%
+\def\XINT_mul_Br #1#2#3#4\W\X\Y\Z #5#6#7#8%
+{%
+    \expandafter\XINT_mul_ABEAr
+    \the\numexpr #1+10#2+#8#7#6#5.{#3}#4\W\X\Y\Z
+}%
+\def\XINT_mul_ABEAr #1#2#3#4#5#6.#7%
+{%
+    \XINT_mul_Ar #2{#7#6#5#4#3}%
+}%
+\def\XINT_mul_Mr #1%
+{%
+    \expandafter\XINT_mul_Mr_checkifzeroorone\expandafter{\the\numexpr #1}%
+}%
+\def\XINT_mul_Mr_checkifzeroorone #1%
+{%
+    \ifcase #1
+      \expandafter\XINT_mul_Mr_zero
+    \or
+      \expandafter\XINT_mul_Mr_one
+    \else
+      \expandafter\XINT_mul_Nr
+    \fi
+    {0000}{}{#1}%
+}%
+\def\XINT_mul_Mr_zero #1\Z\Z\Z\Z { 0000}%
+\def\XINT_mul_Mr_one #1#2#3#4\Z\Z\Z\Z { #4}%
+\def\XINT_mul_Nr #1#2#3#4#5#6#7%
+{%
+    \xint_gob_til_Z #4\xint_mul_pr\Z\XINT_mul_Pr {#1}{#3}{#7#6#5#4}{#2}{#3}%
+}%
+\def\XINT_mul_Pr #1#2#3%
+{%
+    \expandafter\XINT_mul_Lr\the\numexpr \xint_c_x^viii+#1+#2*#3\relax
+}%
+\def\XINT_mul_Lr 1#1#2#3#4#5#6#7#8#9%
+{%
+    \XINT_mul_Nr {#1#2#3#4}{#9#8#7#6#5}%
+}%
+\def\xint_mul_pr\Z\XINT_mul_Pr #1#2#3#4#5%
+{%
+    \xint_gob_til_zeros_iv #1\XINT_mul_Mr_end_nocarry 0000%
+    \XINT_mul_Mr_end_carry #1{#4}%
+}%
+\def\XINT_mul_Mr_end_nocarry 0000\XINT_mul_Mr_end_carry 0000#1{ #1}%
+\def\XINT_mul_Mr_end_carry #1#2#3#4#5{ #5#4#3#2#1}%
+\def\XINT_mul_M #1%
+{%
+    \expandafter\XINT_mul_M_checkifzeroorone\expandafter{\the\numexpr #1}%
+}%
+\def\XINT_mul_M_checkifzeroorone #1%
+{%
+    \ifcase #1
+      \expandafter\XINT_mul_M_zero
+    \or
+      \expandafter\XINT_mul_M_one
+    \else
+      \expandafter\XINT_mul_N
+    \fi
+    {0000}{}{#1}%
+}%
+\def\XINT_mul_M_zero #1\Z\Z\Z\Z { 0}%
+\def\XINT_mul_M_one #1#2#3#4\Z\Z\Z\Z
+{%
+    \expandafter\xint_cleanupzeros_andstop\romannumeral0\xintreverseorder{#4}%
+}%
+\def\XINT_mul_N #1#2#3#4#5#6#7%
+{%
+    \xint_gob_til_Z #4\xint_mul_p\Z\XINT_mul_P {#1}{#3}{#7#6#5#4}{#2}{#3}%
+}%
+\def\XINT_mul_P #1#2#3%
+{%
+    \expandafter\XINT_mul_L\the\numexpr \xint_c_x^viii+#1+#2*#3\relax
+}%
+\def\XINT_mul_L 1#1#2#3#4#5#6#7#8#9%
+{%
+    \XINT_mul_N {#1#2#3#4}{#5#6#7#8#9}%
+}%
+\def\xint_mul_p\Z\XINT_mul_P #1#2#3#4#5%
+{%
+    \XINT_mul_M_end #1#4%
+}%
+\edef\XINT_mul_M_end #1#2#3#4#5#6#7#8%
+{%
+    \noexpand\expandafter\space\noexpand\the\numexpr #1#2#3#4#5#6#7#8\relax
+}%
+\def\XINT_mul_enter #1\Z\Z\Z\Z #2#3#4#5%
+{%
+    \xint_gob_til_W #5\XINT_mul_exit_a\W
+    \XINT_mul_start {#2#3#4#5}#1\Z\Z\Z\Z
+}%
+\def\XINT_mul_exit_a\W\XINT_mul_start #1%
+{%
+    \XINT_mul_exit_b #1%
+}%
+\def\XINT_mul_exit_b #1#2#3#4%
+{%
+    \xint_gob_til_W
+      #2\XINT_mul_exit_ci
+      #3\XINT_mul_exit_cii
+      \W\XINT_mul_exit_ciii #1#2#3#4%
+}%
+\def\XINT_mul_exit_ciii #1\W #2\Z\Z\Z\Z \W\W\W
+{%
+    \XINT_mul_M {#1}#2\Z\Z\Z\Z
+}%
+\def\XINT_mul_exit_cii\W\XINT_mul_exit_ciii #1\W\W #2\Z\Z\Z\Z \W\W
+{%
+    \XINT_mul_M {#1}#2\Z\Z\Z\Z
+}%
+\def\XINT_mul_exit_ci\W\XINT_mul_exit_cii
+                     \W\XINT_mul_exit_ciii #1\W\W\W #2\Z\Z\Z\Z \W
+{%
+    \XINT_mul_M {#1}#2\Z\Z\Z\Z
+}%
+\def\XINT_mul_start #1#2\Z\Z\Z\Z
+{%
+    \expandafter\XINT_mul_main\expandafter
+    {\romannumeral0\XINT_mul_Mr {#1}#2\Z\Z\Z\Z}#2\Z\Z\Z\Z
+}%
+\def\XINT_mul_main #1#2\Z\Z\Z\Z #3#4#5#6%
+{%
+    \xint_gob_til_W #6\XINT_mul_finish_a\W
+    \XINT_mul_compute {#3#4#5#6}{#1}#2\Z\Z\Z\Z
+}%
+\def\XINT_mul_compute #1#2#3\Z\Z\Z\Z
+{%
+    \expandafter\XINT_mul_main\expandafter
+    {\romannumeral0\expandafter
+     \XINT_mul_Ar\expandafter0\expandafter{\expandafter}%
+     \romannumeral0\XINT_mul_Mr {#1}#3\Z\Z\Z\Z
+     \W\X\Y\Z 0000#2\W\X\Y\Z }#3\Z\Z\Z\Z
+}%
+\def\XINT_mul_finish_a\W\XINT_mul_compute #1%
+{%
+    \XINT_mul_finish_b #1%
+}%
+\def\XINT_mul_finish_b #1#2#3#4%
+{%
+    \xint_gob_til_W
+      #1\XINT_mul_finish_c
+      #2\XINT_mul_finish_ci
+      #3\XINT_mul_finish_cii
+      \W\XINT_mul_finish_ciii #1#2#3#4%
+}%
+\def\XINT_mul_finish_ciii #1\W #2#3\Z\Z\Z\Z \W\W\W
+{%
+    \expandafter\XINT_addm_A\expandafter0\expandafter{\expandafter}%
+    \romannumeral0\XINT_mul_Mr {#1}#3\Z\Z\Z\Z \W\X\Y\Z 000#2\W\X\Y\Z
+}%
+\def\XINT_mul_finish_cii
+    \W\XINT_mul_finish_ciii #1\W\W #2#3\Z\Z\Z\Z \W\W
+{%
+    \expandafter\XINT_addm_A\expandafter0\expandafter{\expandafter}%
+    \romannumeral0\XINT_mul_Mr {#1}#3\Z\Z\Z\Z \W\X\Y\Z 00#2\W\X\Y\Z
+}%
+\def\XINT_mul_finish_ci #1\XINT_mul_finish_ciii #2\W\W\W #3#4\Z\Z\Z\Z \W
+{%
+    \expandafter\XINT_addm_A\expandafter0\expandafter{\expandafter}%
+    \romannumeral0\XINT_mul_Mr {#2}#4\Z\Z\Z\Z \W\X\Y\Z 0#3\W\X\Y\Z
+}%
+\def\XINT_mul_finish_c #1\XINT_mul_finish_ciii \W\W\W\W #2#3\Z\Z\Z\Z
+{%
+    \expandafter\xint_cleanupzeros_andstop\romannumeral0\xintreverseorder{#2}%
+}%
+\def\XINT_mulr_enter #1\Z\Z\Z\Z #2#3#4#5%
+{%
+    \xint_gob_til_W #5\XINT_mulr_exit_a\W
+    \XINT_mulr_start {#2#3#4#5}#1\Z\Z\Z\Z
+}%
+\def\XINT_mulr_exit_a\W\XINT_mulr_start #1%
+{%
+    \XINT_mulr_exit_b #1%
+}%
+\def\XINT_mulr_exit_b #1#2#3#4%
+{%
+    \xint_gob_til_W
+      #2\XINT_mulr_exit_ci
+      #3\XINT_mulr_exit_cii
+      \W\XINT_mulr_exit_ciii #1#2#3#4%
+}%
+\def\XINT_mulr_exit_ciii #1\W #2\Z\Z\Z\Z \W\W\W
+{%
+    \XINT_mul_Mr {#1}#2\Z\Z\Z\Z
+}%
+\def\XINT_mulr_exit_cii\W\XINT_mulr_exit_ciii #1\W\W #2\Z\Z\Z\Z \W\W
+{%
+    \XINT_mul_Mr {#1}#2\Z\Z\Z\Z
+}%
+\def\XINT_mulr_exit_ci\W\XINT_mulr_exit_cii
+                     \W\XINT_mulr_exit_ciii #1\W\W\W #2\Z\Z\Z\Z \W
+{%
+    \XINT_mul_Mr {#1}#2\Z\Z\Z\Z
+}%
+\def\XINT_mulr_start #1#2\Z\Z\Z\Z
+{%
+    \expandafter\XINT_mulr_main\expandafter
+    {\romannumeral0\XINT_mul_Mr {#1}#2\Z\Z\Z\Z}#2\Z\Z\Z\Z
+}%
+\def\XINT_mulr_main #1#2\Z\Z\Z\Z #3#4#5#6%
+{%
+    \xint_gob_til_W #6\XINT_mulr_finish_a\W
+    \XINT_mulr_compute {#3#4#5#6}{#1}#2\Z\Z\Z\Z
+}%
+\def\XINT_mulr_compute #1#2#3\Z\Z\Z\Z
+{%
+    \expandafter\XINT_mulr_main\expandafter
+    {\romannumeral0\expandafter
+     \XINT_mul_Ar\expandafter0\expandafter{\expandafter}%
+     \romannumeral0\XINT_mul_Mr {#1}#3\Z\Z\Z\Z
+     \W\X\Y\Z 0000#2\W\X\Y\Z }#3\Z\Z\Z\Z
+}%
+\def\XINT_mulr_finish_a\W\XINT_mulr_compute #1%
+{%
+    \XINT_mulr_finish_b #1%
+}%
+\def\XINT_mulr_finish_b #1#2#3#4%
+{%
+    \xint_gob_til_W
+      #1\XINT_mulr_finish_c
+      #2\XINT_mulr_finish_ci
+      #3\XINT_mulr_finish_cii
+      \W\XINT_mulr_finish_ciii #1#2#3#4%
+}%
+\def\XINT_mulr_finish_ciii #1\W #2#3\Z\Z\Z\Z \W\W\W
+{%
+    \expandafter\XINT_addp_A\expandafter0\expandafter{\expandafter}%
+    \romannumeral0\XINT_mul_Mr {#1}#3\Z\Z\Z\Z \W\X\Y\Z 000#2\W\X\Y\Z
+}%
+\def\XINT_mulr_finish_cii
+    \W\XINT_mulr_finish_ciii #1\W\W #2#3\Z\Z\Z\Z \W\W
+{%
+    \expandafter\XINT_addp_A\expandafter0\expandafter{\expandafter}%
+    \romannumeral0\XINT_mul_Mr {#1}#3\Z\Z\Z\Z \W\X\Y\Z 00#2\W\X\Y\Z
+}%
+\def\XINT_mulr_finish_ci #1\XINT_mulr_finish_ciii #2\W\W\W #3#4\Z\Z\Z\Z \W
+{%
+    \expandafter\XINT_addp_A\expandafter0\expandafter{\expandafter}%
+    \romannumeral0\XINT_mul_Mr {#2}#4\Z\Z\Z\Z \W\X\Y\Z 0#3\W\X\Y\Z
+}%
+\def\XINT_mulr_finish_c #1\XINT_mulr_finish_ciii \W\W\W\W #2#3\Z\Z\Z\Z { #2}%
+\def\xintiiSqr {\romannumeral0\xintiisqr }%
+\def\xintiisqr #1%
+{%
+    \expandafter\XINT_sqr\expandafter {\romannumeral0\xintiiabs{#1}}%
+}%
+\def\xintiSqr {\romannumeral0\xintisqr }%
+\def\xintisqr #1%
+{%
+    \expandafter\XINT_sqr\expandafter {\romannumeral0\xintiabs{#1}}%
+}%
+\let\xintSqr\xintiSqr \let\xintsqr\xintisqr
+\def\XINT_sqr #1%
+{%
+    \expandafter\XINT_mul_enter
+          \romannumeral0%
+          \XINT_RQ {}#1\R\R\R\R\R\R\R\R\Z
+          \Z\Z\Z\Z #1\W\W\W\W
+}%
+\def\xintiiPow {\romannumeral0\xintiipow }%
+\def\xintiipow #1%
+{%
+    \expandafter\xint_pow\romannumeral-`0#1\Z%
+}%
+\def\xintiPow {\romannumeral0\xintipow }%
+\def\xintipow #1%
+{%
+    \expandafter\xint_pow\romannumeral0\xintnum{#1}\Z%
+}%
+\let\xintPow\xintiPow \let\xintpow\xintipow
+\def\xint_pow #1#2\Z
+{%
+    \xint_UDsignfork
+      #1\XINT_pow_Aneg
+       -\XINT_pow_Anonneg
+    \krof
+       #1{#2}%
+}%
+\def\XINT_pow_Aneg #1#2#3%
+{%
+   \expandafter\XINT_pow_Aneg_\expandafter{\the\numexpr #3}#2\Z
+}%
+\def\XINT_pow_Aneg_ #1%
+{%
+   \ifodd #1
+       \expandafter\XINT_pow_Aneg_Bodd
+   \fi
+   \XINT_pow_Anonneg_ {#1}%
+}%
+\def\XINT_pow_Aneg_Bodd #1%
+{%
+    \expandafter\XINT_opp\romannumeral0\XINT_pow_Anonneg_
+}%
+\def\XINT_pow_Anonneg #1#2#3%
+{%
+   \expandafter\XINT_pow_Anonneg_\expandafter {\the\numexpr #3}#1#2\Z
+}%
+\def\XINT_pow_Anonneg_ #1#2#3\Z
+{%
+    \if\relax #3\relax\xint_dothis
+                      {\ifcase #2 \expandafter\XINT_pow_AisZero
+                               \or\expandafter\XINT_pow_AisOne
+                             \else\expandafter\XINT_pow_AatleastTwo
+                       \fi }\fi
+    \xint_orthat \XINT_pow_AatleastTwo {#1}{#2#3}%
+}%
+\def\XINT_pow_AisOne #1#2{ 1}%
+\def\XINT_pow_AisZero #1#2%
+{%
+     \ifcase\XINT_cntSgn #1\Z
+         \xint_afterfi { 1}%
+     \or
+         \xint_afterfi { 0}%
+     \else
+         \xint_afterfi {\xintError:DivisionByZero\space 0}%
+     \fi
+}%
+\def\XINT_pow_AatleastTwo #1%
+{%
+    \ifcase\XINT_cntSgn #1\Z
+        \expandafter\XINT_pow_BisZero
+    \or
+        \expandafter\XINT_pow_checkBsize
+    \else
+        \expandafter\XINT_pow_BisNegative
+    \fi
+    {#1}%
+}%
+\edef\XINT_pow_BisNegative #1#2%
+    {\noexpand\xintError:FractionRoundedToZero\space 0}%
+\def\XINT_pow_BisZero #1#2{ 1}%
+\def\XINT_pow_checkBsize #1%
+{%
+    \ifnum #1>100000
+        \expandafter\XINT_pow_BtooBig
+    \else
+        \expandafter\XINT_pow_loopI
+    \fi
+    {#1}%
+}%
+\edef\XINT_pow_BtooBig #1#2{\noexpand\xintError:ExponentTooBig\space 0}%
+\def\XINT_pow_loopI #1%
+{%
+    \ifnum #1=\xint_c_i\XINT_pow_Iend\fi
+    \ifodd #1
+       \expandafter\XINT_pow_loopI_odd
+    \else
+       \expandafter\XINT_pow_loopI_even
+    \fi
+    {#1}%
+}%
+\edef\XINT_pow_Iend\fi #1\fi #2#3{\noexpand\fi\space #3}%
+\def\XINT_pow_loopI_even #1#2%
+{%
+    \expandafter\XINT_pow_loopI\expandafter
+    {\the\numexpr #1/\xint_c_ii\expandafter}\expandafter
+    {\romannumeral0\xintiisqr {#2}}%
+}%
+\def\XINT_pow_loopI_odd #1#2%
+{%
+    \expandafter\XINT_pow_loopI_odda\expandafter
+    {\romannumeral0\XINT_RQ {}#2\R\R\R\R\R\R\R\R\Z }{#1}{#2}%
+}%
+\def\XINT_pow_loopI_odda #1#2#3%
+{%
+    \expandafter\XINT_pow_loopII\expandafter
+    {\the\numexpr #2/\xint_c_ii-\xint_c_i\expandafter}\expandafter
+    {\romannumeral0\xintiisqr {#3}}{#1}%
+}%
+\def\XINT_pow_loopII #1%
+{%
+    \ifnum #1 = \xint_c_i\XINT_pow_IIend\fi
+    \ifodd #1
+       \expandafter\XINT_pow_loopII_odd
+    \else
+       \expandafter\XINT_pow_loopII_even
+    \fi
+    {#1}%
+}%
+\def\XINT_pow_loopII_even #1#2%
+{%
+    \expandafter\XINT_pow_loopII\expandafter
+    {\the\numexpr #1/\xint_c_ii\expandafter}\expandafter
+    {\romannumeral0\xintiisqr {#2}}%
+}%
+\def\XINT_pow_loopII_odd #1#2#3%
+{%
+    \expandafter\XINT_pow_loopII_odda\expandafter
+    {\romannumeral0\XINT_mulr_enter #3\Z\Z\Z\Z #2\W\W\W\W}{#1}{#2}%
+}%
+\def\XINT_pow_loopII_odda #1#2#3%
+{%
+    \expandafter\XINT_pow_loopII\expandafter
+    {\the\numexpr #2/\xint_c_ii-\xint_c_i\expandafter}\expandafter
+    {\romannumeral0\xintiisqr {#3}}{#1}%
+}%
+\def\XINT_pow_IIend\fi #1\fi #2#3#4%
+{%
+    \fi\XINT_mul_enter #4\Z\Z\Z\Z #3\W\W\W\W
+}%
+\def\xintiiQuo {\romannumeral0\xintiiquo }%
+\def\xintiiRem {\romannumeral0\xintiirem }%
+\def\xintiiquo {\expandafter\xint_firstoftwo_thenstop\romannumeral0\xintiidivision }%
+\def\xintiirem {\expandafter\xint_secondoftwo_thenstop\romannumeral0\xintiidivision }%
+\def\xintiQuo {\romannumeral0\xintiquo }%
+\def\xintiRem {\romannumeral0\xintirem }%
+\def\xintiquo {\expandafter\xint_firstoftwo_thenstop\romannumeral0\xintidivision }%
+\def\xintirem {\expandafter\xint_secondoftwo_thenstop\romannumeral0\xintidivision }%
+\let\xintQuo\xintiQuo\let\xintquo\xintiquo % deprecated (1.1)
+\let\xintRem\xintiRem\let\xintrem\xintirem % deprecated (1.1)
+\def\xintiDivision {\romannumeral0\xintidivision }%
+\def\xintidivision #1{\expandafter\XINT_division\romannumeral0\xintnum{#1}\Z }%
+\let\xintDivision\xintiDivision \let\xintdivision\xintidivision % deprecated
+\def\XINT_division #1#2\Z #3{\expandafter\XINT_iidivision_a\expandafter #1%
+                             \romannumeral0\xintnum{#3}\Z #2\Z }%
+\def\xintiiDivision   {\romannumeral0\xintiidivision }%
+\def\xintiidivision  #1{\expandafter\XINT_iidivision \romannumeral-`0#1\Z }%
+\def\XINT_iidivision #1#2\Z #3{\expandafter\XINT_iidivision_a\expandafter #1%
+                             \romannumeral-`0#3\Z #2\Z }%
+\def\XINT_iidivision_a #1#2% #1 de A, #2 de B.
+{%
+    \if0#2\xint_dothis\XINT_iidivision_divbyzero\fi
+    \if0#1\xint_dothis\XINT_iidivision_aiszero\fi
+    \if-#2\xint_dothis{\expandafter\XINT_iidivision_bneg
+                       \romannumeral0\XINT_iidivision_bpos #1}\fi
+    \xint_orthat{\XINT_iidivision_bpos #1#2}%
+}%
+\def\XINT_iidivision_divbyzero #1\Z #2\Z {\xintError:DivisionByZero\space {0}{0}}%
+\def\XINT_iidivision_aiszero #1\Z #2\Z   { {0}{0}}%
+\def\XINT_iidivision_bneg #1% q->-q, r unchanged
+   {\expandafter\space\expandafter{\romannumeral0\XINT_opp #1}}%
+\def\XINT_iidivision_bpos #1%
+{%
+    \xint_UDsignfork
+            #1\XINT_iidivision_aneg
+             -{\XINT_iidivision_apos #1}%
+    \krof
+}%
+\def\XINT_iidivision_apos #1#2\Z #3\Z{\XINT_div_prepare {#2}{#1#3}}%
+\def\XINT_iidivision_aneg #1\Z #2\Z
+   {\expandafter
+    \XINT_iidivision_aneg_b\romannumeral0\XINT_div_prepare {#1}{#2}{#1}}%
+\def\XINT_iidivision_aneg_b #1#2{\if0\XINT_Sgn #2\Z
+                              \expandafter\XINT_iidivision_aneg_rzero
+                           \else
+                              \expandafter\XINT_iidivision_aneg_rpos
+                           \fi {#1}{#2}}%
+\def\XINT_iidivision_aneg_rzero #1#2#3{ {-#1}{0}}% necessarily q was >0
+\def\XINT_iidivision_aneg_rpos #1%
+{%
+    \expandafter\XINT_iidivision_aneg_end\expandafter
+               {\expandafter-\romannumeral0\xintinc {#1}}% q-> -(1+q)
+}%
+\def\XINT_iidivision_aneg_end #1#2#3%
+{%
+     \expandafter\xint_exchangetwo_keepbraces_thenstop
+     \expandafter{\romannumeral0\XINT_sub_pre {#3}{#2}}{#1}% r-> b-r
+}%
+\def\XINT_div_prepare #1%
+{%
+    \expandafter \XINT_div_prepareB_aa \expandafter
+        {\romannumeral0\xintlength {#1}}{#1}% B > 0 ici
+}%
+\def\XINT_div_prepareB_aa #1%
+{%
+    \ifnum #1=\xint_c_i
+      \expandafter\XINT_div_prepareB_onedigit
+    \else
+      \expandafter\XINT_div_prepareB_a
+    \fi
+    {#1}%
+}%
+\def\XINT_div_prepareB_a #1%
+{%
+  \expandafter\XINT_div_prepareB_c\expandafter
+  {\the\numexpr \xint_c_iv*((#1+\xint_c_i)/\xint_c_iv)}{#1}%
+}%
+\def\XINT_div_prepareB_onedigit #1#2%
+{%
+    \ifcase#2
+    \or\expandafter\XINT_div_BisOne
+    \or\expandafter\XINT_div_BisTwo
+    \else\expandafter\XINT_div_prepareB_e
+    \fi {000}{0}{4}{#2}%
+}%
+\def\XINT_div_BisOne #1#2#3#4#5{ {#5}{0}}%
+\def\XINT_div_BisTwo #1#2#3#4#5%
+{%
+    \expandafter\expandafter\expandafter\XINT_div_BisTwo_a
+    \ifodd\xintiiLDg{#5} \expandafter1\else \expandafter0\fi {#5}%
+}%
+\edef\XINT_div_BisTwo_a #1#2%
+{%
+    \noexpand\expandafter\space\noexpand\expandafter
+    {\noexpand\romannumeral0\noexpand\xinthalf {#2}}{#1}%
+}%
+\def\XINT_div_prepareB_c #1#2%
+{%
+    \csname XINT_div_prepareB_d\romannumeral\numexpr#1-#2\endcsname
+    {#1}%
+}%
+\def\XINT_div_prepareB_d    {\XINT_div_prepareB_e {}{0000}}%
+\def\XINT_div_prepareB_di   {\XINT_div_prepareB_e {0}{000}}%
+\def\XINT_div_prepareB_dii  {\XINT_div_prepareB_e {00}{00}}%
+\def\XINT_div_prepareB_diii {\XINT_div_prepareB_e {000}{0}}%
+\def\XINT_div_cleanR        #10000.{{#1}}%
+\def\XINT_div_prepareB_e #1#2#3#4%
+{%
+    \ifnum#3=\xint_c_iv\expandafter\XINT_div_prepareLittleB_f
+                   \else\expandafter\XINT_div_prepareB_f
+    \fi
+    #4#1{#3}{#2}{#1}%
+}%
+\def\XINT_div_prepareB_f #1#2#3#4#5#{%
+    \expandafter\XINT_div_prepareB_g
+     \the\numexpr  #1#2#3#4+\xint_c_i\expandafter
+    .\the\numexpr (#1#2#3#4+\xint_c_i)/\xint_c_ii\expandafter
+    .\romannumeral0\xintreverseorder {#1#2#3#4#5}.{#1#2#3#4}%
+}%
+\def\XINT_div_prepareLittleB_f #1#{%
+    \expandafter\XINT_div_prepareB_g \the\numexpr  #1/\xint_c_ii.{}.{}.{#1}%
+}%
+\def\XINT_div_prepareB_g #1.#2.#3.#4#5#6#7#8%
+{%
+    \XINT_div_prepareA_a {#8#7}{#5}{{#1}{#2}{#4}}{#3}{#6}%
+}%
+\def\XINT_div_prepareA_a #1%
+{%
+    \expandafter\XINT_div_prepareA_b\expandafter
+       {\romannumeral0\xintlength {#1}}{#1}%
+}%
+\def\XINT_div_prepareA_b #1%
+{%
+  \expandafter\XINT_div_prepareA_c\expandafter
+    {\the\numexpr \xint_c_iv*((#1+\xint_c_i)/\xint_c_iv)}{#1}%
+}%
+\def\XINT_div_prepareA_c #1#2%
+{%
+    \csname XINT_div_prepareA_d\romannumeral\numexpr #1-#2\endcsname
+    {#1}%
+}%
+\def\XINT_div_prepareA_d     {\XINT_div_prepareA_e {}}%
+\def\XINT_div_prepareA_di    {\XINT_div_prepareA_e {0}}%
+\def\XINT_div_prepareA_dii   {\XINT_div_prepareA_e {00}}%
+\def\XINT_div_prepareA_diii  {\XINT_div_prepareA_e {000}}%
+\def\XINT_div_prepareA_e #1#2#3#4#5%
+{%
+    \XINT_div_start_a {#2}{#4}{#1#3}#5%
+}%
+\def\XINT_div_start_a #1#2%
+{%
+    \ifnum #2=\xint_c_iv \expandafter\XINT_div_little_b
+    \else
+      \ifnum #1 < #2
+        \expandafter\expandafter\expandafter\XINT_div_III_aa
+      \else
+        \expandafter\expandafter\expandafter\XINT_div_start_b
+      \fi
+    \fi
+    {#1}{#2}%
+}%
+\def\XINT_div_III_aa #1#2#3#4#5#6#7%
+{%
+    \expandafter\expandafter\expandafter
+    \XINT_div_III_b\xint_cleanupzeros_nostop #3.{0000}%
+}%
+\def\XINT_div_III_b #1%
+{%
+    \if0#1%
+       \expandafter\XINT_div_III_bRzero
+    \else
+       \expandafter\XINT_div_III_bRpos
+    \fi
+    #1%
+}%
+\def\XINT_div_III_bRzero 0.#1#2%
+{%
+    \expandafter\space\expandafter
+   {\romannumeral0\XINT_cuz_loop #1\W\W\W\W\W\W\W\Z}{0}%
+}%
+\def\XINT_div_III_bRpos #1.#2#3%
+{%
+    \expandafter\XINT_div_III_c \XINT_div_cleanR #1#3.{#2}%
+}%
+\def\XINT_div_III_c #1#2%
+{%
+    \expandafter\space\expandafter
+   {\romannumeral0\XINT_cuz_loop #2\W\W\W\W\W\W\W\Z}{#1}%
+}%
+\def\XINT_div_start_b #1#2#3#4#5#6%
+{%
+    \XINT_div_start_c {#2}.#3.{#6}{{#1}{#2}{{#4}{#5}}{#6}}%
+}%
+\def\XINT_div_start_c #1#2.#3#4#5#6%
+{%
+    \ifnum #1=\xint_c_iv\XINT_div_start_ca\fi
+    \expandafter\XINT_div_start_c\expandafter
+         {\the\numexpr #1-\xint_c_iv}#2#3#4#5#6.%
+}%
+\def\XINT_div_start_ca\fi\expandafter\XINT_div_start_c\expandafter
+    #1#2#3#4#5{\fi\XINT_div_start_d {#2#3#4#5}#2#3#4#5}%
+\def\XINT_div_start_d #1#2.#3.#4#5#6%
+{%
+    \XINT_div_I_a {#1}{#4}{#2}{#6}{0000}#5{#3}{#6}{}%
+}%
+\def\XINT_div_I_a #1#2%
+{%
+    \expandafter\XINT_div_I_b\the\numexpr #1/#2.{#1}{#2}%
+}%
+\def\XINT_div_I_b #1%
+{%
+    \xint_gob_til_zero #1\XINT_div_I_czero 0\XINT_div_I_c #1%
+}%
+\def\XINT_div_I_czero 0%
+    \XINT_div_I_c 0.#1#2#3#4#5{\XINT_div_I_g {#5}{#3}}%
+\def\XINT_div_I_c #1.#2#3%
+{%
+    \expandafter\XINT_div_I_da\the\numexpr #2-#1*#3.#1.%
+}%
+\def\XINT_div_I_da #1.%
+{%
+    \ifnum #1>\xint_c_ix
+       \expandafter\XINT_div_I_dP
+    \else
+       \ifnum #1<\xint_c_
+        \expandafter\expandafter\expandafter\XINT_div_I_dN
+       \else
+        \expandafter\expandafter\expandafter\XINT_div_I_db
+       \fi
+    \fi
+}%
+\def\XINT_div_I_dN #1.%
+{%
+    \expandafter\XINT_div_I_dP\the\numexpr #1-\xint_c_i.%
+}%
+\def\XINT_div_I_db #1.#2#3% #1=q=un chiffre, #2=alpha, #3=B
+{%
+    \expandafter\XINT_div_I_dc\expandafter
+    {\romannumeral0\expandafter\XINT_div_sub_xpxp\expandafter
+       {\romannumeral0\xintreverseorder{#2}}%
+       {\romannumeral0\XINT_mul_Mr {#1}#3\Z\Z\Z\Z }}%
+    #1{#2}{#3}%
+}%
+\def\XINT_div_I_dc #1#2%
+{%
+    \if-#1% s'arranger pour que si n\'egatif on ait renvoy\'e alpha=-.
+         \expandafter\xint_firstoftwo
+    \else\expandafter\xint_secondoftwo\fi
+    {\expandafter\XINT_div_I_dP\the\numexpr #2-\xint_c_i.}%
+    {\XINT_div_I_e {#1}#2}%
+}%
+\def\XINT_div_I_e #1#2#3#4#5%
+{%
+    \expandafter\XINT_div_I_f \the\numexpr \xint_c_x^iv+#2+#5{#1}%
+}%
+\def\XINT_div_I_dP #1.#2#3#4%
+{%
+    \expandafter \XINT_div_I_f \the\numexpr \xint_c_x^iv+#1+#4\expandafter
+    {\romannumeral0\expandafter\XINT_div_sub_xpxp\expandafter
+      {\romannumeral0\xintreverseorder{#2}}%
+      {\romannumeral0\XINT_mul_Mr {#1}#3\Z\Z\Z\Z }}%
+}%
+\def\XINT_div_I_f 1#1#2#3#4{\XINT_div_I_g {#1#2#3#4}}%
+\def\XINT_div_I_g #1#2#3#4#5#6#7#8#9%
+{%
+     \ifnum#3=#4
+          \expandafter\XINT_div_III_ab
+     \else
+          \expandafter\XINT_div_I_h
+     \fi
+     {#5}#2.#7.{{#5}{#6}{#4}{#3}}{#8}{#9#1}%
+}%
+\def\XINT_div_III_ab #1#2.#3.#4#5%
+{%
+    \expandafter\XINT_div_III_b
+    \romannumeral0\XINT_cuz_loop #2#3\W\W\W\W\W\W\W\Z.%
+}%
+\def\XINT_div_I_h #1.#2#3#4#5#6.#7#8%
+{%
+    \XINT_div_II_b #1#2#3#4#5.{#8}{#7}{#6}{#8}%
+}%
+\def\XINT_div_II_b #1#2#3#4#5#6#7#8#9%
+{%
+    \xint_gob_til_zeros_iv #2#3#4#5\XINT_div_II_skipc 0000%
+    \XINT_div_II_c #1{#2#3#4#5}{#6#7#8#9}%
+}%
+\def\XINT_div_II_skipc 0000\XINT_div_II_c #1#2#3#4#5.#6#7%
+{%
+    \XINT_div_II_k #7{#4#5}{#6}{0000}%
+}%
+\def\XINT_div_II_c #1#2#3#4%
+{%
+     \expandafter\XINT_div_II_d\the\numexpr (#3#4+#2)/#1+\xint_c_ixixixix\relax
+     {#1}{#2}#3#4%
+}%
+\def\XINT_div_II_d 1#1#2#3#4#5#6#7.#8%
+{%
+    \expandafter\XINT_div_II_e
+    \romannumeral0\expandafter\XINT_div_sub_xpxp\expandafter
+      {\romannumeral0\xintreverseorder{#7}}%
+      {\romannumeral0\XINT_mul_Mr {#1#2#3#4}#8\Z\Z\Z\Z }.%
+    {#5}{#6}{#8}{#1#2#3#4}%
+}%
+\def\XINT_div_II_e #1#2#3#4%
+{%
+    \xint_gob_til_zeros_iv #1#2#3#4\XINT_div_II_skipf 0000%
+    \XINT_div_II_f #1#2#3#4%
+}%
+\def\XINT_div_II_skipf 0000\XINT_div_II_f 0000#1.#2#3#4#5#6%
+{%
+    \XINT_div_II_k #6{#1}{#4}{#5}%
+}%
+\def\XINT_div_II_f #1#2#3#4#5#6#7#8#9.%
+{%
+    \XINT_div_II_fa {#1#2#3#4#5#6#7#8}{#1#2#3#4#5#6#7#8#9}%
+}%
+\def\XINT_div_II_fa #1#2#3#4%
+{%
+    \expandafter\XINT_div_II_g\expandafter
+                                {\the\numexpr (#1+#4)/#3-\xint_c_i}{#2}%
+}%
+\def\XINT_div_II_g #1#2#3#4%
+{%
+    \expandafter \XINT_div_II_h
+    \the\numexpr #4+#1+\xint_c_x^iv\expandafter\expandafter\expandafter
+    {\expandafter\xint_gobble_iv
+    \romannumeral0\expandafter\XINT_div_sub_xpxp\expandafter
+       {\romannumeral0\xintreverseorder{#2}}%
+       {\romannumeral0\XINT_mul_Mr {#1}#3\Z\Z\Z\Z }}{#3}%
+}%
+\def\XINT_div_II_h 1#1#2#3#4#5#6#7%
+{%
+    \XINT_div_II_k #7{#5}{#6}{#1#2#3#4}%
+}%
+\def\XINT_div_II_k #1#2#3#4#5%
+{%
+    \expandafter\XINT_div_II_l \the\numexpr #4-\xint_c_iv.{#3}#1{#2}#5.%
+}%
+\def\XINT_div_II_l #1.#2#3#4#5#6#7#8#9%
+{%
+    \XINT_div_II_m {{#1}{#2}{{#3}{#4}}{#5}}{#5}{#6#7#8#9}#6#7#8#9%
+}%
+\def\XINT_div_II_m #1#2#3#4.#5#6%
+{%
+     \XINT_div_I_a {#3}{#2}{#4}{#5}{#6}#1%
+}%
+\def\XINT_div_little_b #1#2#3#4#5#6#7%
+{%
+    \XINT_div_little_c #3.{{#4}{#6}}{#1}%
+}%
+\def\XINT_div_little_c #1#2#3#4#5.#6#7%
+{%
+    \XINT_div_littleI_a {#1#2#3#4}#6{#7}{#5}%
+}%
+\def\XINT_div_littleI_a #1#2#3%
+{%
+    \expandafter\XINT_div_littleI_b
+    \the\numexpr (#1+#2)/#3-\xint_c_i{#1}{#2}{#3}%
+}%
+\def\XINT_div_littleI_b #1%
+{%
+    \xint_gob_til_zero #1\XINT_div_littleI_skip 0\XINT_div_littleI_c #1%
+}%
+\def\XINT_div_littleI_skip 0\XINT_div_littleI_c 0#1#2#3#4#5%
+   {\XINT_div_littleII_a {#4}{#1}#5.{{#2}{#3}}{0000}}%
+\def\XINT_div_littleI_c #1#2#3#4%
+{%
+    \expandafter\expandafter\expandafter\XINT_div_littleI_e
+    \expandafter\expandafter\expandafter
+    {\expandafter\xint_gobble_i\the\numexpr \xint_c_x^iv+#2-#1*#4}#1{{#3}{#4}}%
+}%
+\def\XINT_div_littleI_e #1#2#3#4#5%
+   {\XINT_div_littleII_a {#4}{#1}#5.{#3}{000#2}}%
+\def\XINT_div_littleII_a #1%
+{%
+     \ifnum#1=\xint_c_iv
+          \expandafter\XINT_div_littleIII_ab
+     \else
+          \expandafter\XINT_div_littleII_b
+     \fi {#1}%
+}%
+\def\XINT_div_littleIII_ab #1#2#3.#4%
+{%
+    \expandafter\XINT_div_III_b\the\numexpr #2#3.%
+}%
+\def\XINT_div_littleII_b #1%
+{%
+   \expandafter\XINT_div_littleII_c\expandafter {\the\numexpr #1-\xint_c_iv}%
+}%
+\def\XINT_div_littleII_c #1#2#3#4#5#6#7.#8%
+{%
+    \XINT_div_littleII_d {#2#3#4#5#6}#8{#1}{#7}%
+}%
+\def\XINT_div_littleII_d #1#2#3%
+{%
+    \expandafter\XINT_div_littleII_e\the\numexpr (#1+#2)/#3+\xint_c_ixixixix.%
+    {#1}{#2}{#3}%
+}%
+\def\XINT_div_littleII_e 1#1.#2#3#4%
+{%
+    \expandafter\expandafter\expandafter\XINT_div_littleII_f
+    \expandafter\xint_gobble_i\the\numexpr \xint_c_x^iv+#2-#1*#4.%
+    {#1}{{#3}{#4}}%
+}%
+\def\XINT_div_littleII_f #1.#2#3#4#5#6%
+{%
+    \XINT_div_littleII_a {#4}{#1}#5.{#3}{#6#2}%
+}%
+\def\XINT_div_sub_xpxp #1#2% #1=alpha d\'ej\`a renvers\'e, #2 se d\'eveloppe en qB
+{%
+    \expandafter\XINT_div_sub_xpxp_b #2\W\X\Y\Z #1\W\X\Y\Z
+}%
+\def\XINT_div_sub_xpxp_b
+{%
+    \XINT_div_sub_A 1{}%
+}%
+\def\XINT_div_sub_A #1#2#3#4#5#6%
+{%
+    \xint_gob_til_W #3\xint_div_sub_az\W
+    \XINT_div_sub_B #1{#3#4#5#6}{#2}%
+}%
+\def\XINT_div_sub_B #1#2#3#4\W\X\Y\Z #5#6#7#8%
+{%
+    \xint_gob_til_W #5\xint_div_sub_bz\W
+    \XINT_div_sub_onestep #1#2{#8#7#6#5}{#3}#4\W\X\Y\Z
+}%
+\def\XINT_div_sub_onestep #1#2#3#4#5#6%
+{%
+    \expandafter\XINT_div_sub_backtoA
+    \the\numexpr 11#6-#5#4#3#2+#1-\xint_c_i.%
+}%
+\def\XINT_div_sub_backtoA #1#2#3.#4%
+{%
+    \XINT_div_sub_A #2{#3#4}%
+}%
+\def\xint_div_sub_bz\W\XINT_div_sub_onestep #1\Z { -}%
+\def\xint_div_sub_az\W\XINT_div_sub_B #1#2{\XINT_div_sub_C #1}%
+\def\XINT_div_sub_C #1#2#3#4#5#6%
+{%
+    \xint_gob_til_W #3\xint_div_sub_cz\W
+    \XINT_div_sub_C_onestep #1{#6#5#4#3}{#2}%
+}%
+\def\XINT_div_sub_C_onestep #1#2%
+{%
+    \expandafter\XINT_div_sub_backtoC \the\numexpr 11#2+#1-\xint_c_i.%
+}%
+\def\XINT_div_sub_backtoC #1#2#3.#4%
+{%
+    \XINT_div_sub_C #2{#3#4}%
+}%
+\def\xint_div_sub_cz\W\XINT_div_sub_C_onestep #1#2%
+{%
+    \if#10% retenue
+         \expandafter\xint_div_sub_neg
+    \else\expandafter\xint_div_sub_ok
+    \fi
+}%
+\def\xint_div_sub_neg #1{ -}%
+\def\xint_div_sub_ok  #1{ #1}%
+\def\xintiDivRound    {\romannumeral0\xintidivround }%
+\def\xintidivround  #1{\expandafter\XINT_iidivround\romannumeral0\xintnum{#1}\Z }%
+\def\xintiiDivRound   {\romannumeral0\xintiidivround }%
+\def\xintiidivround #1{\expandafter\XINT_iidivround \romannumeral-`0#1\Z }%
+\def\XINT_iidivround #1#2\Z #3{\expandafter\XINT_iidivround_a\expandafter #1%
+                             \romannumeral-`0#3\Z #2\Z }%
+\def\XINT_iidivround_a #1#2% #1 de A, #2 de B.
+{%
+    \if0#2\xint_dothis\XINT_iidivround_divbyzero\fi
+    \if0#1\xint_dothis\XINT_iidivround_aiszero\fi
+    \if-#2\xint_dothis{\XINT_iidivround_bneg #1}\fi
+          \xint_orthat{\XINT_iidivround_bpos #1#2}%
+}%
+\def\XINT_iidivround_divbyzero #1\Z #2\Z {\xintError:DivisionByZero\space 0}%
+\def\XINT_iidivround_aiszero   #1\Z #2\Z { 0}%
+\def\XINT_iidivround_bpos #1%
+{%
+    \xint_UDsignfork
+            #1{\xintiiopp\XINT_iidivround_pos {}}%
+             -{\XINT_iidivround_pos #1}%
+    \krof
+}%
+\def\XINT_iidivround_bneg #1%
+{%
+    \xint_UDsignfork
+            #1{\XINT_iidivround_pos {}}%
+             -{\xintiiopp\XINT_iidivround_pos #1}%
+    \krof
+}%
+\def\XINT_iidivround_pos #1#2\Z #3\Z{\expandafter\XINT_iidivround_pos_a
+                          \romannumeral0\XINT_div_prepare {#2}{#1#30}}%
+\def\XINT_iidivround_pos_a #1#2{\xintReverseOrder {#1\XINT_iidivround_pos_b}\Z }%
+\def\XINT_iidivround_pos_b #1#2{\xint_gob_til_Z #2\XINT_iidivround_pos_small\Z
+                        \XINT_iidivround_pos_c #1#2}%
+\def\XINT_iidivround_pos_c #1#2\Z {\ifnum #1>\xint_c_iv
+                              \expandafter\XINT_iidivround_pos_up
+                      \else   \expandafter\xintreverseorder
+                      \fi {#2}}%
+\def\XINT_iidivround_pos_up #1{\xintinc {\xintReverseOrder{#1}}}%
+\def\XINT_iidivround_pos_small\Z\XINT_iidivround_pos_c #1#2%
+    {\ifnum #1>\xint_c_iv\expandafter\xint_secondoftwo\else\expandafter
+                                  \xint_firstoftwo\fi { 0}{ 1}}%
+\def\xintiDivTrunc    {\romannumeral0\xintidivtrunc }%
+\def\xintidivtrunc  #1{\expandafter\XINT_iidivtrunc\romannumeral0\xintnum{#1}\Z }%
+\def\xintiiDivTrunc   {\romannumeral0\xintiidivtrunc }%
+\def\xintiidivtrunc #1{\expandafter\XINT_iidivtrunc \romannumeral-`0#1\Z }%
+\def\XINT_iidivtrunc #1#2\Z #3{\expandafter\XINT_iidivtrunc_a\expandafter #1%
+                             \romannumeral-`0#3\Z #2\Z }%
+\def\XINT_iidivtrunc_a #1#2% #1 de A, #2 de B.
+{%
+    \if0#2\xint_dothis\XINT_iidivround_divbyzero\fi
+    \if0#1\xint_dothis\XINT_iidivround_aiszero\fi
+    \if-#2\xint_dothis{\XINT_iidivtrunc_bneg #1}\fi
+          \xint_orthat{\XINT_iidivtrunc_bpos #1#2}%
+}%
+\def\XINT_iidivtrunc_bpos #1%
+{%
+    \xint_UDsignfork
+            #1{\xintiiopp\XINT_iidivtrunc_pos {}}%
+             -{\XINT_iidivtrunc_pos #1}%
+    \krof
+}%
+\def\XINT_iidivtrunc_bneg #1%
+{%
+    \xint_UDsignfork
+            #1{\XINT_iidivtrunc_pos {}}%
+             -{\xintiiopp\XINT_iidivtrunc_pos #1}%
+    \krof
+}%
+\def\XINT_iidivtrunc_pos #1#2\Z #3\Z%
+    {\expandafter\xint_firstoftwo_thenstop\romannumeral0\XINT_div_prepare {#2}{#1#3}}%
+\def\xintiMod    {\romannumeral0\xintimod }%
+\def\xintimod  #1{\expandafter\XINT_iimod\romannumeral0\xintnum{#1}\Z }%
+\def\xintiiMod   {\romannumeral0\xintiimod }%
+\def\xintiimod #1{\expandafter\XINT_iimod \romannumeral-`0#1\Z }%
+\def\XINT_iimod #1#2\Z #3{\expandafter\XINT_iimod_a\expandafter #1%
+                             \romannumeral-`0#3\Z #2\Z }%
+\def\XINT_iimod_a #1#2% #1 de A, #2 de B.
+{%
+    \if0#2\xint_dothis\XINT_iidivround_divbyzero\fi
+    \if0#1\xint_dothis\XINT_iidivround_aiszero\fi
+    \if-#2\xint_dothis{\XINT_iimod_bneg #1}\fi
+          \xint_orthat{\XINT_iimod_bpos #1#2}%
+}%
+\def\XINT_iimod_bpos #1%
+{%
+    \xint_UDsignfork
+            #1{\xintiiopp\XINT_iimod_pos {}}%
+             -{\XINT_iimod_pos #1}%
+    \krof
+}%
+\def\XINT_iimod_bneg #1%
+{%
+    \xint_UDsignfork
+            #1{\xintiiopp\XINT_iimod_pos {}}%
+             -{\XINT_iimod_pos #1}%
+    \krof
+}%
+\def\XINT_iimod_pos #1#2\Z #3\Z%
+    {\expandafter\xint_secondoftwo_thenstop\romannumeral0\XINT_div_prepare {#2}{#1#3}}%
+\def\xintDec {\romannumeral0\xintdec }%
+\def\xintdec #1%
+{%
+     \expandafter\XINT_dec\romannumeral-`0#1%
+     \R\R\R\R\R\R\R\R\Z \W\W\W\W\W\W\W\W
+}%
+\def\XINT_dec #1%
+{%
+    \xint_UDzerominusfork
+      #1-\XINT_dec_zero
+      0#1\XINT_dec_neg
+       0-{\XINT_dec_pos #1}%
+    \krof
+}%
+\def\XINT_dec_zero #1\W\W\W\W\W\W\W\W { -1}%
+\def\XINT_dec_neg
+   {\expandafter\xint_minus_thenstop\romannumeral0\XINT_inc_pos }%
+\def\XINT_dec_pos
+{%
+    \expandafter\XINT_dec_a \expandafter{\expandafter}%
+    \romannumeral0\XINT_OQ {}%
+}%
+\def\XINT_dec_a #1#2#3#4#5#6#7#8#9%
+{%
+    \expandafter\XINT_dec_b
+    \the\numexpr 11#9#8#7#6#5#4#3#2-\xint_c_i\relax {#1}%
+}%
+\def\XINT_dec_b 1#1%
+{%
+    \xint_gob_til_one #1\XINT_dec_A 1\XINT_dec_c
+}%
+\def\XINT_dec_c #1#2#3#4#5#6#7#8#9{\XINT_dec_a {#1#2#3#4#5#6#7#8#9}}%
+\def\XINT_dec_A 1\XINT_dec_c #1#2#3#4#5#6#7#8#9%
+   {\XINT_dec_B {#1#2#3#4#5#6#7#8#9}}%
+\def\XINT_dec_B #1#2\W\W\W\W\W\W\W\W
+{%
+    \expandafter\XINT_dec_cleanup
+    \romannumeral0\XINT_rord_main {}#2%
+      \xint_relax
+        \xint_bye\xint_bye\xint_bye\xint_bye
+        \xint_bye\xint_bye\xint_bye\xint_bye
+      \xint_relax
+    #1%
+}%
+\edef\XINT_dec_cleanup #1#2#3#4#5#6#7#8%
+    {\noexpand\expandafter\space\noexpand\the\numexpr #1#2#3#4#5#6#7#8\relax }%
+\def\xintInc {\romannumeral0\xintinc }%
+\def\xintinc #1%
+{%
+     \expandafter\XINT_inc\romannumeral-`0#1%
+     \R\R\R\R\R\R\R\R\Z \W\W\W\W\W\W\W\W
+}%
+\def\XINT_inc #1%
+{%
+    \xint_UDzerominusfork
+      #1-\XINT_inc_zero
+      0#1\XINT_inc_neg
+       0-{\XINT_inc_pos #1}%
+    \krof
+}%
+\def\XINT_inc_zero #1\W\W\W\W\W\W\W\W { 1}%
+\def\XINT_inc_neg {\expandafter\XINT_opp\romannumeral0\XINT_dec_pos }%
+\def\XINT_inc_pos
+{%
+    \expandafter\XINT_inc_a \expandafter{\expandafter}%
+    \romannumeral0\XINT_OQ {}%
+}%
+\def\XINT_inc_a #1#2#3#4#5#6#7#8#9%
+{%
+    \xint_gob_til_W #9\XINT_inc_end\W
+    \expandafter\XINT_inc_b
+    \the\numexpr 10#9#8#7#6#5#4#3#2+\xint_c_i\relax {#1}%
+}%
+\def\XINT_inc_b 1#1%
+{%
+    \xint_gob_til_zero #1\XINT_inc_A 0\XINT_inc_c
+}%
+\def\XINT_inc_c #1#2#3#4#5#6#7#8#9{\XINT_inc_a {#1#2#3#4#5#6#7#8#9}}%
+\def\XINT_inc_A 0\XINT_inc_c #1#2#3#4#5#6#7#8#9%
+               {\XINT_dec_B {#1#2#3#4#5#6#7#8#9}}%
+\def\XINT_inc_end\W #1\relax #2{ 1#2}%
+\XINT_restorecatcodes_endinput%
+\endinput
+%%
+%% End of file `xintcore.sty'.