diff options
Diffstat (limited to 'Master/texmf-dist/tex/generic/xint/xintkernel.sty')
-rw-r--r-- | Master/texmf-dist/tex/generic/xint/xintkernel.sty | 254 |
1 files changed, 254 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/xint/xintkernel.sty b/Master/texmf-dist/tex/generic/xint/xintkernel.sty new file mode 100644 index 00000000000..16300608b64 --- /dev/null +++ b/Master/texmf-dist/tex/generic/xint/xintkernel.sty @@ -0,0 +1,254 @@ +%% +%% This is file `xintkernel.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% xint.dtx (with options: `xintkernel') +%% +%% IMPORTANT NOTICE: +%% +%% For the copyright see the source file. +%% +%% Any modified versions of this file must be renamed +%% with new filenames distinct from xintkernel.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 +%% xintkernel: Paraphernalia for the xint packages +%% --------------------------------------------------------------- +\begingroup\catcode61\catcode48\catcode32=10\relax% + \catcode13=5 % ^^M + \endlinechar=13 % + \catcode123=1 % { + \catcode125=2 % } + \catcode35=6 % # + \catcode44=12 % , + \catcode45=12 % - + \catcode46=12 % . + \catcode58=12 % : + \catcode95=11 % _ + \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{xintkernel}{\numexpr not available, aborting input}% + \aftergroup\endinput + \else + \expandafter + \ifx\csname XINTsetupcatcodes\endcsname\relax + \else + \y{xintkernel}{I was already loaded, aborting input}% + \aftergroup\endinput + \fi + \fi + \def\SetCatcodesIfInputNotAborted + {% + \endgroup + \def\XINT_restorecatcodes + {% takes care of all, to allow more economical code in modules + \catcode59=\the\catcode59 % ; xintexpr + \catcode126=\the\catcode126 % ~ xintexpr + \catcode39=\the\catcode39 % ' xintexpr + \catcode34=\the\catcode34 % " xintbinhex, and xintexpr + \catcode63=\the\catcode63 % ? xintexpr + \catcode124=\the\catcode124 % | xintexpr + \catcode38=\the\catcode38 % & xintexpr + \catcode64=\the\catcode64 % @ xintexpr + \catcode33=\the\catcode33 % ! xintexpr + \catcode93=\the\catcode93 % ] -, xintfrac, xintseries, xintcfrac + \catcode91=\the\catcode91 % [ -, xintfrac, xintseries, xintcfrac + \catcode36=\the\catcode36 % $ xintgcd only + \catcode94=\the\catcode94 % ^ + \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 % = + }% + \edef\XINT_restorecatcodes_endinput + {% + \XINT_restorecatcodes\noexpand\endinput % + }% + \def\XINT_setcatcodes + {% + \catcode61=12 % = + \catcode32=10 % space + \catcode13=5 % ^^M + \endlinechar=13 % + \catcode123=1 % { + \catcode125=2 % } + \catcode95=11 % _ LETTER + \catcode35=6 % # + \catcode44=12 % , + \catcode45=12 % - + \catcode46=12 % . + \catcode58=11 % : LETTER + \catcode60=12 % < + \catcode62=12 % > + \catcode43=12 % + + \catcode42=12 % * + \catcode40=12 % ( + \catcode41=12 % ) + \catcode47=12 % / + \catcode96=12 % ` + \catcode94=11 % ^ LETTER + \catcode36=3 % $ + \catcode91=12 % [ + \catcode93=12 % ] + \catcode33=11 % ! LETTER + \catcode64=11 % @ LETTER + \catcode38=12 % & + \catcode124=12 % | + \catcode63=11 % ? LETTER + \catcode34=12 % " + \catcode39=12 % ' + \catcode126=3 % ~ + \catcode59=12 % ; + }% + \XINT_setcatcodes + }% +\SetCatcodesIfInputNotAborted +\def\XINTsetupcatcodes {% for use by other modules + \edef\XINT_restorecatcodes_endinput + {% + \XINT_restorecatcodes\noexpand\endinput % + }% + \XINT_setcatcodes +}% +\ifdefined\ProvidesPackage + \let\XINT_providespackage\relax +\else + \def\XINT_providespackage #1#2[#3]% + {\immediate\write-1{Package: #2 #3}% + \expandafter\xdef\csname ver@#2.sty\endcsname{#3}}% +\fi +\XINT_providespackage +\ProvidesPackage {xintkernel}% + [2014/10/28 v1.1 Paraphernalia for the xint packages (jfB)]% +\long\def\xint_gobble_ {}% +\long\def\xint_gobble_i #1{}% +\long\def\xint_gobble_ii #1#2{}% +\long\def\xint_gobble_iii #1#2#3{}% +\long\def\xint_gobble_iv #1#2#3#4{}% +\long\def\xint_gobble_v #1#2#3#4#5{}% +\long\def\xint_gobble_vi #1#2#3#4#5#6{}% +\long\def\xint_gobble_vii #1#2#3#4#5#6#7{}% +\long\def\xint_gobble_viii #1#2#3#4#5#6#7#8{}% +\long\def\xint_firstofone #1{#1}% +\long\def\xint_firstoftwo #1#2{#1}% +\long\def\xint_secondoftwo #1#2{#2}% +\long\def\xint_firstofone_thenstop #1{ #1}% +\long\def\xint_firstoftwo_thenstop #1#2{ #1}% +\long\def\xint_secondoftwo_thenstop #1#2{ #2}% +\def\xint_gob_til_zero #10{}% +\def\xint_UDzerominusfork #10-#2#3\krof {#2}% +\long\def\xint_gob_til_R #1\R {}% +\long\def\xint_gob_til_W #1\W {}% +\long\def\xint_gob_til_Z #1\Z {}% +\let\xint_relax\relax +\def\xint_brelax {\xint_relax }% +\long\def\xint_gob_til_xint_relax #1\xint_relax {}% +\long\def\xint_afterfi #1#2\fi {\fi #1}% +\long\def\xint_bye #1\xint_bye {}% +\long\def\xint_dothis #1#2\xint_orthat #3{\fi #1}% v1.1 +\let\xint_orthat \xint_firstofone +\def\xint_zapspaces #1 #2{#1#2\xint_zapspaces }% v1.1 +\chardef\xint_c_ 0 +\chardef\xint_c_i 1 +\chardef\xint_c_ii 2 +\chardef\xint_c_iii 3 +\chardef\xint_c_iv 4 +\chardef\xint_c_v 5 +\chardef\xint_c_vi 6 +\chardef\xint_c_vii 7 +\chardef\xint_c_viii 8 +\def\xintodef #1{\expandafter\def\expandafter#1\expandafter }% +\def\xintoodef #1{\expandafter\expandafter\expandafter\def + \expandafter\expandafter\expandafter#1% + \expandafter\expandafter\expandafter }% +\def\xintfdef #1#2{\expandafter\def\expandafter#1\expandafter + {\romannumeral-`0#2}}% +\ifdefined\odef\else\let\odef\xintodef\fi +\ifdefined\oodef\else\let\oodef\xintoodef\fi +\ifdefined\fdef\else\let\fdef\xintfdef\fi +\def\xintReverseOrder {\romannumeral0\xintreverseorder }% +\long\def\xintreverseorder #1% +{% + \XINT_rord_main {}#1% + \xint_relax + \xint_bye\xint_bye\xint_bye\xint_bye + \xint_bye\xint_bye\xint_bye\xint_bye + \xint_relax +}% +\long\def\XINT_rord_main #1#2#3#4#5#6#7#8#9% +{% + \xint_bye #9\XINT_rord_cleanup\xint_bye + \XINT_rord_main {#9#8#7#6#5#4#3#2#1}% +}% +\long\edef\XINT_rord_cleanup\xint_bye\XINT_rord_main #1#2\xint_relax +{% + \noexpand\expandafter\space\noexpand\xint_gob_til_xint_relax #1% +}% +\def\xintLength {\romannumeral0\xintlength }% +\long\def\xintlength #1% +{% + \XINT_length_loop + 0.#1\xint_relax\xint_relax\xint_relax\xint_relax + \xint_relax\xint_relax\xint_relax\xint_relax\xint_bye +}% +\long\def\XINT_length_loop #1.#2#3#4#5#6#7#8#9% +{% + \xint_gob_til_xint_relax #9\XINT_length_finish_a\xint_relax + \expandafter\XINT_length_loop\the\numexpr #1+\xint_c_viii.% +}% +\def\XINT_length_finish_a\xint_relax\expandafter\XINT_length_loop + \the\numexpr #1+\xint_c_viii.#2\xint_bye +{% + \XINT_length_finish_b #2\W\W\W\W\W\W\W\Z {#1}% +}% +\def\XINT_length_finish_b #1#2#3#4#5#6#7#8\Z +{% + \xint_gob_til_W + #1\XINT_length_finish_c \xint_c_ + #2\XINT_length_finish_c \xint_c_i + #3\XINT_length_finish_c \xint_c_ii + #4\XINT_length_finish_c \xint_c_iii + #5\XINT_length_finish_c \xint_c_iv + #6\XINT_length_finish_c \xint_c_v + #7\XINT_length_finish_c \xint_c_vi + \W\XINT_length_finish_c \xint_c_vii\Z +}% +\edef\XINT_length_finish_c #1#2\Z #3% + {\noexpand\expandafter\space\noexpand\the\numexpr #3+#1\relax}% +\XINT_restorecatcodes_endinput% +\endinput +%% +%% End of file `xintkernel.sty'. |