summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/oberdiek/hobsub-generic.sty
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/generic/oberdiek/hobsub-generic.sty')
-rw-r--r--Master/texmf-dist/tex/generic/oberdiek/hobsub-generic.sty13811
1 files changed, 6905 insertions, 6906 deletions
diff --git a/Master/texmf-dist/tex/generic/oberdiek/hobsub-generic.sty b/Master/texmf-dist/tex/generic/oberdiek/hobsub-generic.sty
index 328c0d37bcd..a8beaaa9b3d 100644
--- a/Master/texmf-dist/tex/generic/oberdiek/hobsub-generic.sty
+++ b/Master/texmf-dist/tex/generic/oberdiek/hobsub-generic.sty
@@ -38,6 +38,9 @@
%%
%% This is a generated file.
%%
+%% Project: hobsub
+%% Version: 2011/04/18 v1.3
+%%
%% Copyright (C) 2011 by
%% Heiko Oberdiek <heiko.oberdiek at googlemail.com>
%%
@@ -64,90 +67,90 @@
%% hobsub-hyperref.sty, hobsub-test1.tex.
%%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode123=1 % {
- \catcode125=2 % }
- \expandafter\let\expandafter\x\csname ver@hobsub-generic.sty\endcsname
- \ifx\x\relax % plain-TeX, first loading
- \else
- \def\empty{}%
- \ifx\x\empty % LaTeX, first loading,
- % variable is initialized, but \ProvidesPackage not yet seen
- \else
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
- \fi
- \x{hobsub-generic}{The package is already loaded}%
- \aftergroup\endinput
- \fi
- \fi
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\expandafter\let\expandafter\x\csname ver@hobsub-generic.sty\endcsname
+\ifx\x\relax % plain-TeX, first loading
+\else
+\def\empty{}%
+\ifx\x\empty % LaTeX, first loading,
+% variable is initialized, but \ProvidesPackage not yet seen
+\else
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+\fi
+\x{hobsub-generic}{The package is already loaded}%
+\aftergroup\endinput
+\fi
+\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode47=12 % /
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode91=12 % [
- \catcode93=12 % ]
- \catcode123=1 % {
- \catcode125=2 % }
- \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
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode47=12 % /
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode91=12 % [
+\catcode93=12 % ]
+\catcode123=1 % {
+\catcode125=2 % }
+\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@hobsub-generic.sty\endcsname
\ProvidesPackage{hobsub-generic}%
- [2011/01/30 v1.0 Bundle oberdiek, subset generic (HO)]%
+ [2011/04/18 v1.3 Bundle oberdiek, subset generic (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode123=1 % {
- \catcode125=2 % }
- \catcode64=11 % @
- \def\x{\endgroup
- \expandafter\edef\csname HOBsub@AtEnd\endcsname{%
- \endlinechar=\the\endlinechar\relax
- \catcode13=\the\catcode13\relax
- \catcode32=\the\catcode32\relax
- \catcode35=\the\catcode35\relax
- \catcode61=\the\catcode61\relax
- \catcode64=\the\catcode64\relax
- \catcode123=\the\catcode123\relax
- \catcode125=\the\catcode125\relax
- }%
- }%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode123=1 % {
+\catcode125=2 % }
+\catcode64=11 % @
+\def\x{\endgroup
+\expandafter\edef\csname HOBsub@AtEnd\endcsname{%
+\endlinechar=\the\endlinechar\relax
+\catcode13=\the\catcode13\relax
+\catcode32=\the\catcode32\relax
+\catcode35=\the\catcode35\relax
+\catcode61=\the\catcode61\relax
+\catcode64=\the\catcode64\relax
+\catcode123=\the\catcode123\relax
+\catcode125=\the\catcode125\relax
+}%
+}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
@@ -156,11 +159,11 @@
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2{%
- \edef\HOBsub@AtEnd{%
- \HOBsub@AtEnd
- \catcode#1=\the\catcode#1\relax
- }%
- \catcode#1=#2\relax
+\edef\HOBsub@AtEnd{%
+\HOBsub@AtEnd
+\catcode#1=\the\catcode#1\relax
+}%
+\catcode#1=#2\relax
}
\TMP@EnsureCode{39}{12}% '
\TMP@EnsureCode{40}{12}% (
@@ -176,177 +179,178 @@
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname ver@hobsub.sty\endcsname\relax
\else
- \expandafter\hobsub@GobbleRemainingPackage
+\expandafter\hobsub@GobbleRemainingPackage
\fi
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname HOBsub@OrgEndinput\endcsname\relax
- \let\HOBsub@OrgEndinput\endinput
+\let\HOBsub@OrgEndinput\endinput
\fi
\def\hobsub@GobbleRemainingPackage{%
- \begingroup
- \catcode92=14 % backslash: comment
- \catcode32=14 % space: comment
- \catcode123=14 % left brace: comment
- \catcode125=14 % right brace: comment
- \catcode60=3 % less: math
- \catcode62=4 % greater: align
- \endlinechar=-1 %
- \HOBsub@GobbleRemainingPackage
+\begingroup
+\catcode92=14 % backslash: comment
+\catcode32=14 % space: comment
+\catcode35=14 % hash: comment
+\catcode123=14 % left brace: comment
+\catcode125=14 % right brace: comment
+\catcode60=3 % less: math
+\catcode62=4 % greater: align
+\endlinechar=-1 %
+\HOBsub@GobbleRemainingPackage
}
\catcode60=3 % less: dollar
\catcode62=4 % greater: align
\long\def\HOBsub@GobbleRemainingPackage#1<hobsub>{%
- \endgroup
+\endgroup
}
\catcode60=12 % less: other
\catcode62=12 % greater: other
\def\hobsub@StartPackage#1{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname ver@#1.sty\endcsname\relax
- \let\HOBsub@OrgCurrName\@currname
- \let\HOBsub@OrgCurrExt\@currext
- \csname @pushfilename\endcsname
- \def\@currname{#1}%
- \def\@currext{sty}%
- \expandafter\def\csname\@currname.\@currext-h@@k\endcsname{}%
- \let\endinput\hobsub@GobbleRemainingPackage
- \def\hobsub@StopPackage{%
- \let\hobsub@StopPackage\relax
- \HOBsub@StopPackage
- }%
- \hobsub@AddToFileList{#1.sty}%
- \else
- \hobsub@Info{hobsub}{Skipping package `#1' (already loaded)}%
- \let\hobsub@StopPackage\relax
- \expandafter\hobsub@GobbleRemainingPackage
- \fi
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname ver@#1.sty\endcsname\relax
+\let\HOBsub@OrgCurrName\@currname
+\let\HOBsub@OrgCurrExt\@currext
+\csname @pushfilename\endcsname
+\def\@currname{#1}%
+\def\@currext{sty}%
+\expandafter\def\csname\@currname.\@currext-h@@k\endcsname{}%
+\let\endinput\hobsub@GobbleRemainingPackage
+\def\hobsub@StopPackage{%
+\let\hobsub@StopPackage\relax
+\HOBsub@StopPackage
+}%
+\hobsub@AddToFileList{#1.sty}%
+\else
+\hobsub@Info{hobsub}{Skipping package `#1' (already loaded)}%
+\let\hobsub@StopPackage\relax
+\expandafter\hobsub@GobbleRemainingPackage
+\fi
}
\let\hobsub@StopPackage\relax
\def\hobsub@Info#1#2{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname @PackageInfoNoLine\endcsname\relax
- \immediate\write-1{Package #1 Info: #2.}%
- \else
- \let\hobsub@Info\@PackageInfoNoLine
- \hobsub@Info{#1}{#2}%
- \fi
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname @PackageInfoNoLine\endcsname\relax
+\immediate\write-1{Package #1 Info: #2.}%
+\else
+\let\hobsub@Info\@PackageInfoNoLine
+\hobsub@Info{#1}{#2}%
+\fi
}
\def\HOBsub@StopPackage{%
- \csname\@currname.\@currext-h@@k\endcsname
- \let\endinput\HOBsub@OrgEndinput
- \csname @popfilename\endcsname
- \let\@currname\HOBsub@OrgCurrName
- \let\@currext\HOBsub@OrgCurrExt
+\csname\@currname.\@currext-h@@k\endcsname
+\let\endinput\HOBsub@OrgEndinput
+\csname @popfilename\endcsname
+\let\@currname\HOBsub@OrgCurrName
+\let\@currext\HOBsub@OrgCurrExt
}
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname @addtofilelist\endcsname\relax
- \def\hobsub@AddToFileList#1{}%
+\def\hobsub@AddToFileList#1{}%
\else
- \def\hobsub@AddToFileList#1{%
- \@addtofilelist{#1}%
- }%
+\def\hobsub@AddToFileList#1{%
+\@addtofilelist{#1}%
+}%
\fi
\hobsub@GobbleRemainingPackage
<hobsub>
\hobsub@StartPackage{hobsub}%
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname ProvidesPackage\endcsname\relax
- \immediate\write-1{%
- Package: hobsub 2011/01/30 v1.0 Subsetting bundle oberdiek (HO)%
- }%
+\immediate\write-1{%
+ Package: hobsub 2011/04/18 v1.3 Subsetting bundle oberdiek (HO)%
+}%
\else
- \ProvidesPackage{hobsub}%
- [2011/01/30 v1.0 Subsetting bundle oberdiek (HO)]%
+\ProvidesPackage{hobsub}%
+ [2011/04/18 v1.3 Subsetting bundle oberdiek (HO)]%
\fi
- \endinput
+\endinput
<hobsub>
\hobsub@StopPackage
\hobsub@StartPackage{infwarerr}
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode123=1 % {
- \catcode125=2 % }
- \expandafter\let\expandafter\x\csname ver@infwarerr.sty\endcsname
- \ifx\x\relax % plain-TeX, first loading
- \else
- \def\empty{}%
- \ifx\x\empty % LaTeX, first loading,
- % variable is initialized, but \ProvidesPackage not yet seen
- \else
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
- \fi
- \x{infwarerr}{The package is already loaded}%
- \aftergroup\endinput
- \fi
- \fi
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\expandafter\let\expandafter\x\csname ver@infwarerr.sty\endcsname
+\ifx\x\relax % plain-TeX, first loading
+\else
+\def\empty{}%
+\ifx\x\empty % LaTeX, first loading,
+% variable is initialized, but \ProvidesPackage not yet seen
+\else
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+\fi
+\x{infwarerr}{The package is already loaded}%
+\aftergroup\endinput
+\fi
+\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode47=12 % /
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode91=12 % [
- \catcode93=12 % ]
- \catcode123=1 % {
- \catcode125=2 % }
- \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
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode47=12 % /
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode91=12 % [
+\catcode93=12 % ]
+\catcode123=1 % {
+\catcode125=2 % }
+\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@infwarerr.sty\endcsname
\ProvidesPackage{infwarerr}%
- [2010/04/08 v1.3 Providing info/warning/message (HO)]%
+ [2010/04/08 v1.3 Providing info/warning/message (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode123=1 % {
- \catcode125=2 % }
- \catcode64=11 % @
- \def\x{\endgroup
- \expandafter\edef\csname InfWarErr@AtEnd\endcsname{%
- \endlinechar=\the\endlinechar\relax
- \catcode13=\the\catcode13\relax
- \catcode32=\the\catcode32\relax
- \catcode35=\the\catcode35\relax
- \catcode61=\the\catcode61\relax
- \catcode64=\the\catcode64\relax
- \catcode123=\the\catcode123\relax
- \catcode125=\the\catcode125\relax
- }%
- }%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode123=1 % {
+\catcode125=2 % }
+\catcode64=11 % @
+\def\x{\endgroup
+\expandafter\edef\csname InfWarErr@AtEnd\endcsname{%
+\endlinechar=\the\endlinechar\relax
+\catcode13=\the\catcode13\relax
+\catcode32=\the\catcode32\relax
+\catcode35=\the\catcode35\relax
+\catcode61=\the\catcode61\relax
+\catcode64=\the\catcode64\relax
+\catcode123=\the\catcode123\relax
+\catcode125=\the\catcode125\relax
+}%
+}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
@@ -355,11 +359,11 @@
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2{%
- \edef\InfWarErr@AtEnd{%
- \InfWarErr@AtEnd
- \catcode#1=\the\catcode#1\relax
- }%
- \catcode#1=#2\relax
+\edef\InfWarErr@AtEnd{%
+\InfWarErr@AtEnd
+\catcode#1=\the\catcode#1\relax
+}%
+\catcode#1=#2\relax
}
\TMP@EnsureCode{10}{12}% ^^J
\TMP@EnsureCode{39}{12}% '
@@ -374,263 +378,263 @@
\TMP@EnsureCode{94}{7}% ^
\edef\InfWarErr@AtEnd{\InfWarErr@AtEnd\noexpand\endinput}
\begingroup
- \let\x=Y%
- \def\check#1{%
- \@check{Generic}{#1}%
- \@check{Package}{#1}%
- \@check{Class}{#1}%
- }%
- \def\@check#1#2{%
- \expandafter\ifx\csname #1#2\endcsname\relax
- \let\x=N%
- \fi
- }%
- \check{Info}%
- \check{Warning}%
- \check{Error}%
- \@check{Package}{WarningNoLine}%
- \@check{Class}{WarningNoLine}%
- \@check{}{@ehc}%
- \@check{}{@ehd}%
+\let\x=Y%
+\def\check#1{%
+\@check{Generic}{#1}%
+\@check{Package}{#1}%
+\@check{Class}{#1}%
+}%
+\def\@check#1#2{%
+\expandafter\ifx\csname #1#2\endcsname\relax
+\let\x=N%
+\fi
+}%
+\check{Info}%
+\check{Warning}%
+\check{Error}%
+\@check{Package}{WarningNoLine}%
+\@check{Class}{WarningNoLine}%
+\@check{}{@ehc}%
+\@check{}{@ehd}%
\expandafter\endgroup
\ifx\x Y%
- \let\@PackageInfo\PackageInfo
- \def\@PackageInfoNoLine#1#2{%
- \PackageInfo{#1}{#2\@gobble}%
- }%
- \let\@ClassInfo\ClassInfo
- \def\@ClassInfoNoLine#1#2{%
- \ClassInfo{#1}{#2\@gobble}%
- }%
- \let\@PackageWarning\PackageWarning
- \let\@PackageWarningNoLine\PackageWarningNoLine
- \let\@ClassWarning\ClassWarning
- \let\@ClassWarningNoLine\ClassWarningNoLine
- \let\@PackageError\PackageError
- \let\@ClassError\ClassError
- \expandafter\InfWarErr@AtEnd
+\let\@PackageInfo\PackageInfo
+\def\@PackageInfoNoLine#1#2{%
+\PackageInfo{#1}{#2\@gobble}%
+}%
+\let\@ClassInfo\ClassInfo
+\def\@ClassInfoNoLine#1#2{%
+\ClassInfo{#1}{#2\@gobble}%
+}%
+\let\@PackageWarning\PackageWarning
+\let\@PackageWarningNoLine\PackageWarningNoLine
+\let\@ClassWarning\ClassWarning
+\let\@ClassWarningNoLine\ClassWarningNoLine
+\let\@PackageError\PackageError
+\let\@ClassError\ClassError
+\expandafter\InfWarErr@AtEnd
\fi%
\begingroup\expandafter\endgroup
\ifcase\expandafter\ifx\csname inputlineno\endcsname\relax
- 0 %
- \else
- \ifnum\inputlineno<0 %
- 0 %
- \else
- 1 %
- \fi
- \fi
- \def\InfWarErr@online{}%
-\else
- \def\InfWarErr@online{ on input line \the\inputlineno}%
+ 0 %
+\else
+\ifnum\inputlineno<0 %
+ 0 %
+\else
+ 1 %
+\fi
+\fi
+\def\InfWarErr@online{}%
+\else
+\def\InfWarErr@online{ on input line \the\inputlineno}%
\fi
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname protected\endcsname\relax
- \def\InfWarErr@protected{}%
+\def\InfWarErr@protected{}%
\else
- \let\InfWarErr@protected\protected
+\let\InfWarErr@protected\protected
\fi
\chardef\InfWarErr@unused=16 %
\def\InfWarErr@ehc{%
- Try typing \space <return> \space to proceed.\MessageBreak
- If that doesn't work, type \space X <return> \space to quit.%
+ Try typing \space <return> \space to proceed.\MessageBreak
+ If that doesn't work, type \space X <return> \space to quit.%
}
\def\InfWarErr@ehd{%
- You're in trouble here. \space\@ehc
+ You're in trouble here. \space\@ehc
}
\InfWarErr@protected\def\InfWarErr@GenericInfo#1#2{%
- \begingroup
- \let\on@line\InfWarErr@online
- \long\def\@gobble##1{}%
- \def\space{ }%
- \def\@spaces{\space\space\space\space}%
- \def\MessageBreak{^^J#1}%
- \newlinechar=10 %
- \escapechar=92 %
- \immediate\write-1{#2\on@line.}%
- \endgroup
+\begingroup
+\let\on@line\InfWarErr@online
+\long\def\@gobble##1{}%
+\def\space{ }%
+\def\@spaces{\space\space\space\space}%
+\def\MessageBreak{^^J#1}%
+\newlinechar=10 %
+\escapechar=92 %
+\immediate\write-1{#2\on@line.}%
+\endgroup
}
\InfWarErr@protected\def\InfWarErr@GenericWarning#1#2{%
- \begingroup
- \let\on@line\InfWarErr@online
- \long\def\@gobble##1{}%
- \def\space{ }%
- \def\@spaces{\space\space\space\space}%
- \def\MessageBreak{^^J#1}%
- \newlinechar=10 %
- \escapechar=92 %
- \immediate\write\InfWarErr@unused{^^J#2\on@line.^^J}%
- \endgroup
+\begingroup
+\let\on@line\InfWarErr@online
+\long\def\@gobble##1{}%
+\def\space{ }%
+\def\@spaces{\space\space\space\space}%
+\def\MessageBreak{^^J#1}%
+\newlinechar=10 %
+\escapechar=92 %
+\immediate\write\InfWarErr@unused{^^J#2\on@line.^^J}%
+\endgroup
}
\InfWarErr@protected\def\InfWarErr@GenericError#1#2#3#4{%
- \begingroup
- \immediate\write\InfWarErr@unused{}%
- \def\space{ }%
- \def\@spaces{\space\space\space\space}%
- \let\@ehc\InfWarErr@ehc
- \let\@ehd\InfWarErr@ehd
- \let\on@line\InfWarErr@online
- \def\MessageBreak{^^J}%
- \newlinechar=10 %
- \escapechar=92 %
- \edef\InfWarErr@help{\noexpand\errhelp{#4}}%
- \InfWarErr@help
- \def\MessageBreak{^^J#1}%
- \errmessage{%
- #2.^^J^^J%
- #3^^J%
- Type \space H <return> \space for immediate help.^^J ...^^J%
- }%
- \endgroup
+\begingroup
+\immediate\write\InfWarErr@unused{}%
+\def\space{ }%
+\def\@spaces{\space\space\space\space}%
+\let\@ehc\InfWarErr@ehc
+\let\@ehd\InfWarErr@ehd
+\let\on@line\InfWarErr@online
+\def\MessageBreak{^^J}%
+\newlinechar=10 %
+\escapechar=92 %
+\edef\InfWarErr@help{\noexpand\errhelp{#4}}%
+\InfWarErr@help
+\def\MessageBreak{^^J#1}%
+\errmessage{%
+#2.^^J^^J%
+#3^^J%
+ Type \space H <return> \space for immediate help.^^J ...^^J%
+}%
+\endgroup
}
\def\@PackageInfo#1#2{%
- \InfWarErr@GenericInfo{%
- (#1) \@spaces\@spaces\@spaces
- }{%
- Package #1 Info: #2%
- }%
+\InfWarErr@GenericInfo{%
+ (#1) \@spaces\@spaces\@spaces
+}{%
+ Package #1 Info: #2%
+}%
}
\def\@PackageInfoNoLine#1#2{%
- \@PackageInfo{#1}{#2\@gobble}%
+\@PackageInfo{#1}{#2\@gobble}%
}
\def\@ClassInfo#1#2{%
- \InfWarErr@GenericInfo{%
- (#1) \space\space\@spaces\@spaces
- }{%
- Class #1 Info: #2%
- }%
+\InfWarErr@GenericInfo{%
+ (#1) \space\space\@spaces\@spaces
+}{%
+ Class #1 Info: #2%
+}%
}
\def\@ClassInfoNoLine#1#2{%
- \@ClassInfo{#1}{#2\@gobble}%
+\@ClassInfo{#1}{#2\@gobble}%
}
\def\@PackageWarning#1#2{%
- \InfWarErr@GenericWarning{%
- (#1)\@spaces\@spaces\@spaces\@spaces
- }{%
- Package #1 Warning: #2%
- }%
+\InfWarErr@GenericWarning{%
+ (#1)\@spaces\@spaces\@spaces\@spaces
+}{%
+ Package #1 Warning: #2%
+}%
}
\def\@PackageWarningNoLine#1#2{%
- \@PackageWarning{#1}{#2\@gobble}%
+\@PackageWarning{#1}{#2\@gobble}%
}
\def\@ClassWarning#1#2{%
- \InfWarErr@GenericWarning{%
- (#1) \space\@spaces\@spaces\@spaces
- }{%
- Class #1 Warning: #2%
- }%
+\InfWarErr@GenericWarning{%
+ (#1) \space\@spaces\@spaces\@spaces
+}{%
+ Class #1 Warning: #2%
+}%
}
\def\@ClassWarningNoLine#1#2{%
- \@ClassWarning{#1}{#2\@gobble}%
+\@ClassWarning{#1}{#2\@gobble}%
}
\def\@PackageError#1#2#3{%
- \InfWarErr@GenericError{%
- (#1)\@spaces\@spaces\@spaces\@spaces
- }{%
- Package #1 Error: #2%
- }{%
- See the #1 package documentation for explanation.%
- }{#3}%
+\InfWarErr@GenericError{%
+ (#1)\@spaces\@spaces\@spaces\@spaces
+}{%
+ Package #1 Error: #2%
+}{%
+ See the #1 package documentation for explanation.%
+}{#3}%
}
\def\@ClassError#1#2#3{%
- \InfWarErr@GenericError{%
- (#1) \space\@spaces\@spaces\@spaces
- }{%
- Class #1 Error: #2%
- }{%
- See the #1 class documentation for explanation.%
- }{#3}%
+\InfWarErr@GenericError{%
+ (#1) \space\@spaces\@spaces\@spaces
+}{%
+ Class #1 Error: #2%
+}{%
+ See the #1 class documentation for explanation.%
+}{#3}%
}
\InfWarErr@AtEnd%
- \endinput
+\endinput
<hobsub>
\hobsub@StopPackage
\hobsub@StartPackage{ltxcmds}
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode123=1 % {
- \catcode125=2 % }
- \expandafter\let\expandafter\x\csname ver@ltxcmds.sty\endcsname
- \ifx\x\relax % plain-TeX, first loading
- \else
- \def\empty{}%
- \ifx\x\empty % LaTeX, first loading,
- % variable is initialized, but \ProvidesPackage not yet seen
- \else
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
- \fi
- \x{ltxcmds}{The package is already loaded}%
- \aftergroup\endinput
- \fi
- \fi
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\expandafter\let\expandafter\x\csname ver@ltxcmds.sty\endcsname
+\ifx\x\relax % plain-TeX, first loading
+\else
+\def\empty{}%
+\ifx\x\empty % LaTeX, first loading,
+% variable is initialized, but \ProvidesPackage not yet seen
+\else
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+\fi
+\x{ltxcmds}{The package is already loaded}%
+\aftergroup\endinput
+\fi
+\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode47=12 % /
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode91=12 % [
- \catcode93=12 % ]
- \catcode123=1 % {
- \catcode125=2 % }
- \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
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode47=12 % /
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode91=12 % [
+\catcode93=12 % ]
+\catcode123=1 % {
+\catcode125=2 % }
+\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@ltxcmds.sty\endcsname
\ProvidesPackage{ltxcmds}%
- [2011/04/14 v1.19 LaTeX kernel commands for general use (HO)]%
+ [2011/04/18 v1.20 LaTeX kernel commands for general use (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode123=1 % {
- \catcode125=2 % }
- \catcode64=11 % @
- \def\x{\endgroup
- \expandafter\edef\csname LTXcmds@AtEnd\endcsname{%
- \endlinechar=\the\endlinechar\relax
- \catcode13=\the\catcode13\relax
- \catcode32=\the\catcode32\relax
- \catcode35=\the\catcode35\relax
- \catcode61=\the\catcode61\relax
- \catcode64=\the\catcode64\relax
- \catcode123=\the\catcode123\relax
- \catcode125=\the\catcode125\relax
- }%
- }%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode123=1 % {
+\catcode125=2 % }
+\catcode64=11 % @
+\def\x{\endgroup
+\expandafter\edef\csname LTXcmds@AtEnd\endcsname{%
+\endlinechar=\the\endlinechar\relax
+\catcode13=\the\catcode13\relax
+\catcode32=\the\catcode32\relax
+\catcode35=\the\catcode35\relax
+\catcode61=\the\catcode61\relax
+\catcode64=\the\catcode64\relax
+\catcode123=\the\catcode123\relax
+\catcode125=\the\catcode125\relax
+}%
+}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
@@ -639,11 +643,11 @@
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2{%
- \edef\LTXcmds@AtEnd{%
- \LTXcmds@AtEnd
- \catcode#1=\the\catcode#1\relax
- }%
- \catcode#1=#2\relax
+\edef\LTXcmds@AtEnd{%
+\LTXcmds@AtEnd
+\catcode#1=\the\catcode#1\relax
+}%
+\catcode#1=#2\relax
}
\TMP@EnsureCode{36}{3}% $
\TMP@EnsureCode{38}{4}% &
@@ -666,7 +670,7 @@
\chardef\ltx@active=13 %
\chardef\ltx@cclv=255 %
\def\ltx@minusone{%
- -\ltx@one
+ -\ltx@one
}
\toksdef\ltx@LocToksA=0 %
\toksdef\ltx@LocToksB=2 %
@@ -703,16 +707,16 @@
\long\def\ltx@gobblethree#1#2#3{}
\long\def\ltx@gobblefour#1#2#3#4{}
\def\ltx@GobbleNum#1{%
- \romannumeral
- \csname ltx@zero%
- \expandafter\LTXcmds@GobbleNum
- \romannumeral\LTXcmds@num{#1}000{m\endcsname}%
+\romannumeral
+\csname ltx@zero%
+\expandafter\LTXcmds@GobbleNum
+\romannumeral\LTXcmds@num{#1}000{m\endcsname}%
}
\def\LTXcmds@GobbleNum#1{%
- \csname LTXcmds@G#1\LTXcmds@GobbleNum
+\csname LTXcmds@G#1\LTXcmds@GobbleNum
}
\long\def\LTXcmds@Gm#1{%
- \endcsname
+\endcsname
}
\long\def\ltx@firstofone#1{#1}
\long\def\ltx@firstoftwo#1#2{#1}
@@ -728,7 +732,6 @@
\long\def\ltx@cdr#1#2\@nil{#2}
\long\def\ltx@carzero#1\@nil{}%
\long\def\ltx@cdrzero#1\@nil{#1}%
-
\long\def\ltx@cartwo#1#2#3\@nil{#1#2}
\long\def\ltx@cdrtwo#1#2#3\@nil{#3}
\long\def\ltx@carthree#1#2#3#4\@nil{#1#2#3}
@@ -736,28 +739,28 @@
\long\def\ltx@carfour#1#2#3#4#5\@nil{#1#2#3#4}
\long\def\ltx@cdrfour#1#2#3#4#5\@nil{#5}
\def\ltx@CarNum#1{%
- \romannumeral
- \csname LTXcmds@CarNumFinish%
- \expandafter\LTXcmds@CarNum
- \romannumeral\LTXcmds@num{#1}000{x\endcsname}%
+\romannumeral
+\csname LTXcmds@CarNumFinish%
+\expandafter\LTXcmds@CarNum
+\romannumeral\LTXcmds@num{#1}000{x\endcsname}%
}
\def\LTXcmds@CarNum#1{%
- \csname LTXcmds@C#1\LTXcmds@CarNum
+\csname LTXcmds@C#1\LTXcmds@CarNum
}
\long\def\LTXcmds@Cm#1#2{%
- \endcsname{#1#2}%
+\endcsname{#1#2}%
}
\def\LTXcmds@Cx#1{%
- \endcsname{}%
+\endcsname{}%
}
\long\def\LTXcmds@CarNumFinish#1#2\@nil{%
- \ltx@zero
- #1%
+\ltx@zero
+#1%
}
\def\ltx@CdrNum#1{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\LTXcmds@CdrNum
- \ltx@GobbleNum{#1}%
+\romannumeral0%
+\expandafter\expandafter\expandafter\LTXcmds@CdrNum
+\ltx@GobbleNum{#1}%
}
\long\def\LTXcmds@CdrNum#1\@nil{ #1}%
\long\def\ltx@ReturnAfterFi#1\fi{\fi#1}
@@ -765,393 +768,394 @@
\def\ltx@empty{}
\def\ltx@space{ }
\begingroup
- \lccode`0=`\%\relax
+\lccode`0=`\%\relax
\lowercase{\endgroup
- \def\ltx@percentchar{0}%
+\def\ltx@percentchar{0}%
}
\begingroup
- \lccode`0=`\\\relax
+\lccode`0=`\\\relax
\lowercase{\endgroup
- \def\ltx@backslashchar{0}%
+\def\ltx@backslashchar{0}%
}
\begingroup
- \lccode`0=`\#\relax
+\lccode`0=`\#\relax
\lowercase{\endgroup
- \def\ltx@hashchar{0}%
+\def\ltx@hashchar{0}%
}
\begingroup
- \lccode`0=`\{\relax
+\lccode`0=`\{\relax
\lowercase{\endgroup
- \def\ltx@leftbracechar{0}%
+\def\ltx@leftbracechar{0}%
}
\begingroup
- \lccode`0=`\}\relax
+\lccode`0=`\}\relax
\lowercase{\endgroup
- \def\ltx@rightbracechar{0}%
+\def\ltx@rightbracechar{0}%
}
\def\ltx@newif#1{%
- \begingroup
- \escapechar=-1 %
- \expandafter\endgroup
- \expandafter\LTXcmds@newif\string#1\@nil
+\begingroup
+\escapechar=-1 %
+\expandafter\endgroup
+\expandafter\LTXcmds@newif\string#1\@nil
}
\begingroup
- \escapechar=-1 %
+\escapechar=-1 %
\expandafter\endgroup
\expandafter\def\expandafter\LTXcmds@newif\string\if#1\@nil{%
- \expandafter\edef\csname#1true\endcsname{%
- \let
- \expandafter\noexpand\csname if#1\endcsname
- \noexpand\iftrue
- }%
- \expandafter\edef\csname#1false\endcsname{%
- \let
- \expandafter\noexpand\csname if#1\endcsname
- \noexpand\iffalse
- }%
- \csname#1false\endcsname
+\expandafter\edef\csname#1true\endcsname{%
+\let
+\expandafter\noexpand\csname if#1\endcsname
+\noexpand\iftrue
+}%
+\expandafter\edef\csname#1false\endcsname{%
+\let
+\expandafter\noexpand\csname if#1\endcsname
+\noexpand\iffalse
+}%
+\csname#1false\endcsname
}
\def\ltx@newglobalif#1{%
- \begingroup
- \escapechar=-1 %
- \expandafter\endgroup
- \expandafter\LTXcmds@newglobalif\string#1\@nil
+\begingroup
+\escapechar=-1 %
+\expandafter\endgroup
+\expandafter\LTXcmds@newglobalif\string#1\@nil
}
\begingroup
- \escapechar=-1 %
+\escapechar=-1 %
\expandafter\endgroup
\expandafter
\def\expandafter\LTXcmds@newglobalif\string\if#1\@nil{%
- \expandafter\edef\csname#1true\endcsname{%
- \global\let
- \expandafter\noexpand\csname if#1\endcsname
- \noexpand\iftrue
- }%
- \expandafter\edef\csname#1false\endcsname{%
- \global\let
- \expandafter\noexpand\csname if#1\endcsname
- \noexpand\iffalse
- }%
- \csname#1false\endcsname
+\expandafter\edef\csname#1true\endcsname{%
+\global\let
+\expandafter\noexpand\csname if#1\endcsname
+\noexpand\iftrue
+}%
+\expandafter\edef\csname#1false\endcsname{%
+\global\let
+\expandafter\noexpand\csname if#1\endcsname
+\noexpand\iffalse
+}%
+\csname#1false\endcsname
}
\def\ltx@LocalExpandAfter{%
- \begingroup
- \expandafter\expandafter\expandafter
- \endgroup
- \expandafter
+\begingroup
+\expandafter\expandafter\expandafter
+\endgroup
+\expandafter
}
\ltx@LocalExpandAfter
\ifx\csname ifcsname\endcsname\relax
- \def\ltx@ifundefined#1{%
- \expandafter\ifx\csname #1\endcsname\relax
- \expandafter\ltx@firstoftwo
- \else
- \expandafter\ltx@secondoftwo
- \fi
- }%
- \def\ltx@IfUndefined#1{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname #1\endcsname\relax
- \expandafter\ltx@firstoftwo
- \else
- \expandafter\ltx@secondoftwo
- \fi
- }%
- \expandafter\ltx@gobble
-\else
- \expandafter\ltx@firstofone
+\def\ltx@ifundefined#1{%
+\expandafter\ifx\csname #1\endcsname\relax
+\expandafter\ltx@firstoftwo
+\else
+\expandafter\ltx@secondoftwo
+\fi
+}%
+\def\ltx@IfUndefined#1{%
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname #1\endcsname\relax
+\expandafter\ltx@firstoftwo
+\else
+\expandafter\ltx@secondoftwo
+\fi
+}%
+\expandafter\ltx@gobble
+\else
+\expandafter\ltx@firstofone
\fi
{%
- \def\ltx@ifundefined#1{%
- \ifcsname #1\endcsname
- \expandafter\ifx\csname #1\endcsname\relax
- \expandafter\expandafter\expandafter\ltx@firstoftwo
- \else
- \expandafter\expandafter\expandafter\ltx@secondoftwo
- \fi
- \else
- \expandafter\ltx@firstoftwo
- \fi
- }%
- \let\ltx@IfUndefined\ltx@ifundefined
+\def\ltx@ifundefined#1{%
+\ifcsname #1\endcsname
+\expandafter\ifx\csname #1\endcsname\relax
+\expandafter\expandafter\expandafter\ltx@firstoftwo
+\else
+\expandafter\expandafter\expandafter\ltx@secondoftwo
+\fi
+\else
+\expandafter\ltx@firstoftwo
+\fi
+}%
+\let\ltx@IfUndefined\ltx@ifundefined
}
\def\ltx@RemovePrefix#1>{}
\def\ltx@StripPrefix{%
- \expandafter\ltx@RemovePrefix
+\expandafter\ltx@RemovePrefix
}
\def\ltx@onelevel@sanitize#1{%
- \edef#1{%
- \expandafter
- \ltx@RemovePrefix\meaning#1%
- }%
+\edef#1{%
+\expandafter
+\ltx@RemovePrefix\meaning#1%
+}%
}
\def\ltx@clsextension{cls}
\def\ltx@pkgextension{sty}
\def\ltx@iffileloaded#1{%
- \ltx@ifundefined{ver@#1}\ltx@secondoftwo\ltx@firstoftwo
+\ltx@ifundefined{ver@#1}\ltx@secondoftwo\ltx@firstoftwo
}
\def\ltx@ifclassloaded#1{%
- \ltx@iffileloaded{#1.\ltx@clsextension}%
+\ltx@iffileloaded{#1.\ltx@clsextension}%
}
\def\ltx@ifpackageloaded#1{%
- \ltx@iffileloaded{#1.\ltx@pkgextension}%
+\ltx@iffileloaded{#1.\ltx@pkgextension}%
}
\def\ltx@iffilelater#1#2{%
- \ltx@iffileloaded{#1}{%
- \expandafter\LTXcmds@IfLater\expandafter{%
- \number
- \expandafter\expandafter\expandafter\LTXcmds@ParseVersion
- \expandafter\expandafter\expandafter{%
- \csname ver@#1\endcsname
- }%
- \expandafter}\expandafter{%
- \number
- \expandafter\LTXcmds@ParseVersion\expandafter{#2}%
- }%
- }\ltx@secondoftwo
+\ltx@iffileloaded{#1}{%
+\expandafter\LTXcmds@IfLater\expandafter{%
+\number
+\expandafter\expandafter\expandafter\LTXcmds@ParseVersion
+\expandafter\expandafter\expandafter{%
+\csname ver@#1\endcsname
+}%
+\expandafter}\expandafter{%
+\number
+\expandafter\LTXcmds@ParseVersion\expandafter{#2}%
+}%
+}\ltx@secondoftwo
}
\def\LTXcmds@IfLater#1#2{%
- \ifcase 0%
- \ifnum#1<19940101 %
- \else
- \ifnum#2<19940101 %
- \else
- \ifnum#2>#1 %
- \else
- 1%
- \fi
- \fi
- \fi
- \ltx@space
- \expandafter\ltx@secondoftwo
- \else
- \expandafter\ltx@firstoftwo
- \fi
+\ifcase 0%
+\ifnum#1<19940101 %
+\else
+\ifnum#2<19940101 %
+\else
+\ifnum#2>#1 %
+\else
+ 1%
+\fi
+\fi
+\fi
+\ltx@space
+\expandafter\ltx@secondoftwo
+\else
+\expandafter\ltx@firstoftwo
+\fi
}
\def\ltx@ifclasslater#1{%
- \ltx@iffilelater{#1.\ltx@clsextension}%
+\ltx@iffilelater{#1.\ltx@clsextension}%
}
\def\ltx@ifpackagelater#1{%
- \ltx@iffilelater{#1.\ltx@pkgextension}%
+\ltx@iffilelater{#1.\ltx@pkgextension}%
}
\ltx@IfUndefined{pdfmatch}{%
- \def\LTXcmds@ParseVersion#1{%
- \LTXcmds@@ParseVersion#10000/00/00\@nil
- }%
- \def\LTXcmds@@ParseVersion#1#2#3#4/#5#6/#7#8#9\@nil{%
- #1#2#3#4#5#6#7#8%
- }%
+\def\LTXcmds@ParseVersion#1{%
+\LTXcmds@@ParseVersion#10000/00/00\@nil
+}%
+\def\LTXcmds@@ParseVersion#1#2#3#4/#5#6/#7#8#9\@nil{%
+#1#2#3#4#5#6#7#8%
+}%
}{%
- \def\LTXcmds@ParseVersion#1{%
- \ifnum\pdfmatch{%
- ^%
- (199[4-9]|[2-9][0-9][0-9][0-9])/%
- (0[1-9]|1[0-2])/%
- (0[1-9]|[1-2][0-9]|3[0-1])%
- }{#1}=1 %
- \ltx@StripPrefix\pdflastmatch1 %
- \ltx@StripPrefix\pdflastmatch2 %
- \ltx@StripPrefix\pdflastmatch3 %
- \else
- 0%
- \fi
- }%
+\def\LTXcmds@ParseVersion#1{%
+\ifnum\pdfmatch{%
+ ^%
+ (199[4-9]|[2-9][0-9][0-9][0-9])/%
+ (0[1-9]|1[0-2])/%
+ (0[1-9]|[1-2][0-9]|3[0-1])%
+}{#1}=1 %
+\ltx@StripPrefix\pdflastmatch1 %
+\ltx@StripPrefix\pdflastmatch2 %
+\ltx@StripPrefix\pdflastmatch3 %
+\else
+ 0%
+\fi
+}%
}
\long\def\ltx@GlobalAppendToMacro#1#2{%
- \ifx\ltx@undefined#1%
- \let#1\ltx@empty
- \else
- \ifx\relax#1%
- \let#1\ltx@empty
- \fi
- \fi
- \begingroup
- \ltx@LocToksA\expandafter{#1#2}%
- \xdef#1{\the\ltx@LocToksA}%
- \endgroup
+\ifx\ltx@undefined#1%
+\let#1\ltx@empty
+\else
+\ifx\relax#1%
+\let#1\ltx@empty
+\fi
+\fi
+\begingroup
+\ltx@LocToksA\expandafter{#1#2}%
+\xdef#1{\the\ltx@LocToksA}%
+\endgroup
}
\long\def\ltx@LocalAppendToMacro#1#2{%
- \global\let\LTXcmds@gtemp#1%
- \ifx\ltx@undefined\LTXcmds@gtemp
- \global\let\LTXcmds@gtemp\ltx@empty
- \else
- \ifx\relax\LTXcmds@gtemp
- \global\letLTXcmds@gtemp\ltx@empty
- \fi
- \fi
- \begingroup
- \ltx@LocToksA\expandafter{\LTXcmds@gtemp#2}%
- \xdef\LTXcmds@gtemp{\the\ltx@LocToksA}%
- \endgroup
- \let#1\LTXcmds@gtemp
+\global\let\LTXcmds@gtemp#1%
+\ifx\ltx@undefined\LTXcmds@gtemp
+\global\let\LTXcmds@gtemp\ltx@empty
+\else
+\ifx\relax\LTXcmds@gtemp
+\global\letLTXcmds@gtemp\ltx@empty
+\fi
+\fi
+\begingroup
+\ltx@LocToksA\expandafter{\LTXcmds@gtemp#2}%
+\xdef\LTXcmds@gtemp{\the\ltx@LocToksA}%
+\endgroup
+\let#1\LTXcmds@gtemp
}
\long\def\ltx@ifnextchar#1#2#3{%
- \begingroup
- \let\LTXcmds@CharToken= #1\relax
- \ltx@LocToksA{\endgroup#2}%
- \ltx@LocToksB{\endgroup#3}%
- \futurelet\LTXcmds@LetToken\LTXcmds@ifnextchar
+\begingroup
+\let\LTXcmds@CharToken= #1\relax
+\ltx@LocToksA{\endgroup#2}%
+\ltx@LocToksB{\endgroup#3}%
+\futurelet\LTXcmds@LetToken\LTXcmds@ifnextchar
}
\def\LTXcmds@ifnextchar{%
- \ifx\LTXcmds@LetToken\LTXcmds@CharToken
- \the\expandafter\ltx@LocToksA
- \else
- \ifx\LTXcmds@LetToken\LTXcmds@SpaceToken
- \expandafter\expandafter\expandafter\LTXcmds@@ifnextchar
- \else
- \the\expandafter\expandafter\expandafter\ltx@LocToksB
- \fi
- \fi
+\ifx\LTXcmds@LetToken\LTXcmds@CharToken
+\the\expandafter\ltx@LocToksA
+\else
+\expandafter
+\ifx\csname LTXcmds@LetToken\endcsname\LTXcmds@SpaceToken
+\expandafter\expandafter\expandafter\LTXcmds@@ifnextchar
+\else
+\the\expandafter\expandafter\expandafter\ltx@LocToksB
+\fi
+\fi
}
\def\LTXcmds@@ifnextchar{%
- \expandafter\futurelet
- \expandafter\LTXcmds@LetToken
- \expandafter\LTXcmds@ifnextchar
- \romannumeral-`\.%
+\expandafter\futurelet
+\expandafter\LTXcmds@LetToken
+\expandafter\LTXcmds@ifnextchar
+\romannumeral-`\.%
}
\ltx@firstofone{\let\LTXcmds@SpaceToken= } %
\long\def\ltx@ifnextchar@nospace#1#2#3{%
- \begingroup
- \let\LTXcmds@CharToken= #1\relax
- \ltx@LocToksA{\endgroup#2}%
- \ltx@LocToksB{\endgroup#3}%
- \futurelet\LTXcmds@LetToken\LTXcmds@ifnextchar@nospace
+\begingroup
+\let\LTXcmds@CharToken= #1\relax
+\ltx@LocToksA{\endgroup#2}%
+\ltx@LocToksB{\endgroup#3}%
+\futurelet\LTXcmds@LetToken\LTXcmds@ifnextchar@nospace
}
\def\LTXcmds@ifnextchar@nospace{%
- \the
- \ifx\LTXcmds@LetToken\LTXcmds@CharToken
- \expandafter\ltx@LocToksA
- \else
- \expandafter\ltx@LocToksB
- \fi
+\the
+\ifx\LTXcmds@LetToken\LTXcmds@CharToken
+\expandafter\ltx@LocToksA
+\else
+\expandafter\ltx@LocToksB
+\fi
}
\ltx@IfUndefined{quitvmode}{%
- \ltx@IfUndefined{leavevmode}{%
- \ltx@IfUndefined{voidb@x}{%
- \ltx@IfUndefined{newbox}{%
- \def\ltx@leavevmode{%
- \begingroup
- \setbox\ltx@zero=\hbox{}%
- \begingroup
- \setbox\ltx@zero=\hbox{\box\ltx@zero}%
- \endgroup
- \unhbox\ltx@zero
- \endgroup
- }%
- }{%
- \csname newbox\endcsname\LTXcmds@VoidBox
- \ifvoid\LTXcmds@VoidBox
- \else
- \setbox\LTXcmds@VoidBox=\hbox{}%
- \begingroup
- \setbox\LTXcmds@VoidBox=\hbox{\box\LTXcmds@VoidBox}%
- \endgroup
- \fi
- \def\ltx@leavevmode{\unhbox\LTXcmds@VoidBox}%
- }%
- }{%
- \def\ltx@leavevmode{\unhbox\voidb@x}%
- }%
- }{%
- \let\ltx@leavevmode\leavevmode
- }%
+\ltx@IfUndefined{leavevmode}{%
+\ltx@IfUndefined{voidb@x}{%
+\ltx@IfUndefined{newbox}{%
+\def\ltx@leavevmode{%
+\begingroup
+\setbox\ltx@zero=\hbox{}%
+\begingroup
+\setbox\ltx@zero=\hbox{\box\ltx@zero}%
+\endgroup
+\unhbox\ltx@zero
+\endgroup
+}%
+}{%
+\csname newbox\endcsname\LTXcmds@VoidBox
+\ifvoid\LTXcmds@VoidBox
+\else
+\setbox\LTXcmds@VoidBox=\hbox{}%
+\begingroup
+\setbox\LTXcmds@VoidBox=\hbox{\box\LTXcmds@VoidBox}%
+\endgroup
+\fi
+\def\ltx@leavevmode{\unhbox\LTXcmds@VoidBox}%
+}%
}{%
- \let\ltx@leavevmode\quitvmode
+\def\ltx@leavevmode{\unhbox\voidb@x}%
+}%
+}{%
+\let\ltx@leavevmode\leavevmode
+}%
+}{%
+\let\ltx@leavevmode\quitvmode
}
\def\ltx@mbox{%
- \ltx@leavevmode
- \hbox
+\ltx@leavevmode
+\hbox
}
\ltx@IfUndefined{numexpr}{%
- \def\LTXcmds@num#1{%
- \expandafter\ltx@firstofone\expandafter{%
- \number#1%
- }%
- }%
+\def\LTXcmds@num#1{%
+\expandafter\ltx@firstofone\expandafter{%
+\number#1%
+}%
+}%
}{%
- \def\LTXcmds@num#1{%
- \expandafter\ltx@firstofone\expandafter{%
- \the\numexpr#1%
- }%
- }%
+\def\LTXcmds@num#1{%
+\expandafter\ltx@firstofone\expandafter{%
+\the\numexpr#1%
+}%
+}%
}
\ltx@IfUndefined{detokenize}{%
- \def\LTXcmds@temp#1{%
- \long\def\ltx@ifempty##1{%
- \romannumeral0%
- \iffalse{\fi
- \expandafter\ltx@gobble\expandafter{%
- \expandafter{\string##1}%
- \expandafter\ltx@gobble\string
- }%
- \expandafter\ltx@firstofthree\expandafter
- {\iffalse}\fi
- \expandafter#1\ltx@secondoftwo
- }%
- \expandafter#1\ltx@firstoftwo
- }%
- \long\def\ltx@ifblank##1{%
- \romannumeral0%
- \iffalse{\fi
- \expandafter\expandafter\expandafter\ltx@gobble
- \expandafter\expandafter\expandafter{%
- \expandafter\expandafter\expandafter{%
- \expandafter\string\ltx@gobble##1.%
- }%
- \expandafter\ltx@gobble\string
- }%
- \expandafter\ltx@firstofthree\expandafter
- {\iffalse}\fi
- \expandafter#1\ltx@secondoftwo
- }%
- \expandafter#1\ltx@firstoftwo
- }%
- }%
- \LTXcmds@temp{ }%
+\def\LTXcmds@temp#1{%
+\long\def\ltx@ifempty##1{%
+\romannumeral0%
+\iffalse{\fi
+\expandafter\ltx@gobble\expandafter{%
+\expandafter{\string##1}%
+\expandafter\ltx@gobble\string
+}%
+\expandafter\ltx@firstofthree\expandafter
+{\iffalse}\fi
+\expandafter#1\ltx@secondoftwo
+}%
+\expandafter#1\ltx@firstoftwo
+}%
+\long\def\ltx@ifblank##1{%
+\romannumeral0%
+\iffalse{\fi
+\expandafter\expandafter\expandafter\ltx@gobble
+\expandafter\expandafter\expandafter{%
+\expandafter\expandafter\expandafter{%
+\expandafter\string\ltx@gobble##1.%
+}%
+\expandafter\ltx@gobble\string
+}%
+\expandafter\ltx@firstofthree\expandafter
+{\iffalse}\fi
+\expandafter#1\ltx@secondoftwo
+}%
+\expandafter#1\ltx@firstoftwo
+}%
+}%
+\LTXcmds@temp{ }%
}{%
- \long\def\ltx@ifempty#1{%
- \romannumeral%
- \csname
- LTXcmds@ifempty%
- \ifcat$\detokenize{#1}$%
- @%
- \fi
- \endcsname
- }%
- \long\def\LTXcmds@ifempty@#1#2{0 #1}%
- \long\def\LTXcmds@ifempty#1#2{0 #2}%
- \long\def\ltx@ifblank#1{%
- \romannumeral%
- \csname
- LTXcmds@ifempty%
- \ifcat$\detokenize\expandafter{\ltx@gobble#1.}$%
- @%
- \fi
- \endcsname
- }%
+\long\def\ltx@ifempty#1{%
+\romannumeral%
+\csname
+ LTXcmds@ifempty%
+\ifcat$\detokenize{#1}$%
+ @%
+\fi
+\endcsname
+}%
+\long\def\LTXcmds@ifempty@#1#2{0 #1}%
+\long\def\LTXcmds@ifempty#1#2{0 #2}%
+\long\def\ltx@ifblank#1{%
+\romannumeral%
+\csname
+ LTXcmds@ifempty%
+\ifcat$\detokenize\expandafter{\ltx@gobble#1.}$%
+ @%
+\fi
+\endcsname
+}%
}
\long\def\ltx@zapspace#1{%
- \romannumeral
- \LTXcmds@zapspace\ltx@zero#1 \@nil
+\romannumeral
+\LTXcmds@zapspace\ltx@zero#1 \@nil
}
\long\def\LTXcmds@zapspace#1 #2\@nil{%
- \ltx@ifempty{#2}{%
- #1%
- }{%
- \LTXcmds@zapspace#1#2\@nil
- }%
+\ltx@ifempty{#2}{%
+#1%
+}{%
+\LTXcmds@zapspace#1#2\@nil
+}%
}
\ltx@IfUndefined{lastnodetype}{%
- \catcode`\$=9 %
- \catcode`\&=14 %
+\catcode`\$=9 %
+\catcode`\&=14 %
}{%
- \catcode`\$=14 %
- \catcode`\&=9 %
+\catcode`\$=14 %
+\catcode`\&=9 %
}
\def\ltx@IfBoxEmpty#1{%
- \ifvoid#1\relax
- \expandafter\ltx@secondoftwo
- \else
+\ifvoid#1\relax
+\expandafter\ltx@secondoftwo
+\else
& \begingroup
& \setbox\ltx@zero=\ifhbox#1\hbox\else\vbox\fi{%
& \ifhmode\unhcopy\else\unvcopy\fi#1\relax
@@ -1186,104 +1190,104 @@ $ \else
$ \def\next{\endgroup\expandafter\ltx@secondoftwo}%
$ \fi
$ \next
- \fi
+\fi
}
\def\ltx@IfBoxVoidOrEmpty#1{%
- \ifvoid#1\relax
- \expandafter\ltx@thirdoffour
- \fi
- \ltx@IfBoxEmpty{#1}%
+\ifvoid#1\relax
+\expandafter\ltx@thirdoffour
+\fi
+\ltx@IfBoxEmpty{#1}%
}
\LTXcmds@AtEnd%
- \endinput
+\endinput
<hobsub>
\hobsub@StopPackage
\hobsub@StartPackage{ifluatex}
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode123=1 % {
- \catcode125=2 % }
- \expandafter\let\expandafter\x\csname ver@ifluatex.sty\endcsname
- \ifx\x\relax % plain-TeX, first loading
- \else
- \def\empty{}%
- \ifx\x\empty % LaTeX, first loading,
- % variable is initialized, but \ProvidesPackage not yet seen
- \else
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
- \fi
- \x{ifluatex}{The package is already loaded}%
- \aftergroup\endinput
- \fi
- \fi
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\expandafter\let\expandafter\x\csname ver@ifluatex.sty\endcsname
+\ifx\x\relax % plain-TeX, first loading
+\else
+\def\empty{}%
+\ifx\x\empty % LaTeX, first loading,
+% variable is initialized, but \ProvidesPackage not yet seen
+\else
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+\fi
+\x{ifluatex}{The package is already loaded}%
+\aftergroup\endinput
+\fi
+\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode47=12 % /
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode91=12 % [
- \catcode93=12 % ]
- \catcode123=1 % {
- \catcode125=2 % }
- \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
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode47=12 % /
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode91=12 % [
+\catcode93=12 % ]
+\catcode123=1 % {
+\catcode125=2 % }
+\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@ifluatex.sty\endcsname
\ProvidesPackage{ifluatex}%
- [2010/03/01 v1.3 Provides the ifluatex switch (HO)]%
+ [2010/03/01 v1.3 Provides the ifluatex switch (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode123=1 % {
- \catcode125=2 % }
- \catcode64=11 % @
- \def\x{\endgroup
- \expandafter\edef\csname ifluatex@AtEnd\endcsname{%
- \endlinechar=\the\endlinechar\relax
- \catcode13=\the\catcode13\relax
- \catcode32=\the\catcode32\relax
- \catcode35=\the\catcode35\relax
- \catcode61=\the\catcode61\relax
- \catcode64=\the\catcode64\relax
- \catcode123=\the\catcode123\relax
- \catcode125=\the\catcode125\relax
- }%
- }%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode123=1 % {
+\catcode125=2 % }
+\catcode64=11 % @
+\def\x{\endgroup
+\expandafter\edef\csname ifluatex@AtEnd\endcsname{%
+\endlinechar=\the\endlinechar\relax
+\catcode13=\the\catcode13\relax
+\catcode32=\the\catcode32\relax
+\catcode35=\the\catcode35\relax
+\catcode61=\the\catcode61\relax
+\catcode64=\the\catcode64\relax
+\catcode123=\the\catcode123\relax
+\catcode125=\the\catcode125\relax
+}%
+}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
@@ -1292,11 +1296,11 @@ $ \next
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2{%
- \edef\ifluatex@AtEnd{%
- \ifluatex@AtEnd
- \catcode#1=\the\catcode#1\relax
- }%
- \catcode#1=#2\relax
+\edef\ifluatex@AtEnd{%
+\ifluatex@AtEnd
+\catcode#1=\the\catcode#1\relax
+}%
+\catcode#1=#2\relax
}
\TMP@EnsureCode{10}{12}% ^^J
\TMP@EnsureCode{39}{12}% '
@@ -1313,205 +1317,205 @@ $ \next
\edef\ifluatex@AtEnd{\ifluatex@AtEnd\noexpand\endinput}
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname PackageError\endcsname\relax
- \def\ifluatex@Error#1#2{%
- \begingroup
- \newlinechar=10 %
- \def\MessageBreak{^^J}%
- \edef\x{\errhelp{#2}}%
- \x
- \errmessage{Package ifluatex Error: #1}%
- \endgroup
- }%
-\else
- \def\ifluatex@Error{%
- \PackageError{ifluatex}%
- }%
+\def\ifluatex@Error#1#2{%
+\begingroup
+\newlinechar=10 %
+\def\MessageBreak{^^J}%
+\edef\x{\errhelp{#2}}%
+\x
+\errmessage{Package ifluatex Error: #1}%
+\endgroup
+}%
+\else
+\def\ifluatex@Error{%
+\PackageError{ifluatex}%
+}%
\fi
\begingroup
- \expandafter\ifx\csname ifluatex\endcsname\relax
- \else
- \edef\i/{\expandafter\string\csname ifluatex\endcsname}%
- \ifluatex@Error{Name clash, \i/ is already defined}{%
- Incompatible versions of \i/ can cause problems,\MessageBreak
- therefore package loading is aborted.%
- }%
- \endgroup
- \expandafter\ifluatex@AtEnd
- \fi%
+\expandafter\ifx\csname ifluatex\endcsname\relax
+\else
+\edef\i/{\expandafter\string\csname ifluatex\endcsname}%
+\ifluatex@Error{Name clash, \i/ is already defined}{%
+ Incompatible versions of \i/ can cause problems,\MessageBreak
+ therefore package loading is aborted.%
+}%
+\endgroup
+\expandafter\ifluatex@AtEnd
+\fi%
\endgroup
\let\ifluatex\iffalse
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname luatexversion\endcsname\relax
\else
- \expandafter\let\csname ifluatex\expandafter\endcsname
- \csname iftrue\endcsname
+\expandafter\let\csname ifluatex\expandafter\endcsname
+\csname iftrue\endcsname
\fi
\ifluatex
\else
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname directlua\endcsname\relax
- \else
- \expandafter\let\csname ifluatex\expandafter\endcsname
- \csname iftrue\endcsname
- \begingroup
- \newlinechar=10 %
- \endlinechar=\newlinechar%
- \ifnum0%
- \directlua{%
- if tex.enableprimitives then
- tex.enableprimitives('ifluatex', {'luatexversion'})
- tex.print('1')
- end
- }%
- \ifx\ifluatexluatexversion\@undefined\else 1\fi %
- =11 %
- \global\let\luatexversion\ifluatexluatexversion%
- \else%
- \ifluatex@Error{%
- Missing \string\luatexversion%
- }{%
- Update LuaTeX.%
- }%
- \fi%
- \endgroup%
- \fi
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname directlua\endcsname\relax
+\else
+\expandafter\let\csname ifluatex\expandafter\endcsname
+\csname iftrue\endcsname
+\begingroup
+\newlinechar=10 %
+\endlinechar=\newlinechar%
+\ifnum0%
+\directlua{%
+ if tex.enableprimitives then
+ tex.enableprimitives('ifluatex', {'luatexversion'})
+ tex.print('1')
+ end
+}%
+\ifx\ifluatexluatexversion\@undefined\else 1\fi %
+ =11 %
+\global\let\luatexversion\ifluatexluatexversion%
+\else%
+\ifluatex@Error{%
+ Missing \string\luatexversion%
+}{%
+ Update LuaTeX.%
+}%
+\fi%
+\endgroup%
+\fi
\fi
\ifluatex
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname luatexrevision\endcsname\relax
- \ifnum\luatexversion<36 %
- \else
- \begingroup
- \ifx\luatexrevision\relax
- \let\luatexrevision\@undefined
- \fi
- \newlinechar=10 %
- \endlinechar=\newlinechar%
- \ifcase0%
- \directlua{%
- if tex.enableprimitives then
- tex.enableprimitives('ifluatex', {'luatexrevision'})
- else
- tex.print('1')
- end
- }%
- \ifx\ifluatexluatexrevision\@undefined 1\fi%
- \relax%
- \global\let\luatexrevision\ifluatexluatexrevision%
- \fi%
- \endgroup%
- \fi
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname luatexrevision\endcsname\relax
- \ifluatex@Error{%
- Missing \string\luatexrevision%
- }{%
- Update LuaTeX.%
- }%
- \fi
- \fi
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname luatexrevision\endcsname\relax
+\ifnum\luatexversion<36 %
+\else
+\begingroup
+\ifx\luatexrevision\relax
+\let\luatexrevision\@undefined
+\fi
+\newlinechar=10 %
+\endlinechar=\newlinechar%
+\ifcase0%
+\directlua{%
+ if tex.enableprimitives then
+ tex.enableprimitives('ifluatex', {'luatexrevision'})
+ else
+ tex.print('1')
+ end
+}%
+\ifx\ifluatexluatexrevision\@undefined 1\fi%
+\relax%
+\global\let\luatexrevision\ifluatexluatexrevision%
+\fi%
+\endgroup%
+\fi
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname luatexrevision\endcsname\relax
+\ifluatex@Error{%
+ Missing \string\luatexrevision%
+}{%
+ Update LuaTeX.%
+}%
+\fi
+\fi
\fi
\begingroup
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \let\x\PackageInfo
- \expandafter\let\csname on@line\endcsname\empty
- \fi
- \x{ifluatex}{LuaTeX \ifluatex\else not \fi detected}%
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\let\x\PackageInfo
+\expandafter\let\csname on@line\endcsname\empty
+\fi
+\x{ifluatex}{LuaTeX \ifluatex\else not \fi detected}%
\endgroup
\ifluatex@AtEnd%
- \endinput
+\endinput
<hobsub>
\hobsub@StopPackage
\hobsub@StartPackage{ifvtex}
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode123=1 % {
- \catcode125=2 % }
- \expandafter\let\expandafter\x\csname ver@ifvtex.sty\endcsname
- \ifx\x\relax % plain-TeX, first loading
- \else
- \def\empty{}%
- \ifx\x\empty % LaTeX, first loading,
- % variable is initialized, but \ProvidesPackage not yet seen
- \else
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
- \fi
- \x{ifvtex}{The package is already loaded}%
- \aftergroup\endinput
- \fi
- \fi
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\expandafter\let\expandafter\x\csname ver@ifvtex.sty\endcsname
+\ifx\x\relax % plain-TeX, first loading
+\else
+\def\empty{}%
+\ifx\x\empty % LaTeX, first loading,
+% variable is initialized, but \ProvidesPackage not yet seen
+\else
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+\fi
+\x{ifvtex}{The package is already loaded}%
+\aftergroup\endinput
+\fi
+\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode47=12 % /
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode91=12 % [
- \catcode93=12 % ]
- \catcode123=1 % {
- \catcode125=2 % }
- \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
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode47=12 % /
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode91=12 % [
+\catcode93=12 % ]
+\catcode123=1 % {
+\catcode125=2 % }
+\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@ifvtex.sty\endcsname
\ProvidesPackage{ifvtex}%
- [2010/03/01 v1.5 Switches for detecting VTeX and its modes (HO)]%
+ [2010/03/01 v1.5 Switches for detecting VTeX and its modes (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode123=1 % {
- \catcode125=2 % }
- \catcode64=11 % @
- \def\x{\endgroup
- \expandafter\edef\csname ifvtex@AtEnd\endcsname{%
- \endlinechar=\the\endlinechar\relax
- \catcode13=\the\catcode13\relax
- \catcode32=\the\catcode32\relax
- \catcode35=\the\catcode35\relax
- \catcode61=\the\catcode61\relax
- \catcode64=\the\catcode64\relax
- \catcode123=\the\catcode123\relax
- \catcode125=\the\catcode125\relax
- }%
- }%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode123=1 % {
+\catcode125=2 % }
+\catcode64=11 % @
+\def\x{\endgroup
+\expandafter\edef\csname ifvtex@AtEnd\endcsname{%
+\endlinechar=\the\endlinechar\relax
+\catcode13=\the\catcode13\relax
+\catcode32=\the\catcode32\relax
+\catcode35=\the\catcode35\relax
+\catcode61=\the\catcode61\relax
+\catcode64=\the\catcode64\relax
+\catcode123=\the\catcode123\relax
+\catcode125=\the\catcode125\relax
+}%
+}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
@@ -1520,11 +1524,11 @@ $ \next
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2{%
- \edef\ifvtex@AtEnd{%
- \ifvtex@AtEnd
- \catcode#1=\the\catcode#1\relax
- }%
- \catcode#1=#2\relax
+\edef\ifvtex@AtEnd{%
+\ifvtex@AtEnd
+\catcode#1=\the\catcode#1\relax
+}%
+\catcode#1=#2\relax
}
\TMP@EnsureCode{10}{12}% ^^J
\TMP@EnsureCode{39}{12}% '
@@ -1539,64 +1543,64 @@ $ \next
\TMP@EnsureCode{96}{12}% `
\edef\ifvtex@AtEnd{\ifvtex@AtEnd\noexpand\endinput}
\begingroup
- \expandafter\ifx\csname ifvtex\endcsname\relax
- \else
- \edef\i/{\expandafter\string\csname ifvtex\endcsname}%
- \expandafter\ifx\csname PackageError\endcsname\relax
- \def\x#1#2{%
- \edef\z{#2}%
- \expandafter\errhelp\expandafter{\z}%
- \errmessage{Package ifvtex Error: #1}%
- }%
- \def\y{^^J}%
- \newlinechar=10 %
- \else
- \def\x#1#2{%
- \PackageError{ifvtex}{#1}{#2}%
- }%
- \def\y{\MessageBreak}%
- \fi
- \x{Name clash, \i/ is already defined}{%
- Incompatible versions of \i/ can cause problems,\y
- therefore package loading is aborted.%
- }%
- \endgroup
- \expandafter\ifvtex@AtEnd
- \fi%
+\expandafter\ifx\csname ifvtex\endcsname\relax
+\else
+\edef\i/{\expandafter\string\csname ifvtex\endcsname}%
+\expandafter\ifx\csname PackageError\endcsname\relax
+\def\x#1#2{%
+\edef\z{#2}%
+\expandafter\errhelp\expandafter{\z}%
+\errmessage{Package ifvtex Error: #1}%
+}%
+\def\y{^^J}%
+\newlinechar=10 %
+\else
+\def\x#1#2{%
+\PackageError{ifvtex}{#1}{#2}%
+}%
+\def\y{\MessageBreak}%
+\fi
+\x{Name clash, \i/ is already defined}{%
+ Incompatible versions of \i/ can cause problems,\y
+ therefore package loading is aborted.%
+}%
+\endgroup
+\expandafter\ifvtex@AtEnd
+\fi%
\endgroup
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname newif\endcsname\relax
- \def\ifvtex@newif#1{%
- \begingroup
- \escapechar=-1 %
- \expandafter\endgroup
- \expandafter\ifvtex@@newif\string#1\@nil
- }%
- \def\ifvtex@@newif#1#2#3\@nil{%
- \expandafter\edef\csname#3true\endcsname{%
- \let
- \expandafter\noexpand\csname if#3\endcsname
- \expandafter\noexpand\csname iftrue\endcsname
- }%
- \expandafter\edef\csname#3false\endcsname{%
- \let
- \expandafter\noexpand\csname if#3\endcsname
- \expandafter\noexpand\csname iffalse\endcsname
- }%
- \csname#3false\endcsname
- }%
-\else
- \expandafter\let\expandafter\ifvtex@newif\csname newif\endcsname
+\def\ifvtex@newif#1{%
+\begingroup
+\escapechar=-1 %
+\expandafter\endgroup
+\expandafter\ifvtex@@newif\string#1\@nil
+}%
+\def\ifvtex@@newif#1#2#3\@nil{%
+\expandafter\edef\csname#3true\endcsname{%
+\let
+\expandafter\noexpand\csname if#3\endcsname
+\expandafter\noexpand\csname iftrue\endcsname
+}%
+\expandafter\edef\csname#3false\endcsname{%
+\let
+\expandafter\noexpand\csname if#3\endcsname
+\expandafter\noexpand\csname iffalse\endcsname
+}%
+\csname#3false\endcsname
+}%
+\else
+\expandafter\let\expandafter\ifvtex@newif\csname newif\endcsname
\fi
\ifvtex@newif\ifvtex
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname VTeXversion\endcsname\relax
\else
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname OpMode\endcsname\relax
- \else
- \vtextrue
- \fi
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname OpMode\endcsname\relax
+\else
+\vtextrue
+\fi
\fi
\ifvtex@newif\ifvtexdvi
\ifvtex@newif\ifvtexpdf
@@ -1604,139 +1608,139 @@ $ \next
\ifvtex@newif\ifvtexhtml
\ifvtex@newif\ifvtexgex
\ifvtex
- \ifcase\OpMode\relax
- \vtexdvitrue
- \or % 1
- \vtexpdftrue
- \or % 2
- \vtexpstrue
- \or % 3
- \vtexpstrue
- \or\or\or\or\or\or\or % 10
- \vtexhtmltrue
- \fi
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname gexmode\endcsname\relax
- \else
- \ifnum\gexmode>0 %
- \vtexgextrue
- \fi
- \fi
+\ifcase\OpMode\relax
+\vtexdvitrue
+\or % 1
+\vtexpdftrue
+\or % 2
+\vtexpstrue
+\or % 3
+\vtexpstrue
+\or\or\or\or\or\or\or % 10
+\vtexhtmltrue
+\fi
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname gexmode\endcsname\relax
+\else
+\ifnum\gexmode>0 %
+\vtexgextrue
+\fi
+\fi
\fi
\begingroup
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \let\x\PackageInfo
- \expandafter\let\csname on@line\endcsname\empty
- \fi
- \x{ifvtex}{%
- VTeX %
- \ifvtex
- in \ifvtexdvi DVI\fi
- \ifvtexpdf PDF\fi
- \ifvtexps PS\fi
- \ifvtexhtml HTML\fi
- \space mode %
- with\ifvtexgex\else out\fi\space GeX %
- \else
- not %
- \fi
- detected%
- }%
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\let\x\PackageInfo
+\expandafter\let\csname on@line\endcsname\empty
+\fi
+\x{ifvtex}{%
+ VTeX %
+\ifvtex
+ in \ifvtexdvi DVI\fi
+\ifvtexpdf PDF\fi
+\ifvtexps PS\fi
+\ifvtexhtml HTML\fi
+\space mode %
+ with\ifvtexgex\else out\fi\space GeX %
+\else
+ not %
+\fi
+ detected%
+}%
\endgroup
\ifvtex@AtEnd%
- \endinput
+\endinput
<hobsub>
\hobsub@StopPackage
\hobsub@StartPackage{intcalc}
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode123=1 % {
- \catcode125=2 % }
- \expandafter\let\expandafter\x\csname ver@intcalc.sty\endcsname
- \ifx\x\relax % plain-TeX, first loading
- \else
- \def\empty{}%
- \ifx\x\empty % LaTeX, first loading,
- % variable is initialized, but \ProvidesPackage not yet seen
- \else
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
- \fi
- \x{intcalc}{The package is already loaded}%
- \aftergroup\endinput
- \fi
- \fi
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\expandafter\let\expandafter\x\csname ver@intcalc.sty\endcsname
+\ifx\x\relax % plain-TeX, first loading
+\else
+\def\empty{}%
+\ifx\x\empty % LaTeX, first loading,
+% variable is initialized, but \ProvidesPackage not yet seen
+\else
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+\fi
+\x{intcalc}{The package is already loaded}%
+\aftergroup\endinput
+\fi
+\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode47=12 % /
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode91=12 % [
- \catcode93=12 % ]
- \catcode123=1 % {
- \catcode125=2 % }
- \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
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode47=12 % /
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode91=12 % [
+\catcode93=12 % ]
+\catcode123=1 % {
+\catcode125=2 % }
+\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@intcalc.sty\endcsname
\ProvidesPackage{intcalc}%
- [2007/09/27 v1.1 Expandable integer calculations (HO)]%
+ [2007/09/27 v1.1 Expandable integer calculations (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode123=1 % {
- \catcode125=2 % }
- \catcode64=11 % @
- \def\x{\endgroup
- \expandafter\edef\csname InCa@AtEnd\endcsname{%
- \endlinechar=\the\endlinechar\relax
- \catcode13=\the\catcode13\relax
- \catcode32=\the\catcode32\relax
- \catcode35=\the\catcode35\relax
- \catcode61=\the\catcode61\relax
- \catcode64=\the\catcode64\relax
- \catcode123=\the\catcode123\relax
- \catcode125=\the\catcode125\relax
- }%
- }%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode123=1 % {
+\catcode125=2 % }
+\catcode64=11 % @
+\def\x{\endgroup
+\expandafter\edef\csname InCa@AtEnd\endcsname{%
+\endlinechar=\the\endlinechar\relax
+\catcode13=\the\catcode13\relax
+\catcode32=\the\catcode32\relax
+\catcode35=\the\catcode35\relax
+\catcode61=\the\catcode61\relax
+\catcode64=\the\catcode64\relax
+\catcode123=\the\catcode123\relax
+\catcode125=\the\catcode125\relax
+}%
+}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
@@ -1745,11 +1749,11 @@ $ \next
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2{%
- \edef\InCa@AtEnd{%
- \InCa@AtEnd
- \catcode#1=\the\catcode#1\relax
- }%
- \catcode#1=#2\relax
+\edef\InCa@AtEnd{%
+\InCa@AtEnd
+\catcode#1=\the\catcode#1\relax
+}%
+\catcode#1=#2\relax
}
\TMP@EnsureCode{33}{12}% !
\TMP@EnsureCode{40}{12}% (
@@ -1766,420 +1770,419 @@ $ \next
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname InCa@TestMode\endcsname\relax
\else
- \catcode63=9 % ? (ignore)
+\catcode63=9 % ? (ignore)
\fi
? \let\InCa@@TestMode\InCa@TestMode
\def\InCa@Abs#1#2!{%
- \ifx#1-%
- #2%
- \else
- #1#2%
- \fi
+\ifx#1-%
+#2%
+\else
+#1#2%
+\fi
}
\def\InCa@Sgn#1#2!{%
- \ifx#1-%
- -1%
- \else
- \ifx#10%
- 0%
- \else
- 1%
- \fi
- \fi
+\ifx#1-%
+ -1%
+\else
+\ifx#10%
+ 0%
+\else
+ 1%
+\fi
+\fi
}
\def\InCa@Min#1!#2!{%
- \ifnum#1<#2 %
- #1%
- \else
- #2%
- \fi
+\ifnum#1<#2 %
+#1%
+\else
+#2%
+\fi
}
\def\InCa@Max#1!#2!{%
- \ifnum#1>#2 %
- #1%
- \else
- #2%
- \fi
+\ifnum#1>#2 %
+#1%
+\else
+#2%
+\fi
}
\def\InCa@Cmp#1!#2!{%
- \ifnum#1=#2 %
- 0%
- \else
- \ifnum#1<#2 %
- -%
- \fi
- 1%
- \fi
+\ifnum#1=#2 %
+ 0%
+\else
+\ifnum#1<#2 %
+ -%
+\fi
+ 1%
+\fi
}
\def\InCa@Fac#1!{%
- \ifcase#1 1% 0!
- \or 1% 1!
- \or 2% 2!
- \or 6% 3!
- \or 24% 4!
- \or 120% 5!
- \or 720% 6!
- \or 5040% 7!
- \or 40320% 8!
- \or 362880% 9!
- \or 3628800% 10!
- \or 39916800% 11!
- \or 479001600% 12!
- \else
- \ifnum#1<\z@
- 0\IntCalcError:FacNegative%
- \else
- 0\IntCalcError:FacOverflow%
- \fi
- \fi
+\ifcase#1 1% 0!
+\or 1% 1!
+\or 2% 2!
+\or 6% 3!
+\or 24% 4!
+\or 120% 5!
+\or 720% 6!
+\or 5040% 7!
+\or 40320% 8!
+\or 362880% 9!
+\or 3628800% 10!
+\or 39916800% 11!
+\or 479001600% 12!
+\else
+\ifnum#1<\z@
+ 0\IntCalcError:FacNegative%
+\else
+ 0\IntCalcError:FacOverflow%
+\fi
+\fi
}
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname numexpr\endcsname\relax
\else
- \def\intcalcNum#1{%
- \the\numexpr#1\relax
- }%
- \def\intcalcInv#1{%
- \number-\intcalcNum{#1} %
- }%
- \def\intcalcAbs#1{%
- \number\expandafter\InCa@Abs\the\numexpr#1! %
- }%
- \def\intcalcSgn#1{%
- \number\expandafter\InCa@Sgn\the\numexpr#1! %
- }%
- \def\intcalcMin#1#2{%
- \number\expandafter\InCa@Min
- \the\numexpr#1\expandafter!%
- \the\numexpr#2! %
- }%
- \def\intcalcMax#1#2{%
- \number\expandafter\InCa@Max
- \the\numexpr#1\expandafter!%
- \the\numexpr#2! %
- }%
- \def\intcalcCmp#1#2{%
- \number\expandafter\InCa@Cmp
- \the\numexpr#1\expandafter!\the\numexpr#2! %
- }%
- \def\intcalcInc#1{%
- \the\numexpr#1+1\relax
- }%
- \def\intcalcDec#1{%
- \the\numexpr#1-1\relax
- }%
- \def\IntCalcInc#1!{%
- \the\numexpr#1+1\relax
- }%
- \def\IntCalcDec#1!{%
- \the\numexpr#1-1\relax
- }%
- \def\intcalcAdd#1#2{%
- \the\numexpr#1+(#2)\relax
- }%
- \def\intcalcSub#1#2{%
- \the\numexpr#1-(#2)\relax
- }%
-
- \def\IntCalcAdd#1!#2!{%
- \the\numexpr#1+#2\relax
- }%
- \def\IntCalcSub#1!#2!{%
- \the\numexpr#1-#2\relax
- }%
- \def\intcalcShl#1{%
- \the\numexpr(#1)*2\relax
- }%
- \def\intcalcShr#1{%
- \number\expandafter\InCa@Shr\the\numexpr#1! %
- }%
- \def\IntCalcShl#1!{%
- \the\numexpr#1*2\relax
- }%
- \def\IntCalcShr#1!{%
- \the\numexpr\ifodd#1 (#1-1)\else#1\fi/2\relax
- }%
- \def\InCa@Shr#1#2!{%
- \ifx#1-%
- -\InCa@Shr#2!%
- \else
- \ifodd#1#2 %
- \the\numexpr(#1#2-1)/2\relax
- \else
- \the\numexpr#1#2/2\relax
- \fi
- \fi
- }%
- \def\intcalcMul#1#2{%
- \the\numexpr(#1)*(#2)\relax
- }%
- \def\IntCalcMul#1!#2!{%
- \the\numexpr#1*#2\relax
- }%
- \def\intcalcSqr#1{%
- \number\expandafter\InCa@Sqr\the\numexpr#1! %
- }%
- \def\InCa@Sqr#1!{%
- \the\numexpr#1*#1\relax
- }%
- \def\intcalcFac#1{%
- \number\expandafter\InCa@Fac\the\numexpr#1! %
- }%
- \def\intcalcPow#1#2{%
- \number\expandafter\InCa@Pow
- \the\numexpr#1\expandafter!%
- \the\numexpr#2! %
- }%
- \def\InCa@Pow#1#2!#3#4!{%
- \ifcase#3#4 % power = 0
- 1%
- \or % power = 1
- #1#2%
- \or % power = 2
- \the\numexpr#1#2*#1#2\relax
- \else
- \ifcase#1#2 % basis = 0, power <> 0
- 0%
- \ifx#3-% power < 0
- 0\IntCalcError:DivisionByZero%
- \fi
- \or
- 1% basis = 1
- \else
- \ifnum#1#2=\m@ne % basis = -1
- \ifodd#3#4 %
- -%
- \fi
- 1%
- \else % |basis| > 1
- \ifx#3-% power < 0
- 0%
- \else % power > 2
- \InCa@PowRec#1#2!#3#4!1!%
- \fi
- \fi
- \fi
- \fi
- }%
- \def\InCa@PowRec#1!#2!#3!{%
- \ifnum#2=\@ne
- \the\numexpr#1*#3\relax
- \else
- \ifodd#2 %
- \expandafter\InCa@PowRec
- \the\numexpr#1*#1\expandafter!%
- \the\numexpr(#2-1)/2\expandafter!%
- \the\numexpr#1*#3\expandafter\expandafter\expandafter!%
- \else
- \expandafter\InCa@PowRec
- \the\numexpr#1*#1\expandafter!%
- \the\numexpr(#2-1)/2\expandafter!%
- \number#3\expandafter\expandafter\expandafter!%
- \fi
- \fi
- }%
- \def\intcalcDiv#1#2{%
- \number\expandafter\InCa@Div
- \the\numexpr#1\expandafter!%
- \the\numexpr#2! %
- }%
- \def\InCa@Div#1!#2!{%
- \ifcase#2 %
- 0\IntCalcError:DivisionByZero%
- \else
- \ifcase#1 %
- 0%
- \else
- \expandafter\InCa@@Div
- \romannumeral 0%
- \ifnum#1<\z@
- \expandafter-\number-#1%
- \else
- \expandafter+\number#1%
- \fi
- \expandafter!%
- \romannumeral 0%
- \ifnum#2<\z@
- \expandafter-\number-#2%
- \else
- \expandafter+\number#2%
- \fi
- !%
- \fi
- \fi
- }%
- \def\InCa@Temp#1{%
- \def\IntCalcDiv##1!##2!{%
- \number
- \ifcase##2 %
- 0\IntCalcError:DivisionByZero%
- \else
- \ifcase##1 %
- 0%
- \else
- \the\numexpr(##1-(##2-1)/2)/##2\relax
- \fi
- \fi
- #1%
- }%
- }%
- \InCa@Temp{ }%
- \def\InCa@@Div#1#2!#3#4!{%
- #1#3%
- \the\numexpr(#2-(#4-1)/2)/#4\relax
- }%
- \def\intcalcMod#1#2{%
- \number\expandafter\InCa@Mod
- \the\numexpr#1\expandafter!%
- \the\numexpr#2! %
- }%
- \def\InCa@Mod#1!#2!{%
- \ifcase#2 %
- 0\IntCalcError:DivisionByZero%
- \else
- \ifcase#1 %
- 0%
- \else
- \expandafter\InCa@@Mod
- \romannumeral 0%
- \ifnum#1<\z@
- \expandafter-\number-#1%
- \else
- \expandafter+\number#1%
- \fi
- \expandafter!%
- \romannumeral 0%
- \ifnum#2<\z@
- \expandafter-\number-#2%
- \else
- \expandafter+\number#2%
- \fi
- !%
- \fi
- \fi
- }%
- \def\InCa@Temp#1{%
- \def\IntCalcMod##1!##2!{%
- \number
- \ifcase##2 %
- 0\IntCalcError:DivisionByZero%
- \else
- \ifcase##1 %
- 0%
- \else
- \the\numexpr##1-(##1-(##2-1)/2)/##2*##2\relax
- \fi
- \fi
- #1%
- }%
- }%
- \InCa@Temp{ }%
- \def\InCa@@Mod#1#2!#3#4!{%
- \if#3+%
- \if#1+%
- \the\numexpr#2-\InCa@@Div+#2!+#4!*#4\relax
- \else
- \expandafter\InCa@ModX
- \the\numexpr-#2+\InCa@@Div+#2!+#4!*#4!#4!%
- \fi
- \else
- -%
- \if#1+%
- \expandafter\InCa@ModX
- \the\numexpr-#2+\InCa@@Div+#2!+#4!*#4!#4!%
- \else
- \the\numexpr#2-\InCa@@Div+#2!+#4!*#4\relax
- \fi
- \fi
- }%
- \def\InCa@ModX#1!#2!{%
- \ifcase#1 %
- 0%
- \else
- \the\numexpr#1+#2\relax
- \fi
- }%
- \expandafter\InCa@AtEnd
+\def\intcalcNum#1{%
+\the\numexpr#1\relax
+}%
+\def\intcalcInv#1{%
+\number-\intcalcNum{#1} %
+}%
+\def\intcalcAbs#1{%
+\number\expandafter\InCa@Abs\the\numexpr#1! %
+}%
+\def\intcalcSgn#1{%
+\number\expandafter\InCa@Sgn\the\numexpr#1! %
+}%
+\def\intcalcMin#1#2{%
+\number\expandafter\InCa@Min
+\the\numexpr#1\expandafter!%
+\the\numexpr#2! %
+}%
+\def\intcalcMax#1#2{%
+\number\expandafter\InCa@Max
+\the\numexpr#1\expandafter!%
+\the\numexpr#2! %
+}%
+\def\intcalcCmp#1#2{%
+\number\expandafter\InCa@Cmp
+\the\numexpr#1\expandafter!\the\numexpr#2! %
+}%
+\def\intcalcInc#1{%
+\the\numexpr#1+1\relax
+}%
+\def\intcalcDec#1{%
+\the\numexpr#1-1\relax
+}%
+\def\IntCalcInc#1!{%
+\the\numexpr#1+1\relax
+}%
+\def\IntCalcDec#1!{%
+\the\numexpr#1-1\relax
+}%
+\def\intcalcAdd#1#2{%
+\the\numexpr#1+(#2)\relax
+}%
+\def\intcalcSub#1#2{%
+\the\numexpr#1-(#2)\relax
+}%
+\def\IntCalcAdd#1!#2!{%
+\the\numexpr#1+#2\relax
+}%
+\def\IntCalcSub#1!#2!{%
+\the\numexpr#1-#2\relax
+}%
+\def\intcalcShl#1{%
+\the\numexpr(#1)*2\relax
+}%
+\def\intcalcShr#1{%
+\number\expandafter\InCa@Shr\the\numexpr#1! %
+}%
+\def\IntCalcShl#1!{%
+\the\numexpr#1*2\relax
+}%
+\def\IntCalcShr#1!{%
+\the\numexpr\ifodd#1 (#1-1)\else#1\fi/2\relax
+}%
+\def\InCa@Shr#1#2!{%
+\ifx#1-%
+ -\InCa@Shr#2!%
+\else
+\ifodd#1#2 %
+\the\numexpr(#1#2-1)/2\relax
+\else
+\the\numexpr#1#2/2\relax
+\fi
+\fi
+}%
+\def\intcalcMul#1#2{%
+\the\numexpr(#1)*(#2)\relax
+}%
+\def\IntCalcMul#1!#2!{%
+\the\numexpr#1*#2\relax
+}%
+\def\intcalcSqr#1{%
+\number\expandafter\InCa@Sqr\the\numexpr#1! %
+}%
+\def\InCa@Sqr#1!{%
+\the\numexpr#1*#1\relax
+}%
+\def\intcalcFac#1{%
+\number\expandafter\InCa@Fac\the\numexpr#1! %
+}%
+\def\intcalcPow#1#2{%
+\number\expandafter\InCa@Pow
+\the\numexpr#1\expandafter!%
+\the\numexpr#2! %
+}%
+\def\InCa@Pow#1#2!#3#4!{%
+\ifcase#3#4 % power = 0
+ 1%
+\or % power = 1
+#1#2%
+\or % power = 2
+\the\numexpr#1#2*#1#2\relax
+\else
+\ifcase#1#2 % basis = 0, power <> 0
+ 0%
+\ifx#3-% power < 0
+ 0\IntCalcError:DivisionByZero%
+\fi
+\or
+ 1% basis = 1
+\else
+\ifnum#1#2=\m@ne % basis = -1
+\ifodd#3#4 %
+ -%
+\fi
+ 1%
+\else % |basis| > 1
+\ifx#3-% power < 0
+ 0%
+\else % power > 2
+\InCa@PowRec#1#2!#3#4!1!%
+\fi
+\fi
+\fi
+\fi
+}%
+\def\InCa@PowRec#1!#2!#3!{%
+\ifnum#2=\@ne
+\the\numexpr#1*#3\relax
+\else
+\ifodd#2 %
+\expandafter\InCa@PowRec
+\the\numexpr#1*#1\expandafter!%
+\the\numexpr(#2-1)/2\expandafter!%
+\the\numexpr#1*#3\expandafter\expandafter\expandafter!%
+\else
+\expandafter\InCa@PowRec
+\the\numexpr#1*#1\expandafter!%
+\the\numexpr(#2-1)/2\expandafter!%
+\number#3\expandafter\expandafter\expandafter!%
+\fi
+\fi
+}%
+\def\intcalcDiv#1#2{%
+\number\expandafter\InCa@Div
+\the\numexpr#1\expandafter!%
+\the\numexpr#2! %
+}%
+\def\InCa@Div#1!#2!{%
+\ifcase#2 %
+ 0\IntCalcError:DivisionByZero%
+\else
+\ifcase#1 %
+ 0%
+\else
+\expandafter\InCa@@Div
+\romannumeral 0%
+\ifnum#1<\z@
+\expandafter-\number-#1%
+\else
+\expandafter+\number#1%
+\fi
+\expandafter!%
+\romannumeral 0%
+\ifnum#2<\z@
+\expandafter-\number-#2%
+\else
+\expandafter+\number#2%
+\fi
+ !%
+\fi
+\fi
+}%
+\def\InCa@Temp#1{%
+\def\IntCalcDiv##1!##2!{%
+\number
+\ifcase##2 %
+ 0\IntCalcError:DivisionByZero%
+\else
+\ifcase##1 %
+ 0%
+\else
+\the\numexpr(##1-(##2-1)/2)/##2\relax
+\fi
+\fi
+#1%
+}%
+}%
+\InCa@Temp{ }%
+\def\InCa@@Div#1#2!#3#4!{%
+#1#3%
+\the\numexpr(#2-(#4-1)/2)/#4\relax
+}%
+\def\intcalcMod#1#2{%
+\number\expandafter\InCa@Mod
+\the\numexpr#1\expandafter!%
+\the\numexpr#2! %
+}%
+\def\InCa@Mod#1!#2!{%
+\ifcase#2 %
+ 0\IntCalcError:DivisionByZero%
+\else
+\ifcase#1 %
+ 0%
+\else
+\expandafter\InCa@@Mod
+\romannumeral 0%
+\ifnum#1<\z@
+\expandafter-\number-#1%
+\else
+\expandafter+\number#1%
+\fi
+\expandafter!%
+\romannumeral 0%
+\ifnum#2<\z@
+\expandafter-\number-#2%
+\else
+\expandafter+\number#2%
+\fi
+ !%
+\fi
+\fi
+}%
+\def\InCa@Temp#1{%
+\def\IntCalcMod##1!##2!{%
+\number
+\ifcase##2 %
+ 0\IntCalcError:DivisionByZero%
+\else
+\ifcase##1 %
+ 0%
+\else
+\the\numexpr##1-(##1-(##2-1)/2)/##2*##2\relax
+\fi
+\fi
+#1%
+}%
+}%
+\InCa@Temp{ }%
+\def\InCa@@Mod#1#2!#3#4!{%
+\if#3+%
+\if#1+%
+\the\numexpr#2-\InCa@@Div+#2!+#4!*#4\relax
+\else
+\expandafter\InCa@ModX
+\the\numexpr-#2+\InCa@@Div+#2!+#4!*#4!#4!%
+\fi
+\else
+ -%
+\if#1+%
+\expandafter\InCa@ModX
+\the\numexpr-#2+\InCa@@Div+#2!+#4!*#4!#4!%
+\else
+\the\numexpr#2-\InCa@@Div+#2!+#4!*#4\relax
+\fi
+\fi
+}%
+\def\InCa@ModX#1!#2!{%
+\ifcase#1 %
+ 0%
+\else
+\the\numexpr#1+#2\relax
+\fi
+}%
+\expandafter\InCa@AtEnd
\fi%
\def\intcalcNum#1{%
- \number\expandafter\InCa@FirstOfOne\number#1! %
+\number\expandafter\InCa@FirstOfOne\number#1! %
}
\def\intcalcInv#1{%
- \number\expandafter\InCa@FirstOfOne\number-#1! %
+\number\expandafter\InCa@FirstOfOne\number-#1! %
}
\def\InCa@FirstOfOne#1!{#1}
\def\intcalcAbs#1{%
- \number\expandafter\InCa@Abs\number#1! %
+\number\expandafter\InCa@Abs\number#1! %
}
\def\intcalcSgn#1{%
- \number\expandafter\InCa@Sgn\number#1! %
+\number\expandafter\InCa@Sgn\number#1! %
}
\def\intcalcMin#1#2{%
- \number\expandafter\InCa@Min
- \number\number#1\expandafter!\number#2! %
+\number\expandafter\InCa@Min
+\number\number#1\expandafter!\number#2! %
}
\def\intcalcMax#1#2{%
- \number\expandafter\InCa@Max
- \number\number#1\expandafter!\number#2! %
+\number\expandafter\InCa@Max
+\number\number#1\expandafter!\number#2! %
}
\def\intcalcCmp#1#2{%
- \number\expandafter\InCa@Cmp
- \number\number#1\expandafter!\number#2! %
+\number\expandafter\InCa@Cmp
+\number\number#1\expandafter!\number#2! %
}%
\def\intcalcInc#1{%
- \number\expandafter\InCa@IncSwitch\number#1! %
+\number\expandafter\InCa@IncSwitch\number#1! %
}
\def\InCa@IncSwitch#1#2!{%
- \ifx#1-%
- -%
- \csname InCa@Empty%
- \InCa@Dec#2!%
- \else
- \csname InCa@Empty%
- \InCa@Inc#1#2!%
- \fi
+\ifx#1-%
+ -%
+\csname InCa@Empty%
+\InCa@Dec#2!%
+\else
+\csname InCa@Empty%
+\InCa@Inc#1#2!%
+\fi
}
\def\intcalcDec#1{%
- \number\expandafter\InCa@DecSwitch\number#1! %
+\number\expandafter\InCa@DecSwitch\number#1! %
}
\def\InCa@DecSwitch#1#2!{%
- \ifx#1-%
- -%
- \csname InCa@Empty%
- \expandafter\InCa@Inc#2!%
- \else
- \ifx#10%
- -1%
- \else
- \csname InCa@Empty%
- \InCa@Dec#1#2!%
- \fi
- \fi
+\ifx#1-%
+ -%
+\csname InCa@Empty%
+\expandafter\InCa@Inc#2!%
+\else
+\ifx#10%
+ -1%
+\else
+\csname InCa@Empty%
+\InCa@Dec#1#2!%
+\fi
+\fi
}
\def\IntCalcInc#1!{%
- \number\csname InCa@Empty\InCa@Inc#1! %
+\number\csname InCa@Empty\InCa@Inc#1! %
}
\def\IntCalcDec#1!{%
- \number\csname InCa@Empty\InCa@Dec#1! %
+\number\csname InCa@Empty\InCa@Dec#1! %
}
\def\InCa@Inc#1#2{%
- \ifx#2!%
- \csname InCa@IncDigit#1\endcsname1%
- \else
- \csname InCa@IncDigit#1%
- \expandafter\InCa@Inc\expandafter#2%
- \fi
+\ifx#2!%
+\csname InCa@IncDigit#1\endcsname1%
+\else
+\csname InCa@IncDigit#1%
+\expandafter\InCa@Inc\expandafter#2%
+\fi
}
\def\InCa@Temp#1#2{%
- \expandafter\def\csname InCa@IncDigit#1\endcsname##1{%
- \endcsname
- 0%
- \ifcase##1 %
- #1%
- \else
- #2%
- \fi
- }%
+\expandafter\def\csname InCa@IncDigit#1\endcsname##1{%
+\endcsname
+ 0%
+\ifcase##1 %
+#1%
+\else
+#2%
+\fi
+}%
}
\InCa@Temp 01
\InCa@Temp 12
@@ -2191,31 +2194,31 @@ $ \next
\InCa@Temp 78
\InCa@Temp 89
\expandafter\def\csname InCa@IncDigit9\endcsname#1{%
- \expandafter\endcsname
- \ifcase#1 %
- 09%
- \else
- 10%
- \fi
+\expandafter\endcsname
+\ifcase#1 %
+ 09%
+\else
+ 10%
+\fi
}
\def\InCa@Dec#1#2{%
- \ifx#2!%
- \csname InCa@DecDigit#1\endcsname1%
- \else
- \csname InCa@DecDigit#1%
- \expandafter\InCa@Dec\expandafter#2%
- \fi
+\ifx#2!%
+\csname InCa@DecDigit#1\endcsname1%
+\else
+\csname InCa@DecDigit#1%
+\expandafter\InCa@Dec\expandafter#2%
+\fi
}
\def\InCa@Temp#1#2{%
- \expandafter\def\csname InCa@DecDigit#1\endcsname##1{%
- \endcsname
- 0%
- \ifcase##1 %
- #1%
- \else
- #2%
- \fi
- }%
+\expandafter\def\csname InCa@DecDigit#1\endcsname##1{%
+\endcsname
+ 0%
+\ifcase##1 %
+#1%
+\else
+#2%
+\fi
+}%
}
\InCa@Temp 98
\InCa@Temp 87
@@ -2227,164 +2230,164 @@ $ \next
\InCa@Temp 21
\InCa@Temp 10
\expandafter\def\csname InCa@DecDigit0\endcsname#1{%
- \expandafter\endcsname
- \ifcase#1 %
- 00%
- \else
- 19%
- \fi
+\expandafter\endcsname
+\ifcase#1 %
+ 00%
+\else
+ 19%
+\fi
}
\def\intcalcAdd#1#2{%
- \number
- \expandafter\InCa@AddSwitch
- \number\number#1\expandafter!%
- \number#2! %
+\number
+\expandafter\InCa@AddSwitch
+\number\number#1\expandafter!%
+\number#2! %
}
\def\intcalcSub#1#2{%
- \number
- \expandafter\InCa@AddSwitch
- \number\number#1\expandafter!%
- \number-\number#2! %
+\number
+\expandafter\InCa@AddSwitch
+\number\number#1\expandafter!%
+\number-\number#2! %
}
\def\InCa@AddSwitch#1!#2!{%
- \ifnum#1<\z@
- \ifnum#2<\z@
- -%
- \ifnum#1<#2 %
- \expandafter\InCa@Add\number-#1\expandafter!%
- \@gobble#2!%
- \else
- \expandafter\InCa@Add\number-#2\expandafter!%
- \@gobble#1!%
- \fi
- \else
- \ifnum-#1>#2 %
- -%
- \expandafter\InCa@Sub\@gobble#1!#2!%
- \else
- \expandafter\InCa@Sub\number#2\expandafter!%
- \@gobble#1!%
- \fi
- \fi
- \else
- \ifnum#2<\z@
- \ifnum#1>-#2 %
- \expandafter\InCa@Sub\number#1\expandafter!%
- \@gobble#2!%
- \else
- -%
- \expandafter\InCa@Sub\@gobble#2!#1!%
- \fi
- \else
- \ifnum#1>#2 %
- \InCa@Add#1!#2!%
- \else
- \InCa@Add#2!#1!%
- \fi
- \fi
- \fi
+\ifnum#1<\z@
+\ifnum#2<\z@
+ -%
+\ifnum#1<#2 %
+\expandafter\InCa@Add\number-#1\expandafter!%
+\@gobble#2!%
+\else
+\expandafter\InCa@Add\number-#2\expandafter!%
+\@gobble#1!%
+\fi
+\else
+\ifnum-#1>#2 %
+ -%
+\expandafter\InCa@Sub\@gobble#1!#2!%
+\else
+\expandafter\InCa@Sub\number#2\expandafter!%
+\@gobble#1!%
+\fi
+\fi
+\else
+\ifnum#2<\z@
+\ifnum#1>-#2 %
+\expandafter\InCa@Sub\number#1\expandafter!%
+\@gobble#2!%
+\else
+ -%
+\expandafter\InCa@Sub\@gobble#2!#1!%
+\fi
+\else
+\ifnum#1>#2 %
+\InCa@Add#1!#2!%
+\else
+\InCa@Add#2!#1!%
+\fi
+\fi
+\fi
}
\def\IntCalcAdd#1!#2!{%
- \number\InCa@Add#1!#2! %
+\number\InCa@Add#1!#2! %
}
\def\IntCalcSub#1!#2!{%
- \number\InCa@Sub#1!#2! %
+\number\InCa@Sub#1!#2! %
}
\begingroup
- \def\x#1{\endgroup
- \let\InCa@Space= #1%
- }%
+\def\x#1{\endgroup
+\let\InCa@Space= #1%
+}%
\x{ }
\def\InCa@Add#1!#2!{%
- \ifcase#2 %
- #1%
- \else
- \InCa@@Add#1!#2!000000000\InCa@Space
- \fi
+\ifcase#2 %
+#1%
+\else
+\InCa@@Add#1!#2!000000000\InCa@Space
+\fi
}
\def\InCa@Sub#1!#2!{%
- \ifnum#1=#2 %
- 0%
- \else
- \InCa@@Sub#1!#2!000000000\InCa@Space
- \fi
+\ifnum#1=#2 %
+ 0%
+\else
+\InCa@@Sub#1!#2!000000000\InCa@Space
+\fi
}
\def\InCa@@Add#1!#2#3!{%
- \ifx\InCa@Empty#3\InCa@Empty
- \@ReturnAfterElseFi{%
- \InCa@@@Add!!#1!#2%
- }%
- \else
- \@ReturnAfterFi{%
- \InCa@@Add#1!#3!#2%
- }%
- \fi
+\ifx\InCa@Empty#3\InCa@Empty
+\@ReturnAfterElseFi{%
+\InCa@@@Add!!#1!#2%
+}%
+\else
+\@ReturnAfterFi{%
+\InCa@@Add#1!#3!#2%
+}%
+\fi
}
\def\InCa@@Sub#1!#2#3!{%
- \ifx\InCa@Empty#3\InCa@Empty
- \@ReturnAfterElseFi{%
- \InCa@@@Sub!!#1!#2%
- }%
- \else
- \@ReturnAfterFi{%
- \InCa@@Sub#1!#3!#2%
- }%
- \fi
+\ifx\InCa@Empty#3\InCa@Empty
+\@ReturnAfterElseFi{%
+\InCa@@@Sub!!#1!#2%
+}%
+\else
+\@ReturnAfterFi{%
+\InCa@@Sub#1!#3!#2%
+}%
+\fi
}
\def\InCa@@@Add#1!#2!#3#4!#5{%
- \ifx\InCa@Empty#4\InCa@Empty
- \csname InCa@Empty%
- \@ReturnAfterElseFi{%
- \InCa@ProcessAdd#1#3!#5#2%
- }%
- \else
- \@ReturnAfterFi{%
- \InCa@@@Add#1#3!#5#2!#4!%
- }%
- \fi
+\ifx\InCa@Empty#4\InCa@Empty
+\csname InCa@Empty%
+\@ReturnAfterElseFi{%
+\InCa@ProcessAdd#1#3!#5#2%
+}%
+\else
+\@ReturnAfterFi{%
+\InCa@@@Add#1#3!#5#2!#4!%
+}%
+\fi
}
\def\InCa@@@Sub#1!#2!#3#4!#5{%
- \ifx\InCa@Empty#4\InCa@Empty
- \csname @gobble%
- \@ReturnAfterElseFi{%
- \InCa@ProcessSub#1#3!#5#2%
- }%
- \else
- \@ReturnAfterFi{%
- \InCa@@@Sub#1#3!#5#2!#4!%
- }%
- \fi
+\ifx\InCa@Empty#4\InCa@Empty
+\csname @gobble%
+\@ReturnAfterElseFi{%
+\InCa@ProcessSub#1#3!#5#2%
+}%
+\else
+\@ReturnAfterFi{%
+\InCa@@@Sub#1#3!#5#2!#4!%
+}%
+\fi
}
\def\InCa@ProcessAdd#1#2!#3#4{%
- \ifx\InCa@Empty#2\InCa@Empty
- \csname InCa@AddDigit#1\endcsname#3%
- \romannumeral0#4%
- \else
- \csname InCa@AddDigit#1\csname InCa@DigitCarry#3%
- \@ReturnAfterFi{%
- \InCa@ProcessAdd#2!#4%
- }%
- \fi
+\ifx\InCa@Empty#2\InCa@Empty
+\csname InCa@AddDigit#1\endcsname#3%
+\romannumeral0#4%
+\else
+\csname InCa@AddDigit#1\csname InCa@DigitCarry#3%
+\@ReturnAfterFi{%
+\InCa@ProcessAdd#2!#4%
+}%
+\fi
}
\def\InCa@ProcessSub#1#2!#3#4{%
- \ifx\InCa@Empty#2\InCa@Empty
- \csname InCa@SubDigit#1\endcsname#3%
- \romannumeral0#4%
- \else
- \csname InCa@SubDigit#1\csname InCa@DigitCarry#3%
- \@ReturnAfterFi{%
- \InCa@ProcessSub#2!#4%
- }%
- \fi
+\ifx\InCa@Empty#2\InCa@Empty
+\csname InCa@SubDigit#1\endcsname#3%
+\romannumeral0#4%
+\else
+\csname InCa@SubDigit#1\csname InCa@DigitCarry#3%
+\@ReturnAfterFi{%
+\InCa@ProcessSub#2!#4%
+}%
+\fi
}
\def\InCa@Temp#1#2{%
- \expandafter\def\csname InCa@DigitCarry#1\endcsname##1{%
- \ifcase##1 %
- \endcsname#1%
- \else
- \endcsname#2%
- \fi
- }%
+\expandafter\def\csname InCa@DigitCarry#1\endcsname##1{%
+\ifcase##1 %
+\endcsname#1%
+\else
+\endcsname#2%
+\fi
+}%
}
\InCa@Temp 01
\InCa@Temp 12
@@ -2397,286 +2400,286 @@ $ \next
\InCa@Temp 89
\InCa@Temp 9{{10}}
\expandafter\def\csname InCa@AddDigit0\endcsname#1{%
- \ifnum#1>9 %
- \endcsname10%
- \else
- \endcsname0#1%
- \fi
+\ifnum#1>9 %
+\endcsname10%
+\else
+\endcsname0#1%
+\fi
}
\def\InCa@Temp#1#2#3{%
- \expandafter\def\csname InCa@AddDigit#1\endcsname##1{%
- \ifnum##1>#2 %
- \endcsname 1%
- \else
- \endcsname 0%
- \fi
- \ifcase##1 #1% 0
- #3%
- \else #1% 10
- \fi
- }%
+\expandafter\def\csname InCa@AddDigit#1\endcsname##1{%
+\ifnum##1>#2 %
+\endcsname 1%
+\else
+\endcsname 0%
+\fi
+\ifcase##1 #1% 0
+#3%
+\else #1% 10
+\fi
+}%
}
\InCa@Temp 18{%
- \or 2% 1
- \or 3% 2
- \or 4% 3
- \or 5% 4
- \or 6% 5
- \or 7% 6
- \or 8% 7
- \or 9% 8
- \or 0% 9
+\or 2% 1
+\or 3% 2
+\or 4% 3
+\or 5% 4
+\or 6% 5
+\or 7% 6
+\or 8% 7
+\or 9% 8
+\or 0% 9
}%
\InCa@Temp 27{%
- \or 3% 1
- \or 4% 2
- \or 5% 3
- \or 6% 4
- \or 7% 5
- \or 8% 6
- \or 9% 7
- \or 0% 8
- \or 1% 9
+\or 3% 1
+\or 4% 2
+\or 5% 3
+\or 6% 4
+\or 7% 5
+\or 8% 6
+\or 9% 7
+\or 0% 8
+\or 1% 9
}%
\InCa@Temp 36{%
- \or 4% 1
- \or 5% 2
- \or 6% 3
- \or 7% 4
- \or 8% 5
- \or 9% 6
- \or 0% 7
- \or 1% 8
- \or 2% 9
+\or 4% 1
+\or 5% 2
+\or 6% 3
+\or 7% 4
+\or 8% 5
+\or 9% 6
+\or 0% 7
+\or 1% 8
+\or 2% 9
}%
\InCa@Temp 45{%
- \or 5% 1
- \or 6% 2
- \or 7% 3
- \or 8% 4
- \or 9% 5
- \or 0% 6
- \or 1% 7
- \or 2% 8
- \or 3% 9
+\or 5% 1
+\or 6% 2
+\or 7% 3
+\or 8% 4
+\or 9% 5
+\or 0% 6
+\or 1% 7
+\or 2% 8
+\or 3% 9
}%
\InCa@Temp 54{%
- \or 6% 1
- \or 7% 2
- \or 8% 3
- \or 9% 4
- \or 0% 5
- \or 1% 6
- \or 2% 7
- \or 3% 8
- \or 4% 9
+\or 6% 1
+\or 7% 2
+\or 8% 3
+\or 9% 4
+\or 0% 5
+\or 1% 6
+\or 2% 7
+\or 3% 8
+\or 4% 9
}%
\InCa@Temp 63{%
- \or 7% 1
- \or 8% 2
- \or 9% 3
- \or 0% 4
- \or 1% 5
- \or 2% 6
- \or 3% 7
- \or 4% 8
- \or 5% 9
+\or 7% 1
+\or 8% 2
+\or 9% 3
+\or 0% 4
+\or 1% 5
+\or 2% 6
+\or 3% 7
+\or 4% 8
+\or 5% 9
}%
\InCa@Temp 72{%
- \or 8% 1
- \or 9% 2
- \or 0% 3
- \or 1% 4
- \or 2% 5
- \or 3% 6
- \or 4% 7
- \or 5% 8
- \or 6% 9
+\or 8% 1
+\or 9% 2
+\or 0% 3
+\or 1% 4
+\or 2% 5
+\or 3% 6
+\or 4% 7
+\or 5% 8
+\or 6% 9
}%
\InCa@Temp 81{%
- \or 9% 1
- \or 0% 2
- \or 1% 3
- \or 2% 4
- \or 3% 5
- \or 4% 6
- \or 5% 7
- \or 6% 8
- \or 7% 9
+\or 9% 1
+\or 0% 2
+\or 1% 3
+\or 2% 4
+\or 3% 5
+\or 4% 6
+\or 5% 7
+\or 6% 8
+\or 7% 9
}%
\InCa@Temp 90{%
- \or 0% 1
- \or 1% 2
- \or 2% 3
- \or 3% 4
- \or 4% 5
- \or 5% 6
- \or 6% 7
- \or 7% 8
- \or 8% 9
+\or 0% 1
+\or 1% 2
+\or 2% 3
+\or 3% 4
+\or 4% 5
+\or 5% 6
+\or 6% 7
+\or 7% 8
+\or 8% 9
}%
\def\InCa@Temp#1#2{%
- \expandafter\def\csname InCa@SubDigit#1\endcsname##1{%
- \ifnum##1>#1 %
- \endcsname 1%
- \else
- \endcsname 0%
- \fi
- \ifcase##1 #1% 0
- #2%
- \else #1% 10
- \fi
- }%
+\expandafter\def\csname InCa@SubDigit#1\endcsname##1{%
+\ifnum##1>#1 %
+\endcsname 1%
+\else
+\endcsname 0%
+\fi
+\ifcase##1 #1% 0
+#2%
+\else #1% 10
+\fi
+}%
}
\InCa@Temp 0{%
- \or 9% 1
- \or 8% 2
- \or 7% 3
- \or 6% 4
- \or 5% 5
- \or 4% 6
- \or 3% 7
- \or 2% 8
- \or 1% 9
+\or 9% 1
+\or 8% 2
+\or 7% 3
+\or 6% 4
+\or 5% 5
+\or 4% 6
+\or 3% 7
+\or 2% 8
+\or 1% 9
}
\InCa@Temp 1{%
- \or 0% 1
- \or 9% 2
- \or 8% 3
- \or 7% 4
- \or 6% 5
- \or 5% 6
- \or 4% 7
- \or 3% 8
- \or 2% 9
+\or 0% 1
+\or 9% 2
+\or 8% 3
+\or 7% 4
+\or 6% 5
+\or 5% 6
+\or 4% 7
+\or 3% 8
+\or 2% 9
}
\InCa@Temp 2{%
- \or 1% 1
- \or 0% 2
- \or 9% 3
- \or 8% 4
- \or 7% 5
- \or 6% 6
- \or 5% 7
- \or 4% 8
- \or 3% 9
+\or 1% 1
+\or 0% 2
+\or 9% 3
+\or 8% 4
+\or 7% 5
+\or 6% 6
+\or 5% 7
+\or 4% 8
+\or 3% 9
}
\InCa@Temp 3{%
- \or 2% 1
- \or 1% 2
- \or 0% 3
- \or 9% 4
- \or 8% 5
- \or 7% 6
- \or 6% 7
- \or 5% 8
- \or 4% 9
+\or 2% 1
+\or 1% 2
+\or 0% 3
+\or 9% 4
+\or 8% 5
+\or 7% 6
+\or 6% 7
+\or 5% 8
+\or 4% 9
}
\InCa@Temp 4{%
- \or 3% 1
- \or 2% 2
- \or 1% 3
- \or 0% 4
- \or 9% 5
- \or 8% 6
- \or 7% 7
- \or 6% 8
- \or 5% 9
+\or 3% 1
+\or 2% 2
+\or 1% 3
+\or 0% 4
+\or 9% 5
+\or 8% 6
+\or 7% 7
+\or 6% 8
+\or 5% 9
}
\InCa@Temp 5{%
- \or 4% 1
- \or 3% 2
- \or 2% 3
- \or 1% 4
- \or 0% 5
- \or 9% 6
- \or 8% 7
- \or 7% 8
- \or 6% 9
+\or 4% 1
+\or 3% 2
+\or 2% 3
+\or 1% 4
+\or 0% 5
+\or 9% 6
+\or 8% 7
+\or 7% 8
+\or 6% 9
}
\InCa@Temp 6{%
- \or 5% 1
- \or 4% 2
- \or 3% 3
- \or 2% 4
- \or 1% 5
- \or 0% 6
- \or 9% 7
- \or 8% 8
- \or 7% 9
+\or 5% 1
+\or 4% 2
+\or 3% 3
+\or 2% 4
+\or 1% 5
+\or 0% 6
+\or 9% 7
+\or 8% 8
+\or 7% 9
}
\InCa@Temp 7{%
- \or 6% 1
- \or 5% 2
- \or 4% 3
- \or 3% 4
- \or 2% 5
- \or 1% 6
- \or 0% 7
- \or 9% 8
- \or 8% 9
+\or 6% 1
+\or 5% 2
+\or 4% 3
+\or 3% 4
+\or 2% 5
+\or 1% 6
+\or 0% 7
+\or 9% 8
+\or 8% 9
}
\InCa@Temp 8{%
- \or 7% 1
- \or 6% 2
- \or 5% 3
- \or 4% 4
- \or 3% 5
- \or 2% 6
- \or 1% 7
- \or 0% 8
- \or 9% 9
+\or 7% 1
+\or 6% 2
+\or 5% 3
+\or 4% 4
+\or 3% 5
+\or 2% 6
+\or 1% 7
+\or 0% 8
+\or 9% 9
}
\InCa@Temp 9{%
- \or 8% 1
- \or 7% 2
- \or 6% 3
- \or 5% 4
- \or 4% 5
- \or 3% 6
- \or 2% 7
- \or 1% 8
- \or 0% 9
+\or 8% 1
+\or 7% 2
+\or 6% 3
+\or 5% 4
+\or 4% 5
+\or 3% 6
+\or 2% 7
+\or 1% 8
+\or 0% 9
}
\def\intcalcShl#1{%
- \number\expandafter\InCa@ShlSwitch\number#1! %
+\number\expandafter\InCa@ShlSwitch\number#1! %
}
\def\InCa@ShlSwitch#1#2!{%
- \ifx#1-%
- -\csname InCa@Empty%
- \InCa@Shl#2!%
- \else
- \csname InCa@Empty%
- \InCa@Shl#1#2!%
- \fi
+\ifx#1-%
+ -\csname InCa@Empty%
+\InCa@Shl#2!%
+\else
+\csname InCa@Empty%
+\InCa@Shl#1#2!%
+\fi
}
\def\IntCalcShl#1!{%
- \number
- \csname InCa@Empty%
- \InCa@Shl#1! %
+\number
+\csname InCa@Empty%
+\InCa@Shl#1! %
}
\def\InCa@Shl#1#2{%
- \ifx#2!%
- \csname InCa@ShlDigit#1\endcsname0%
- \else
- \csname InCa@ShlDigit#1%
- \@ReturnAfterFi{%
- \InCa@Shl#2%
- }%
- \fi
+\ifx#2!%
+\csname InCa@ShlDigit#1\endcsname0%
+\else
+\csname InCa@ShlDigit#1%
+\@ReturnAfterFi{%
+\InCa@Shl#2%
+}%
+\fi
}
\expandafter\def\csname InCa@ShlDigit0\endcsname{%
- \endcsname0%
+\endcsname0%
}
\def\InCa@Temp#1#2#3#4#5{%
- \expandafter\def\csname InCa@ShlDigit#1\endcsname##1{%
- \expandafter\endcsname
- \ifcase##1 %
- #2#3%
- \else
- #4#5%
- \fi
- }%
+\expandafter\def\csname InCa@ShlDigit#1\endcsname##1{%
+\expandafter\endcsname
+\ifcase##1 %
+#2#3%
+\else
+#4#5%
+\fi
+}%
}
\InCa@Temp 10203
\InCa@Temp 20405
@@ -2688,85 +2691,85 @@ $ \next
\InCa@Temp 81617
\InCa@Temp 91819
\def\intcalcShr#1{%
- \number\expandafter\InCa@ShrSwitch\number#1! %
+\number\expandafter\InCa@ShrSwitch\number#1! %
}
\def\InCa@ShrSwitch#1#2!{%
- \ifx#1-%
- -\InCa@Shr#2!%
- \else
- \InCa@Shr#1#2!%
- \fi
+\ifx#1-%
+ -\InCa@Shr#2!%
+\else
+\InCa@Shr#1#2!%
+\fi
}
\def\IntCalcShr#1!{%
- \number\InCa@Shr#1! %
+\number\InCa@Shr#1! %
}
\def\InCa@Shr#1#2{%
- \InCa@ShrDigit#1!%
- \ifx#2!%
- \else
- \@ReturnAfterFi{%
- \ifodd#1 %
- \@ReturnAfterElseFi{%
- \InCa@Shr{1#2}%
- }%
- \else
- \expandafter\InCa@Shr\expandafter#2%
- \fi
- }%
- \fi
+\InCa@ShrDigit#1!%
+\ifx#2!%
+\else
+\@ReturnAfterFi{%
+\ifodd#1 %
+\@ReturnAfterElseFi{%
+\InCa@Shr{1#2}%
+}%
+\else
+\expandafter\InCa@Shr\expandafter#2%
+\fi
+}%
+\fi
}
\def\InCa@ShrDigit#1!{%
- \ifcase#1 0% 0
- \or 0% 1
- \or 1% 2
- \or 1% 3
- \or 2% 4
- \or 2% 5
- \or 3% 6
- \or 3% 7
- \or 4% 8
- \or 4% 9
- \or 5% 10
- \or 5% 11
- \or 6% 12
- \or 6% 13
- \or 7% 14
- \or 7% 15
- \or 8% 16
- \or 8% 17
- \or 9% 18
- \or 9% 19
- \fi
+\ifcase#1 0% 0
+\or 0% 1
+\or 1% 2
+\or 1% 3
+\or 2% 4
+\or 2% 5
+\or 3% 6
+\or 3% 7
+\or 4% 8
+\or 4% 9
+\or 5% 10
+\or 5% 11
+\or 6% 12
+\or 6% 13
+\or 7% 14
+\or 7% 15
+\or 8% 16
+\or 8% 17
+\or 9% 18
+\or 9% 19
+\fi
}
\def\InCa@Temp#1{%
- \def\InCa@Tim##1##2{%
- \number
- \ifcase##2 % 0
- 0%
- \or % 1
- ##1%
- \else % 2-9
- \csname InCa@Empty%
- \InCa@ProcessTim##2##1!%
- \fi
- #1%
- }%
+\def\InCa@Tim##1##2{%
+\number
+\ifcase##2 % 0
+ 0%
+\or % 1
+##1%
+\else % 2-9
+\csname InCa@Empty%
+\InCa@ProcessTim##2##1!%
+\fi
+#1%
+}%
}
\InCa@Temp{ }
\def\InCa@ProcessTim#1#2#3{%
- \ifx#3!%
- \csname InCa@TimDigit#2\endcsname#10%
- \else
- \csname InCa@TimDigit#2\csname InCa@Param#1%
- \@ReturnAfterFi{%
- \InCa@ProcessTim#1#3%
- }%
- \fi
+\ifx#3!%
+\csname InCa@TimDigit#2\endcsname#10%
+\else
+\csname InCa@TimDigit#2\csname InCa@Param#1%
+\@ReturnAfterFi{%
+\InCa@ProcessTim#1#3%
+}%
+\fi
}
\def\InCa@Temp#1{%
- \expandafter\def\csname InCa@Param#1\endcsname{%
- \endcsname#1%
- }%
+\expandafter\def\csname InCa@Param#1\endcsname{%
+\endcsname#1%
+}%
}
\InCa@Temp 0%
\InCa@Temp 1%
@@ -2779,658 +2782,656 @@ $ \next
\InCa@Temp 8%
\InCa@Temp 9%
\expandafter\def\csname InCa@TimDigit0\endcsname#1#2{%
- \endcsname
- 0#2%
+\endcsname
+ 0#2%
}
\expandafter\def\csname InCa@TimDigit1\endcsname#1#2{%
- \ifcase#2 %
- \endcsname 0#1%
- \else
- \csname InCa@AddDigit#1\endcsname #2%
- \fi
+\ifcase#2 %
+\endcsname 0#1%
+\else
+\csname InCa@AddDigit#1\endcsname #2%
+\fi
}
\def\InCa@Temp#1#2{%
- \expandafter\def\csname InCa@TimDigit#1\endcsname##1{%
- \expandafter\InCa@TimDigitCarry
- \number
- \ifcase##1 0% 0
- #2%
- \fi
- !%
- }%
+\expandafter\def\csname InCa@TimDigit#1\endcsname##1{%
+\expandafter\InCa@TimDigitCarry
+\number
+\ifcase##1 0% 0
+#2%
+\fi
+ !%
+}%
}
\InCa@Temp 2{%
- \or 2% 1
- \or 4% 2
- \or 6% 3
- \or 8% 4
- \or 10% 5
- \or 12% 6
- \or 14% 7
- \or 16% 8
- \or 18% 9
+\or 2% 1
+\or 4% 2
+\or 6% 3
+\or 8% 4
+\or 10% 5
+\or 12% 6
+\or 14% 7
+\or 16% 8
+\or 18% 9
}
\InCa@Temp 3{%
- \or 3% 1
- \or 6% 2
- \or 9% 3
- \or 12% 4
- \or 15% 5
- \or 18% 6
- \or 21% 7
- \or 24% 8
- \or 27% 9
+\or 3% 1
+\or 6% 2
+\or 9% 3
+\or 12% 4
+\or 15% 5
+\or 18% 6
+\or 21% 7
+\or 24% 8
+\or 27% 9
}
\InCa@Temp 4{%
- \or 4% 1
- \or 8% 2
- \or 12% 3
- \or 16% 4
- \or 20% 5
- \or 24% 6
- \or 28% 7
- \or 32% 8
- \or 36% 9
+\or 4% 1
+\or 8% 2
+\or 12% 3
+\or 16% 4
+\or 20% 5
+\or 24% 6
+\or 28% 7
+\or 32% 8
+\or 36% 9
}
\InCa@Temp 5{%
- \or 5% 1
- \or 10% 2
- \or 15% 3
- \or 20% 4
- \or 25% 5
- \or 30% 6
- \or 35% 7
- \or 40% 8
- \or 45% 9
+\or 5% 1
+\or 10% 2
+\or 15% 3
+\or 20% 4
+\or 25% 5
+\or 30% 6
+\or 35% 7
+\or 40% 8
+\or 45% 9
}
\InCa@Temp 6{%
- \or 6% 1
- \or 12% 2
- \or 18% 3
- \or 24% 4
- \or 30% 5
- \or 36% 6
- \or 42% 7
- \or 48% 8
- \or 54% 9
+\or 6% 1
+\or 12% 2
+\or 18% 3
+\or 24% 4
+\or 30% 5
+\or 36% 6
+\or 42% 7
+\or 48% 8
+\or 54% 9
}
\InCa@Temp 7{%
- \or 7% 1
- \or 14% 2
- \or 21% 3
- \or 28% 4
- \or 35% 5
- \or 42% 6
- \or 49% 7
- \or 56% 8
- \or 63% 9
+\or 7% 1
+\or 14% 2
+\or 21% 3
+\or 28% 4
+\or 35% 5
+\or 42% 6
+\or 49% 7
+\or 56% 8
+\or 63% 9
}
\InCa@Temp 8{%
- \or 8% 1
- \or 16% 2
- \or 24% 3
- \or 32% 4
- \or 40% 5
- \or 48% 6
- \or 56% 7
- \or 64% 8
- \or 72% 9
+\or 8% 1
+\or 16% 2
+\or 24% 3
+\or 32% 4
+\or 40% 5
+\or 48% 6
+\or 56% 7
+\or 64% 8
+\or 72% 9
}
\InCa@Temp 9{%
- \or 9% 1
- \or 18% 2
- \or 27% 3
- \or 36% 4
- \or 45% 5
- \or 54% 6
- \or 63% 7
- \or 72% 8
- \or 81% 9
+\or 9% 1
+\or 18% 2
+\or 27% 3
+\or 36% 4
+\or 45% 5
+\or 54% 6
+\or 63% 7
+\or 72% 8
+\or 81% 9
}
\def\InCa@TimDigitCarry#1!{%
- \ifnum#1<10 %
- \csname InCa@AddDigit#1\expandafter\endcsname
- \else
- \@ReturnAfterFi{%
- \InCa@@TimDigitCarry#1!%
- }%
- \fi
+\ifnum#1<10 %
+\csname InCa@AddDigit#1\expandafter\endcsname
+\else
+\@ReturnAfterFi{%
+\InCa@@TimDigitCarry#1!%
+}%
+\fi
}
\def\InCa@@TimDigitCarry#1#2!#3{%
- \csname InCa@DigitCarry#1%
- \csname InCa@AddDigit#2\endcsname #3%
+\csname InCa@DigitCarry#1%
+\csname InCa@AddDigit#2\endcsname #3%
}
\def\intcalcMul#1#2{%
- \number
- \expandafter\InCa@MulSwitch
- \number\number#1\expandafter!%
- \number#2! %
+\number
+\expandafter\InCa@MulSwitch
+\number\number#1\expandafter!%
+\number#2! %
}
\def\InCa@MulSwitch#1!#2!{%
- \ifnum#1<\z@
- \ifnum#2<\z@
- \ifnum#1<#2 %
- \expandafter\InCa@Mul\number-#1\expandafter!%
- \@gobble#2!%
- \else
- \expandafter\InCa@Mul\number-#2\expandafter!%
- \@gobble#1!%
- \fi
- \else
- -%
- \ifnum-#1>#2 %
- \expandafter\InCa@Mul\@gobble#1!#2!%
- \else
- \expandafter\InCa@Mul\number#2\expandafter!%
- \@gobble#1!%
- \fi
- \fi
- \else
- \ifnum#2<\z@
- -%
- \ifnum#1>-#2 %
- \expandafter\InCa@Mul\number#1\expandafter!%
- \@gobble#2!%
- \else
- \expandafter\InCa@Mul\@gobble#2!#1!%
- \fi
- \else
- \ifnum#1>#2 %
- \InCa@Mul#1!#2!%
- \else
- \InCa@Mul#2!#1!%
- \fi
- \fi
- \fi
+\ifnum#1<\z@
+\ifnum#2<\z@
+\ifnum#1<#2 %
+\expandafter\InCa@Mul\number-#1\expandafter!%
+\@gobble#2!%
+\else
+\expandafter\InCa@Mul\number-#2\expandafter!%
+\@gobble#1!%
+\fi
+\else
+ -%
+\ifnum-#1>#2 %
+\expandafter\InCa@Mul\@gobble#1!#2!%
+\else
+\expandafter\InCa@Mul\number#2\expandafter!%
+\@gobble#1!%
+\fi
+\fi
+\else
+\ifnum#2<\z@
+ -%
+\ifnum#1>-#2 %
+\expandafter\InCa@Mul\number#1\expandafter!%
+\@gobble#2!%
+\else
+\expandafter\InCa@Mul\@gobble#2!#1!%
+\fi
+\else
+\ifnum#1>#2 %
+\InCa@Mul#1!#2!%
+\else
+\InCa@Mul#2!#1!%
+\fi
+\fi
+\fi
}
\def\IntCalcMul#1!#2!{%
- \number\InCa@Mul#1!#2! %
+\number\InCa@Mul#1!#2! %
}
\def\InCa@Mul#1!#2!{%
- \ifcase#2 %
- 0%
- \or
- #1%
- \or
- \csname InCa@Empty%
- \expandafter\InCa@Shl#1!%
- \else
- \ifnum#2<10 %
- \InCa@Tim{#1}#2%
- \else
- \InCa@ProcessMul!#2!#1!%
- \fi
- \fi
+\ifcase#2 %
+ 0%
+\or
+#1%
+\or
+\csname InCa@Empty%
+\expandafter\InCa@Shl#1!%
+\else
+\ifnum#2<10 %
+\InCa@Tim{#1}#2%
+\else
+\InCa@ProcessMul!#2!#1!%
+\fi
+\fi
}
\def\InCa@ProcessMul#1!#2#3!#4!{%
- \ifx\InCa@Empty#3\InCa@Empty
- \expandafter\InCa@Add\number
- #10\expandafter\expandafter\expandafter!%
- \InCa@Tim{#4}#2!%
- \else
- \ifx\InCa@Empty#1\InCa@Empty
- \expandafter\expandafter\expandafter\InCa@ProcessMul
- \InCa@Tim{#4}#2!%
- #3!#4!%
- \else
- \expandafter\InCa@ProcessMul\number
- \expandafter\InCa@Add\number%
- #10\expandafter\expandafter\expandafter!%
- \InCa@Tim{#4}#2!!%
- #3!#4!%
- \fi
- \fi
+\ifx\InCa@Empty#3\InCa@Empty
+\expandafter\InCa@Add\number
+#10\expandafter\expandafter\expandafter!%
+\InCa@Tim{#4}#2!%
+\else
+\ifx\InCa@Empty#1\InCa@Empty
+\expandafter\expandafter\expandafter\InCa@ProcessMul
+\InCa@Tim{#4}#2!%
+#3!#4!%
+\else
+\expandafter\InCa@ProcessMul\number
+\expandafter\InCa@Add\number%
+#10\expandafter\expandafter\expandafter!%
+\InCa@Tim{#4}#2!!%
+#3!#4!%
+\fi
+\fi
}
\def\intcalcSqr#1{%
- \number\expandafter\InCa@Sqr\number#1! %
+\number\expandafter\InCa@Sqr\number#1! %
}
\def\InCa@Sqr#1#2!{%
- \ifx#1-%
- \InCa@Mul#2!#2!%
- \else
- \InCa@Mul#1#2!#1#2!%
- \fi
+\ifx#1-%
+\InCa@Mul#2!#2!%
+\else
+\InCa@Mul#1#2!#1#2!%
+\fi
}
\def\intcalcFac#1{%
- \number\expandafter\InCa@Fac\number#1! %
+\number\expandafter\InCa@Fac\number#1! %
}
\def\intcalcPow#1#2{%
- \number\expandafter\InCa@Pow
- \number\number#1\expandafter!%
- \number#2! %
+\number\expandafter\InCa@Pow
+\number\number#1\expandafter!%
+\number#2! %
}
\def\InCa@Pow#1#2!#3#4!{%
- \ifcase#3#4 % power = 0
- 1%
- \or % power = 1
- #1#2%
- \or % power = 2
- \ifx#1-%
- \InCa@Mul#2!#2!%
- \else
- \InCa@Mul#1#2!#1#2!%
- \fi
- \else
- \ifcase#1#2 % basis = 0, power <> 0
- 0%
- \ifx#3-% power < 0
- 0\IntCalcError:DivisionByZero%
- \fi
- \or
- 1% basis = 1
- \else
- \ifnum#1#2=\m@ne % basis = -1
- \ifodd#3#4 %
- -%
- \fi
- 1%
- \else % |basis| > 1
- \ifx#3-% power < 0
- 0%
- \else % power > 2
- \ifx#1-% basis < 0
- \ifodd#3#4 %
- -%
- \fi
- \InCa@PowRec#2!#3#4!1!%
- \else
- \InCa@PowRec#1#2!#3#4!1!%
- \fi
- \fi
- \fi
- \fi
- \fi
+\ifcase#3#4 % power = 0
+ 1%
+\or % power = 1
+#1#2%
+\or % power = 2
+\ifx#1-%
+\InCa@Mul#2!#2!%
+\else
+\InCa@Mul#1#2!#1#2!%
+\fi
+\else
+\ifcase#1#2 % basis = 0, power <> 0
+ 0%
+\ifx#3-% power < 0
+ 0\IntCalcError:DivisionByZero%
+\fi
+\or
+ 1% basis = 1
+\else
+\ifnum#1#2=\m@ne % basis = -1
+\ifodd#3#4 %
+ -%
+\fi
+ 1%
+\else % |basis| > 1
+\ifx#3-% power < 0
+ 0%
+\else % power > 2
+\ifx#1-% basis < 0
+\ifodd#3#4 %
+ -%
+\fi
+\InCa@PowRec#2!#3#4!1!%
+\else
+\InCa@PowRec#1#2!#3#4!1!%
+\fi
+\fi
+\fi
+\fi
+\fi
}
\def\InCa@PowRec#1!#2!#3!{%
- \ifnum#2=\@ne
- \ifnum#1>#3 %
- \InCa@Mul#1!#3!%
- \else
- \InCa@Mul#3!#1!%
- \fi
- \else
- \expandafter\InCa@PowRec
- \number\InCa@Mul#1!#1!\expandafter!%
- \number\intcalcShr{#2}\expandafter!%
- \number
- \ifodd#2 %
- \ifnum#1>#3 %
- \InCa@Mul#1!#3!%
- \else
- \InCa@Mul#3!#1!%
- \fi
- \else
- #3%
- \fi
- \expandafter!%
- \fi
+\ifnum#2=\@ne
+\ifnum#1>#3 %
+\InCa@Mul#1!#3!%
+\else
+\InCa@Mul#3!#1!%
+\fi
+\else
+\expandafter\InCa@PowRec
+\number\InCa@Mul#1!#1!\expandafter!%
+\number\intcalcShr{#2}\expandafter!%
+\number
+\ifodd#2 %
+\ifnum#1>#3 %
+\InCa@Mul#1!#3!%
+\else
+\InCa@Mul#3!#1!%
+\fi
+\else
+#3%
+\fi
+\expandafter!%
+\fi
}
\def\intcalcDiv#1#2{%
- \number\expandafter\InCa@Div
- \number\number#1\expandafter!%
- \number#2! %
+\number\expandafter\InCa@Div
+\number\number#1\expandafter!%
+\number#2! %
}
\def\InCa@Div#1!#2!{%
- \ifcase#2 %
- 0\IntCalcError:DivisionByZero%
- \else
- \ifcase#1 %
- 0%
- \else
- \expandafter\InCa@DivSwitch
- \number#1\expandafter!%
- \number#2!%
- \fi
- \fi
+\ifcase#2 %
+ 0\IntCalcError:DivisionByZero%
+\else
+\ifcase#1 %
+ 0%
+\else
+\expandafter\InCa@DivSwitch
+\number#1\expandafter!%
+\number#2!%
+\fi
+\fi
}
\def\InCa@Temp#1{%
- \def\IntCalcDiv##1!##2!{%
- \number
- \ifcase##2 %
- 0\IntCalcError:DivisionByZero%
- \else
- \ifcase##1 %
- 0%
- \else
- \InCa@@Div##1!##2!%
- \fi
- \fi
- #1%
- }%
+\def\IntCalcDiv##1!##2!{%
+\number
+\ifcase##2 %
+ 0\IntCalcError:DivisionByZero%
+\else
+\ifcase##1 %
+ 0%
+\else
+\InCa@@Div##1!##2!%
+\fi
+\fi
+#1%
+}%
}
\InCa@Temp{ }%
\def\InCa@DivSwitch#1!#2!{%
- \ifnum#1<\z@
- \ifnum#2<\z@
- \expandafter\InCa@@Div\number-#1\expandafter!%
- \@gobble#2!%
- \else
- -%
- \expandafter\InCa@@Div\@gobble#1!#2!%
- \fi
- \else
- \ifnum#2<\z@
- -%
- \expandafter\InCa@@Div\number#1\expandafter!%
- \@gobble#2!%
- \else
- \InCa@@Div#1!#2!%
- \fi
- \fi
+\ifnum#1<\z@
+\ifnum#2<\z@
+\expandafter\InCa@@Div\number-#1\expandafter!%
+\@gobble#2!%
+\else
+ -%
+\expandafter\InCa@@Div\@gobble#1!#2!%
+\fi
+\else
+\ifnum#2<\z@
+ -%
+\expandafter\InCa@@Div\number#1\expandafter!%
+\@gobble#2!%
+\else
+\InCa@@Div#1!#2!%
+\fi
+\fi
}
\def\InCa@@Div#1!#2!{%
- \ifnum#1>#2 %
- \ifcase#2 % 0 already catched
+\ifnum#1>#2 %
+\ifcase#2 % 0 already catched
? \IntCalcError:ThisCannotHappen%
- \or % 1
- #1%
- \or % 2
- \InCa@Shr#1!%
- \else
- \InCa@DivStart!#1!#2!#2!%
- \fi
- \else
- \ifnum#1=#2 %
- 1%
- \else
- 0%
- \fi
- \fi
+\or % 1
+#1%
+\or % 2
+\InCa@Shr#1!%
+\else
+\InCa@DivStart!#1!#2!#2!%
+\fi
+\else
+\ifnum#1=#2 %
+ 1%
+\else
+ 0%
+\fi
+\fi
}
\def\InCa@DivStart#1!#2#3!#4#5{%
- \ifx#5!%
- \@ReturnAfterElseFi{%
- \InCa@DivStartI{#1#2}#3=!%
- }%
- \else
- \@ReturnAfterFi{%
- \InCa@DivStart{#1#2}!#3!#5%
- }%
- \fi
+\ifx#5!%
+\@ReturnAfterElseFi{%
+\InCa@DivStartI{#1#2}#3=!%
+}%
+\else
+\@ReturnAfterFi{%
+\InCa@DivStart{#1#2}!#3!#5%
+}%
+\fi
}
\def\InCa@DivStartI#1!#2!{%
- \expandafter\InCa@DivStartII
- \number#2\expandafter\expandafter\expandafter!%
- \intcalcShl{#2}!%
- #1!%
+\expandafter\InCa@DivStartII
+\number#2\expandafter\expandafter\expandafter!%
+\intcalcShl{#2}!%
+#1!%
}
\def\InCa@DivStartII#1!#2!{%
- \expandafter\InCa@DivStartIII
- \number#1\expandafter!%
- \number#2\expandafter\expandafter\expandafter!%
- \intcalcShl{#2}!%
+\expandafter\InCa@DivStartIII
+\number#1\expandafter!%
+\number#2\expandafter\expandafter\expandafter!%
+\intcalcShl{#2}!%
}
\def\InCa@DivStartIII#1!#2!#3!{%
- \expandafter\InCa@DivStartIV
- \number#1\expandafter!%
- \number#2\expandafter!%
- \number#3\expandafter!%
- \number\InCa@Add#3!#2!\expandafter\expandafter\expandafter!%
- \intcalcShl{#3}!%
+\expandafter\InCa@DivStartIV
+\number#1\expandafter!%
+\number#2\expandafter!%
+\number#3\expandafter!%
+\number\InCa@Add#3!#2!\expandafter\expandafter\expandafter!%
+\intcalcShl{#3}!%
}
\def\InCa@DivStartIV#1!#2!#3!#4!#5!#6!{%
- \InCa@ProcessDiv#6!#1!#2!#3!#4!#5!/%
+\InCa@ProcessDiv#6!#1!#2!#3!#4!#5!/%
}
\def\InCa@ProcessDiv#1#2#3!#4!#5!#6!#7!#8!#9/{%
- #9%
- \ifnum#1<#4 % 0
- 0%
- \ifx#2=%
- \else
- \InCa@ProcessDiv{#1#2}#3!#4!#5!#6!#7!#8!%
- \fi
- \else % 1-9
- \ifnum#1<#5 % 1
- 1%
- \ifx#2=%
- \else
- \expandafter\InCa@ProcessDiv\expandafter{%
- \number\InCa@Sub#1!#4!%
- #2%
- }#3!#4!#5!#6!#7!#8!%
- \fi
- \else % 2-9
- \ifnum#1<#7 % 2 3 4 5
- \ifnum#1<#6 % 2 3
- \@ReturnAfterElseFi{%
- \expandafter\InCa@@ProcessDiv
- \number\InCa@Sub#1!#5!!%
- 23%
- }%
- \else % 4 5
- \@ReturnAfterFi{%
- \expandafter\InCa@@ProcessDiv
- \number\InCa@Sub#1!#6!!%
- 45%
- }%
- \fi
- #2#3!#4!#5!#6!#7!#8!%
- \else % 6 7 8 9
- \ifnum#1<#8 % 6 7
- \@ReturnAfterElseFi{%
- \expandafter\InCa@@ProcessDiv
- \number\InCa@Sub#1!#7!!%
- 67%
- }%
- \else % 8 9
- \@ReturnAfterFi{%
- \expandafter\InCa@@ProcessDiv
- \number\InCa@Sub#1!#8!!%
- 89%
- }%
- \fi
- #2#3!#4!#5!#6!#7!#8!%
- \fi
- \fi
- \fi
- \ifx#2=%
- \expandafter\@gobble
- \fi
- /%
+#9%
+\ifnum#1<#4 % 0
+ 0%
+\ifx#2=%
+\else
+\InCa@ProcessDiv{#1#2}#3!#4!#5!#6!#7!#8!%
+\fi
+\else % 1-9
+\ifnum#1<#5 % 1
+ 1%
+\ifx#2=%
+\else
+\expandafter\InCa@ProcessDiv\expandafter{%
+\number\InCa@Sub#1!#4!%
+#2%
+}#3!#4!#5!#6!#7!#8!%
+\fi
+\else % 2-9
+\ifnum#1<#7 % 2 3 4 5
+\ifnum#1<#6 % 2 3
+\@ReturnAfterElseFi{%
+\expandafter\InCa@@ProcessDiv
+\number\InCa@Sub#1!#5!!%
+ 23%
+}%
+\else % 4 5
+\@ReturnAfterFi{%
+\expandafter\InCa@@ProcessDiv
+\number\InCa@Sub#1!#6!!%
+ 45%
+}%
+\fi
+#2#3!#4!#5!#6!#7!#8!%
+\else % 6 7 8 9
+\ifnum#1<#8 % 6 7
+\@ReturnAfterElseFi{%
+\expandafter\InCa@@ProcessDiv
+\number\InCa@Sub#1!#7!!%
+ 67%
+}%
+\else % 8 9
+\@ReturnAfterFi{%
+\expandafter\InCa@@ProcessDiv
+\number\InCa@Sub#1!#8!!%
+ 89%
+}%
+\fi
+#2#3!#4!#5!#6!#7!#8!%
+\fi
+\fi
+\fi
+\ifx#2=%
+\expandafter\@gobble
+\fi
+ /%
}
\def\InCa@@ProcessDiv#1!#2#3#4#5!#6!{%
- \ifnum#1<#6 %
- #2%
- \@ReturnAfterElseFi{%
- \ifx#4=%
- \expandafter\InCa@CleanupIV
- \else
- \@ReturnAfterFi{%
- \InCa@ProcessDiv{#1#4}#5!#6!%
- }%
- \fi
- }%
- \else
- #3%
- \@ReturnAfterFi{%
- \ifx#4=%
- \expandafter\InCa@CleanupIV
- \else
- \@ReturnAfterFi{%
- \expandafter\InCa@ProcessDiv\expandafter{%
- \number\InCa@Sub#1!#6! %
- #4%
- }#5!#6!%
- }%
- \fi
- }%
- \fi
+\ifnum#1<#6 %
+#2%
+\@ReturnAfterElseFi{%
+\ifx#4=%
+\expandafter\InCa@CleanupIV
+\else
+\@ReturnAfterFi{%
+\InCa@ProcessDiv{#1#4}#5!#6!%
+}%
+\fi
+}%
+\else
+#3%
+\@ReturnAfterFi{%
+\ifx#4=%
+\expandafter\InCa@CleanupIV
+\else
+\@ReturnAfterFi{%
+\expandafter\InCa@ProcessDiv\expandafter{%
+\number\InCa@Sub#1!#6! %
+#4%
+}#5!#6!%
+}%
+\fi
+}%
+\fi
}
\def\InCa@CleanupIV#1!#2!#3!#4!{}
\def\intcalcMod#1#2{%
- \number\expandafter\InCa@Mod
- \number\number#1\expandafter!%
- \number#2! %
+\number\expandafter\InCa@Mod
+\number\number#1\expandafter!%
+\number#2! %
}
\def\InCa@Mod#1!#2!{%
- \ifcase#2 %
- 0\IntCalcError:DivisionByZero%
- \else
- \ifnum#2<\z@
- -%
- \expandafter\InCa@Mod
- \number-#1\expandafter!%
- \number-#2!%
- \else
- \ifcase#1 %
- 0%
- \else
- \ifcase#2 % 0 already catched
+\ifcase#2 %
+ 0\IntCalcError:DivisionByZero%
+\else
+\ifnum#2<\z@
+ -%
+\expandafter\InCa@Mod
+\number-#1\expandafter!%
+\number-#2!%
+\else
+\ifcase#1 %
+ 0%
+\else
+\ifcase#2 % 0 already catched
? \IntCalcError:ThisCannotHappen%
- \or % 1
- 0%
- \or % 2
- \ifodd#1 1\else 0\fi
- \else
- \ifnum#1<\z@
- \expandafter\InCa@ModShift
- \number-%
- \expandafter\InCa@Sub
- \number\@gobble#1\expandafter!%
- \number\intcalcMul{#2}{%
- \expandafter\InCa@Div\@gobble#1!#2!%
- }!%
- !#2!%
- \else
- \expandafter\InCa@Sub\number#1\expandafter!%
- \number\intcalcMul{#2}{\InCa@Div#1!#2!}!%
- \fi
- \fi
- \fi
- \fi
- \fi
+\or % 1
+ 0%
+\or % 2
+\ifodd#1 1\else 0\fi
+\else
+\ifnum#1<\z@
+\expandafter\InCa@ModShift
+\number-%
+\expandafter\InCa@Sub
+\number\@gobble#1\expandafter!%
+\number\intcalcMul{#2}{%
+\expandafter\InCa@Div\@gobble#1!#2!%
+}!%
+ !#2!%
+\else
+\expandafter\InCa@Sub\number#1\expandafter!%
+\number\intcalcMul{#2}{\InCa@Div#1!#2!}!%
+\fi
+\fi
+\fi
+\fi
+\fi
}
\def\InCa@Temp#1{%
- \def\IntCalcMod##1!##2!{%
- \number
- \ifcase##2 %
- 0\IntCalcError:DivisionByZero%
- \else
- \ifcase##1 %
- 0%
- \else
- \ifcase##2 % 0 already catched
+\def\IntCalcMod##1!##2!{%
+\number
+\ifcase##2 %
+ 0\IntCalcError:DivisionByZero%
+\else
+\ifcase##1 %
+ 0%
+\else
+\ifcase##2 % 0 already catched
? \IntCalcError:ThisCannotHappen
- \or % 1
- 0%
- \or % 2
- \ifodd ##1 1\else 0\fi
- \else
- \expandafter\InCa@Sub\number##1\expandafter!%
- \number\intcalcMul{##2}{\InCa@Div##1!##2!}!%
- \fi
- \fi
- \fi
- #1%
- }%
+\or % 1
+ 0%
+\or % 2
+\ifodd ##1 1\else 0\fi
+\else
+\expandafter\InCa@Sub\number##1\expandafter!%
+\number\intcalcMul{##2}{\InCa@Div##1!##2!}!%
+\fi
+\fi
+\fi
+#1%
+}%
}
\InCa@Temp{ }%
\def\InCa@ModShift#1!#2!{%
- \ifnum#1<\z@
- \expandafter\InCa@Sub\number#2\expandafter!%
- \@gobble#1!%
- \else
- #1%
- \fi
+\ifnum#1<\z@
+\expandafter\InCa@Sub\number#2\expandafter!%
+\@gobble#1!%
+\else
+#1%
+\fi
}
\def\InCa@Empty{}
\expandafter\ifx\csname @gobble\endcsname\relax
- \long\def\@gobble#1{}%
+\long\def\@gobble#1{}%
\fi
\long\def\@ReturnAfterFi#1\fi{\fi#1}%
\long\def\@ReturnAfterElseFi#1\else#2\fi{\fi#1}%
\InCa@AtEnd%
-
-
- \endinput
+\endinput
<hobsub>
\hobsub@StopPackage
\hobsub@StartPackage{ifpdf}
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode123=1 % {
- \catcode125=2 % }
- \expandafter\let\expandafter\x\csname ver@ifpdf.sty\endcsname
- \ifx\x\relax % plain-TeX, first loading
- \else
- \def\empty{}%
- \ifx\x\empty % LaTeX, first loading,
- % variable is initialized, but \ProvidesPackage not yet seen
- \else
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
- \fi
- \x{ifpdf}{The package is already loaded}%
- \aftergroup\endinput
- \fi
- \fi
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\expandafter\let\expandafter\x\csname ver@ifpdf.sty\endcsname
+\ifx\x\relax % plain-TeX, first loading
+\else
+\def\empty{}%
+\ifx\x\empty % LaTeX, first loading,
+% variable is initialized, but \ProvidesPackage not yet seen
+\else
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+\fi
+\x{ifpdf}{The package is already loaded}%
+\aftergroup\endinput
+\fi
+\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode47=12 % /
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode91=12 % [
- \catcode93=12 % ]
- \catcode123=1 % {
- \catcode125=2 % }
- \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
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode47=12 % /
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode91=12 % [
+\catcode93=12 % ]
+\catcode123=1 % {
+\catcode125=2 % }
+\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@ifpdf.sty\endcsname
\ProvidesPackage{ifpdf}%
- [2011/01/30 v2.3 Provides the ifpdf switch (HO)]%
+ [2011/01/30 v2.3 Provides the ifpdf switch (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode123=1 % {
- \catcode125=2 % }
- \catcode64=11 % @
- \def\x{\endgroup
- \expandafter\edef\csname ifpdf@AtEnd\endcsname{%
- \endlinechar=\the\endlinechar\relax
- \catcode13=\the\catcode13\relax
- \catcode32=\the\catcode32\relax
- \catcode35=\the\catcode35\relax
- \catcode61=\the\catcode61\relax
- \catcode64=\the\catcode64\relax
- \catcode123=\the\catcode123\relax
- \catcode125=\the\catcode125\relax
- }%
- }%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode123=1 % {
+\catcode125=2 % }
+\catcode64=11 % @
+\def\x{\endgroup
+\expandafter\edef\csname ifpdf@AtEnd\endcsname{%
+\endlinechar=\the\endlinechar\relax
+\catcode13=\the\catcode13\relax
+\catcode32=\the\catcode32\relax
+\catcode35=\the\catcode35\relax
+\catcode61=\the\catcode61\relax
+\catcode64=\the\catcode64\relax
+\catcode123=\the\catcode123\relax
+\catcode125=\the\catcode125\relax
+}%
+}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
@@ -3439,11 +3440,11 @@ $ \next
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2{%
- \edef\ifpdf@AtEnd{%
- \ifpdf@AtEnd
- \catcode#1=\the\catcode#1\relax
- }%
- \catcode#1=#2\relax
+\edef\ifpdf@AtEnd{%
+\ifpdf@AtEnd
+\catcode#1=\the\catcode#1\relax
+}%
+\catcode#1=#2\relax
}
\TMP@EnsureCode{10}{12}% ^^J
\TMP@EnsureCode{39}{12}% '
@@ -3461,209 +3462,209 @@ $ \next
\TMP@EnsureCode{96}{12}% `
\edef\ifpdf@AtEnd{\ifpdf@AtEnd\noexpand\endinput}
\begingroup
- \expandafter\ifx\csname ifpdf\endcsname\relax
- \else
- \edef\i/{\expandafter\string\csname ifpdf\endcsname}%
- \expandafter\ifx\csname PackageError\endcsname\relax
- \def\x#1#2{%
- \edef\z{#2}%
- \expandafter\errhelp\expandafter{\z}%
- \errmessage{Package ifpdf Error: #1}%
- }%
- \def\y{^^J}%
- \newlinechar=10 %
- \else
- \def\x#1#2{%
- \PackageError{ifpdf}{#1}{#2}%
- }%
- \def\y{\MessageBreak}%
- \fi
- \x{Name clash, \i/ is already defined}{%
- Incompatible versions of \i/ can cause problems,\y
- therefore package loading is aborted.%
- }%
- \endgroup
- \expandafter\ifpdf@AtEnd
- \fi%
+\expandafter\ifx\csname ifpdf\endcsname\relax
+\else
+\edef\i/{\expandafter\string\csname ifpdf\endcsname}%
+\expandafter\ifx\csname PackageError\endcsname\relax
+\def\x#1#2{%
+\edef\z{#2}%
+\expandafter\errhelp\expandafter{\z}%
+\errmessage{Package ifpdf Error: #1}%
+}%
+\def\y{^^J}%
+\newlinechar=10 %
+\else
+\def\x#1#2{%
+\PackageError{ifpdf}{#1}{#2}%
+}%
+\def\y{\MessageBreak}%
+\fi
+\x{Name clash, \i/ is already defined}{%
+ Incompatible versions of \i/ can cause problems,\y
+ therefore package loading is aborted.%
+}%
+\endgroup
+\expandafter\ifpdf@AtEnd
+\fi%
\endgroup
\begingroup
- \def\skip#1\relax\begingroup{}%
- \expandafter\ifx\csname pdfoutput\endcsname\relax
- \else
- \expandafter\skip
- \fi
- \expandafter\ifx\csname directlua\endcsname\relax
- \expandafter\skip
- \fi
+\def\skip#1\relax\begingroup{}%
+\expandafter\ifx\csname pdfoutput\endcsname\relax
+\else
+\expandafter\skip
+\fi
+\expandafter\ifx\csname directlua\endcsname\relax
+\expandafter\skip
+\fi
\endgroup
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname RequirePackage\endcsname\relax
- \def\TMP@RequirePackage#1[#2]{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname ver@#1.sty\endcsname\relax
- \input #1.sty\relax
- \fi
- }%
- \TMP@RequirePackage{ifluatex}[2009/04/10]%
+\def\TMP@RequirePackage#1[#2]{%
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname ver@#1.sty\endcsname\relax
+\input #1.sty\relax
+\fi
+}%
+\TMP@RequirePackage{ifluatex}[2009/04/10]%
\else
- \RequirePackage{ifluatex}[2009/04/10]%
+\RequirePackage{ifluatex}[2009/04/10]%
\fi
\ifluatex
- \ifnum\luatexversion<36 %
- \else
- \begingroup
- \directlua{tex.enableprimitives('ifpdf', {'pdfoutput'})}%
- \global\let\pdfoutput\ifpdfpdfoutput
- \endgroup
- \fi
+\ifnum\luatexversion<36 %
+\else
+\begingroup
+\directlua{tex.enableprimitives('ifpdf', {'pdfoutput'})}%
+\global\let\pdfoutput\ifpdfpdfoutput
+\endgroup
+\fi
\fi
\relax\begingroup\endgroup
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname newif\endcsname\relax
- \edef\pdffalse{%
- \let
- \expandafter\noexpand\csname ifpdf\endcsname
- \expandafter\noexpand\csname iffalse\endcsname
- }%
- \edef\pdftrue{%
- \let
- \expandafter\noexpand\csname ifpdf\endcsname
- \expandafter\noexpand\csname iftrue\endcsname
- }%
- \pdffalse
-\else
- \csname newif\expandafter\endcsname\csname ifpdf\endcsname
+\edef\pdffalse{%
+\let
+\expandafter\noexpand\csname ifpdf\endcsname
+\expandafter\noexpand\csname iffalse\endcsname
+}%
+\edef\pdftrue{%
+\let
+\expandafter\noexpand\csname ifpdf\endcsname
+\expandafter\noexpand\csname iftrue\endcsname
+}%
+\pdffalse
+\else
+\csname newif\expandafter\endcsname\csname ifpdf\endcsname
\fi
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname pdfoutput\endcsname\relax
\else
- \ifnum\pdfoutput<1 %
- \else
- \pdftrue
- \fi
+\ifnum\pdfoutput<1 %
+\else
+\pdftrue
+\fi
\fi
\begingroup
- \expandafter\ifx\csname pdfoutput\endcsname\relax
- \else
- \escapechar=92 %
- \edef\m{\meaning\pdfoutput}%
- \edef\p{\string\pdfoutput}%
- \ifx\m\p
- \else
- \expandafter\ifx\csname PackageWarningNoLine\endcsname\relax
- \def\PackageWarningNoLine#1#2{%
- \immediate\write16{%
- Package `#1' Warning: #2.%
- }%
- }%
- \fi
- \PackageWarningNoLine{ifpdf}{%
- Someone has redefined \string\pdfoutput%
- }%
- \fi
- \fi
+\expandafter\ifx\csname pdfoutput\endcsname\relax
+\else
+\escapechar=92 %
+\edef\m{\meaning\pdfoutput}%
+\edef\p{\string\pdfoutput}%
+\ifx\m\p
+\else
+\expandafter\ifx\csname PackageWarningNoLine\endcsname\relax
+\def\PackageWarningNoLine#1#2{%
+\immediate\write16{%
+ Package `#1' Warning: #2.%
+}%
+}%
+\fi
+\PackageWarningNoLine{ifpdf}{%
+ Someone has redefined \string\pdfoutput%
+}%
+\fi
+\fi
\endgroup
\begingroup
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \let\x\PackageInfo
- \expandafter\let\csname on@line\endcsname\empty
- \fi
- \x{ifpdf}{pdfTeX in PDF mode is \ifpdf\else not \fi detected}%
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\let\x\PackageInfo
+\expandafter\let\csname on@line\endcsname\empty
+\fi
+\x{ifpdf}{pdfTeX in PDF mode is \ifpdf\else not \fi detected}%
\endgroup
\ifpdf@AtEnd%
- \endinput
+\endinput
<hobsub>
\hobsub@StopPackage
\hobsub@StartPackage{etexcmds}
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode123=1 % {
- \catcode125=2 % }
- \expandafter\let\expandafter\x\csname ver@etexcmds.sty\endcsname
- \ifx\x\relax % plain-TeX, first loading
- \else
- \def\empty{}%
- \ifx\x\empty % LaTeX, first loading,
- % variable is initialized, but \ProvidesPackage not yet seen
- \else
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
- \fi
- \x{etexcmds}{The package is already loaded}%
- \aftergroup\endinput
- \fi
- \fi
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\expandafter\let\expandafter\x\csname ver@etexcmds.sty\endcsname
+\ifx\x\relax % plain-TeX, first loading
+\else
+\def\empty{}%
+\ifx\x\empty % LaTeX, first loading,
+% variable is initialized, but \ProvidesPackage not yet seen
+\else
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+\fi
+\x{etexcmds}{The package is already loaded}%
+\aftergroup\endinput
+\fi
+\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode47=12 % /
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode91=12 % [
- \catcode93=12 % ]
- \catcode123=1 % {
- \catcode125=2 % }
- \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
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode47=12 % /
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode91=12 % [
+\catcode93=12 % ]
+\catcode123=1 % {
+\catcode125=2 % }
+\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@etexcmds.sty\endcsname
\ProvidesPackage{etexcmds}%
- [2011/02/16 v1.5 Prefix for e-TeX command names (HO)]%
+ [2011/02/16 v1.5 Prefix for e-TeX command names (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode123=1 % {
- \catcode125=2 % }
- \catcode64=11 % @
- \def\x{\endgroup
- \expandafter\edef\csname etexcmds@AtEnd\endcsname{%
- \endlinechar=\the\endlinechar\relax
- \catcode13=\the\catcode13\relax
- \catcode32=\the\catcode32\relax
- \catcode35=\the\catcode35\relax
- \catcode61=\the\catcode61\relax
- \catcode64=\the\catcode64\relax
- \catcode123=\the\catcode123\relax
- \catcode125=\the\catcode125\relax
- }%
- }%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode123=1 % {
+\catcode125=2 % }
+\catcode64=11 % @
+\def\x{\endgroup
+\expandafter\edef\csname etexcmds@AtEnd\endcsname{%
+\endlinechar=\the\endlinechar\relax
+\catcode13=\the\catcode13\relax
+\catcode32=\the\catcode32\relax
+\catcode35=\the\catcode35\relax
+\catcode61=\the\catcode61\relax
+\catcode64=\the\catcode64\relax
+\catcode123=\the\catcode123\relax
+\catcode125=\the\catcode125\relax
+}%
+}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
@@ -3672,11 +3673,11 @@ $ \next
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2{%
- \edef\etexcmds@AtEnd{%
- \etexcmds@AtEnd
- \catcode#1=\the\catcode#1\relax
- }%
- \catcode#1=#2\relax
+\edef\etexcmds@AtEnd{%
+\etexcmds@AtEnd
+\catcode#1=\the\catcode#1\relax
+}%
+\catcode#1=#2\relax
}
\TMP@EnsureCode{39}{12}% '
\TMP@EnsureCode{40}{12}% (
@@ -3689,230 +3690,230 @@ $ \next
\TMP@EnsureCode{91}{12}% [
\TMP@EnsureCode{93}{12}% ]
\edef\etexcmds@AtEnd{%
- \etexcmds@AtEnd
- \escapechar\the\escapechar\relax
- \noexpand\endinput
+\etexcmds@AtEnd
+\escapechar\the\escapechar\relax
+\noexpand\endinput
}
\escapechar=92 % backslash
\def\etexcmds@newif#1{%
- \expandafter\edef\csname etex@#1false\endcsname{%
- \let
- \expandafter\noexpand\csname ifetex@#1\endcsname
- \noexpand\iffalse
- }%
- \expandafter\edef\csname etex@#1true\endcsname{%
- \let
- \expandafter\noexpand\csname ifetex@#1\endcsname
- \noexpand\iftrue
- }%
- \csname etex@#1false\endcsname
+\expandafter\edef\csname etex@#1false\endcsname{%
+\let
+\expandafter\noexpand\csname ifetex@#1\endcsname
+\noexpand\iffalse
+}%
+\expandafter\edef\csname etex@#1true\endcsname{%
+\let
+\expandafter\noexpand\csname ifetex@#1\endcsname
+\noexpand\iftrue
+}%
+\csname etex@#1false\endcsname
}
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname RequirePackage\endcsname\relax
- \def\TMP@RequirePackage#1[#2]{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname ver@#1.sty\endcsname\relax
- \input #1.sty\relax
- \fi
- }%
- \TMP@RequirePackage{infwarerr}[2007/09/09]%
- \TMP@RequirePackage{ifluatex}[2010/03/01]%
-\else
- \RequirePackage{infwarerr}[2007/09/09]%
- \RequirePackage{ifluatex}[2010/03/01]%
+\def\TMP@RequirePackage#1[#2]{%
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname ver@#1.sty\endcsname\relax
+\input #1.sty\relax
+\fi
+}%
+\TMP@RequirePackage{infwarerr}[2007/09/09]%
+\TMP@RequirePackage{ifluatex}[2010/03/01]%
+\else
+\RequirePackage{infwarerr}[2007/09/09]%
+\RequirePackage{ifluatex}[2010/03/01]%
\fi
\etexcmds@newif{unexpanded}
\begingroup
\edef\x{\string\unexpanded}%
\edef\y{\meaning\unexpanded}%
\ifx\x\y
- \endgroup
- \let\etex@unexpanded\unexpanded
- \etex@unexpandedtrue
-\else
- \edef\y{\meaning\normalunexpanded}%
- \ifx\x\y
- \endgroup
- \let\etex@unexpanded\normalunexpanded
- \etex@unexpandedtrue
- \else
- \edef\y{\meaning\@@unexpanded}%
- \ifx\x\y
- \endgroup
- \let\etex@unexpanded\@@unexpanded
- \etex@unexpandedtrue
- \else
- \ifluatex
- \ifnum\luatexversion<36 %
- \else
- \begingroup
- \directlua{%
- tex.enableprimitives('etex@',{'unexpanded'})%
- }%
- \global\let\etex@unexpanded\etex@unexpanded
- \endgroup
- \fi
- \fi
- \edef\y{\meaning\etex@unexpanded}%
- \ifx\x\y
- \endgroup
- \etex@unexpandedtrue
- \else
- \endgroup
- \@PackageInfoNoLine{etexcmds}{%
- Could not find \string\unexpanded.\MessageBreak
- That can mean that you are not using e-TeX or%
- \MessageBreak
- that some package has redefined \string\unexpanded.%
- \MessageBreak
- In the latter case, load this package earlier%
- }%
- \etex@unexpandedfalse
- \fi
- \fi
- \fi
+\endgroup
+\let\etex@unexpanded\unexpanded
+\etex@unexpandedtrue
+\else
+\edef\y{\meaning\normalunexpanded}%
+\ifx\x\y
+\endgroup
+\let\etex@unexpanded\normalunexpanded
+\etex@unexpandedtrue
+\else
+\edef\y{\meaning\@@unexpanded}%
+\ifx\x\y
+\endgroup
+\let\etex@unexpanded\@@unexpanded
+\etex@unexpandedtrue
+\else
+\ifluatex
+\ifnum\luatexversion<36 %
+\else
+\begingroup
+\directlua{%
+ tex.enableprimitives('etex@',{'unexpanded'})%
+}%
+\global\let\etex@unexpanded\etex@unexpanded
+\endgroup
+\fi
+\fi
+\edef\y{\meaning\etex@unexpanded}%
+\ifx\x\y
+\endgroup
+\etex@unexpandedtrue
+\else
+\endgroup
+\@PackageInfoNoLine{etexcmds}{%
+ Could not find \string\unexpanded.\MessageBreak
+ That can mean that you are not using e-TeX or%
+\MessageBreak
+ that some package has redefined \string\unexpanded.%
+\MessageBreak
+ In the latter case, load this package earlier%
+}%
+\etex@unexpandedfalse
+\fi
+\fi
+\fi
\fi
\etexcmds@newif{expanded}
\begingroup
\edef\x{\string\expanded}%
\edef\y{\meaning\expanded}%
\ifx\x\y
- \endgroup
- \let\etex@expanded\expanded
- \etex@expandedtrue
-\else
- \edef\y{\meaning\normalexpanded}%
- \ifx\x\y
- \endgroup
- \let\etex@expanded\normalexpanded
- \etex@expandedtrue
- \else
- \edef\y{\meaning\@@expanded}%
- \ifx\x\y
- \endgroup
- \let\etex@expanded\@@expanded
- \etex@expandedtrue
- \else
- \ifluatex
- \ifnum\luatexversion<36 %
- \else
- \begingroup
- \directlua{%
- tex.enableprimitives('etex@',{'expanded'})%
- }%
- \global\let\etex@expanded\etex@expanded
- \endgroup
- \fi
- \fi
- \edef\y{\meaning\etex@expanded}%
- \ifx\x\y
- \endgroup
- \etex@expandedtrue
- \else
- \endgroup
- \@PackageInfoNoLine{etexcmds}{%
- Could not find \string\expanded.\MessageBreak
- That can mean that you are not using pdfTeX 1.50 or%
- \MessageBreak
- that some package has redefined \string\expanded.%
- \MessageBreak
- In the latter case, load this package earlier%
- }%
- \etex@expandedfalse
- \fi
- \fi
- \fi
+\endgroup
+\let\etex@expanded\expanded
+\etex@expandedtrue
+\else
+\edef\y{\meaning\normalexpanded}%
+\ifx\x\y
+\endgroup
+\let\etex@expanded\normalexpanded
+\etex@expandedtrue
+\else
+\edef\y{\meaning\@@expanded}%
+\ifx\x\y
+\endgroup
+\let\etex@expanded\@@expanded
+\etex@expandedtrue
+\else
+\ifluatex
+\ifnum\luatexversion<36 %
+\else
+\begingroup
+\directlua{%
+ tex.enableprimitives('etex@',{'expanded'})%
+}%
+\global\let\etex@expanded\etex@expanded
+\endgroup
+\fi
+\fi
+\edef\y{\meaning\etex@expanded}%
+\ifx\x\y
+\endgroup
+\etex@expandedtrue
+\else
+\endgroup
+\@PackageInfoNoLine{etexcmds}{%
+ Could not find \string\expanded.\MessageBreak
+ That can mean that you are not using pdfTeX 1.50 or%
+\MessageBreak
+ that some package has redefined \string\expanded.%
+\MessageBreak
+ In the latter case, load this package earlier%
+}%
+\etex@expandedfalse
+\fi
+\fi
+\fi
\fi
\etexcmds@AtEnd%
- \endinput
+\endinput
<hobsub>
\hobsub@StopPackage
\hobsub@StartPackage{kvsetkeys}
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode123=1 % {
- \catcode125=2 % }
- \expandafter\let\expandafter\x\csname ver@kvsetkeys.sty\endcsname
- \ifx\x\relax % plain-TeX, first loading
- \else
- \def\empty{}%
- \ifx\x\empty % LaTeX, first loading,
- % variable is initialized, but \ProvidesPackage not yet seen
- \else
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
- \fi
- \x{kvsetkeys}{The package is already loaded}%
- \aftergroup\endinput
- \fi
- \fi
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\expandafter\let\expandafter\x\csname ver@kvsetkeys.sty\endcsname
+\ifx\x\relax % plain-TeX, first loading
+\else
+\def\empty{}%
+\ifx\x\empty % LaTeX, first loading,
+% variable is initialized, but \ProvidesPackage not yet seen
+\else
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+\fi
+\x{kvsetkeys}{The package is already loaded}%
+\aftergroup\endinput
+\fi
+\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode47=12 % /
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode91=12 % [
- \catcode93=12 % ]
- \catcode123=1 % {
- \catcode125=2 % }
- \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
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode47=12 % /
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode91=12 % [
+\catcode93=12 % ]
+\catcode123=1 % {
+\catcode125=2 % }
+\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@kvsetkeys.sty\endcsname
\ProvidesPackage{kvsetkeys}%
- [2011/04/07 v1.13 Key value parser (HO)]%
+ [2011/04/07 v1.13 Key value parser (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode123=1 % {
- \catcode125=2 % }
- \catcode64=11 % @
- \def\x{\endgroup
- \expandafter\edef\csname KVS@AtEnd\endcsname{%
- \endlinechar=\the\endlinechar\relax
- \catcode13=\the\catcode13\relax
- \catcode32=\the\catcode32\relax
- \catcode35=\the\catcode35\relax
- \catcode61=\the\catcode61\relax
- \catcode64=\the\catcode64\relax
- \catcode123=\the\catcode123\relax
- \catcode125=\the\catcode125\relax
- }%
- }%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode123=1 % {
+\catcode125=2 % }
+\catcode64=11 % @
+\def\x{\endgroup
+\expandafter\edef\csname KVS@AtEnd\endcsname{%
+\endlinechar=\the\endlinechar\relax
+\catcode13=\the\catcode13\relax
+\catcode32=\the\catcode32\relax
+\catcode35=\the\catcode35\relax
+\catcode61=\the\catcode61\relax
+\catcode64=\the\catcode64\relax
+\catcode123=\the\catcode123\relax
+\catcode125=\the\catcode125\relax
+}%
+}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
@@ -3921,11 +3922,11 @@ $ \next
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2{%
- \edef\KVS@AtEnd{%
- \KVS@AtEnd
- \catcode#1=\the\catcode#1\relax
- }%
- \catcode#1=#2\relax
+\edef\KVS@AtEnd{%
+\KVS@AtEnd
+\catcode#1=\the\catcode#1\relax
+}%
+\catcode#1=#2\relax
}
\TMP@EnsureCode{36}{3}% $
\TMP@EnsureCode{38}{4}% &
@@ -3941,36 +3942,36 @@ $ \next
\edef\KVS@AtEnd{\KVS@AtEnd\noexpand\endinput}
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname RequirePackage\endcsname\relax
- \def\TMP@RequirePackage#1[#2]{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname ver@#1.sty\endcsname\relax
- \input #1.sty\relax
- \fi
- }%
- \TMP@RequirePackage{infwarerr}[2007/09/09]%
- \TMP@RequirePackage{etexcmds}[2010/01/28]%
-\else
- \RequirePackage{infwarerr}[2007/09/09]%
- \RequirePackage{etexcmds}[2010/01/28]%
+\def\TMP@RequirePackage#1[#2]{%
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname ver@#1.sty\endcsname\relax
+\input #1.sty\relax
+\fi
+}%
+\TMP@RequirePackage{infwarerr}[2007/09/09]%
+\TMP@RequirePackage{etexcmds}[2010/01/28]%
+\else
+\RequirePackage{infwarerr}[2007/09/09]%
+\RequirePackage{etexcmds}[2010/01/28]%
\fi
\expandafter\ifx\csname toks@\endcsname\relax
- \toksdef\toks@=0 %
+\toksdef\toks@=0 %
\fi
\begingroup\expandafter\endgroup
\ifcase0\ifetex@unexpanded
- \expandafter\ifx\csname ifcsname\endcsname\relax
- \else
- \expandafter\ifx\csname unless\endcsname\relax
- \else
- 1%
- \fi
- \fi
- \fi
- \catcode`\$=9 % ignore
- \catcode`\&=14 % comment
+\expandafter\ifx\csname ifcsname\endcsname\relax
+\else
+\expandafter\ifx\csname unless\endcsname\relax
+\else
+ 1%
+\fi
+\fi
+\fi
+\catcode`\$=9 % ignore
+\catcode`\&=14 % comment
\else % e-TeX
- \catcode`\$=14 % comment
- \catcode`\&=9 % ignore
+\catcode`\$=14 % comment
+\catcode`\&=9 % ignore
\fi
\def\KVS@Empty{}
\long\def\KVS@FirstOfTwo#1#2{#1}
@@ -3981,160 +3982,160 @@ $ \begingroup
$ \toks@{#1}%
$ \edef\KVS@Temp{\the\toks@}%
$ \expandafter\endgroup
- \ifx\KVS@Temp\KVS@Empty
- \expandafter\KVS@FirstOfTwo
- \else
- \expandafter\KVS@SecondOfTwo
- \fi
+\ifx\KVS@Temp\KVS@Empty
+\expandafter\KVS@FirstOfTwo
+\else
+\expandafter\KVS@SecondOfTwo
+\fi
}
\long\def\kv@normalize#1{%
- \begingroup
- \toks@{,#1,}%
- \KVS@Comma
- \KVS@SpaceComma{ }%
- \KVS@CommaSpace
- \KVS@CommaComma
- \KVS@Equals
- \KVS@SpaceEquals{ }%
- \KVS@EqualsSpace
- \xdef\KVS@Global{\the\toks@}%
- \endgroup
- \let\kv@list\KVS@Global
+\begingroup
+\toks@{,#1,}%
+\KVS@Comma
+\KVS@SpaceComma{ }%
+\KVS@CommaSpace
+\KVS@CommaComma
+\KVS@Equals
+\KVS@SpaceEquals{ }%
+\KVS@EqualsSpace
+\xdef\KVS@Global{\the\toks@}%
+\endgroup
+\let\kv@list\KVS@Global
}
\def\comma@normalize#1{%
- \begingroup
- \toks@{,#1,}%
- \KVS@Comma
- \KVS@SpaceComma{ }%
- \KVS@CommaSpace
- \KVS@CommaComma
- \xdef\KVS@Global{\the\toks@}%
- \endgroup
- \let\comma@list\KVS@Global
+\begingroup
+\toks@{,#1,}%
+\KVS@Comma
+\KVS@SpaceComma{ }%
+\KVS@CommaSpace
+\KVS@CommaComma
+\xdef\KVS@Global{\the\toks@}%
+\endgroup
+\let\comma@list\KVS@Global
}
\begingroup
- \lccode`\,=`\,%
- \lccode`\~=`\,%
+\lccode`\,=`\,%
+\lccode`\~=`\,%
\lowercase{\endgroup
- \def\KVS@Comma{%
- \toks@\expandafter{\expandafter}\expandafter
- \KVS@@Comma\the\toks@~\KVS@Nil
- }%
- \long\def\KVS@@Comma#1~#2\KVS@Nil{%
- \toks@\expandafter{\the\toks@#1}%
- \KVS@IfEmpty{#2}{%
- }{%
- \KVS@@Comma,#2\KVS@Nil
- }%
- }%
+\def\KVS@Comma{%
+\toks@\expandafter{\expandafter}\expandafter
+\KVS@@Comma\the\toks@~\KVS@Nil
+}%
+\long\def\KVS@@Comma#1~#2\KVS@Nil{%
+\toks@\expandafter{\the\toks@#1}%
+\KVS@IfEmpty{#2}{%
+}{%
+\KVS@@Comma,#2\KVS@Nil
+}%
+}%
}
\long\def\KVS@SpaceComma#1{%
- \expandafter\KVS@@SpaceComma\the\toks@#1,\KVS@Nil
+\expandafter\KVS@@SpaceComma\the\toks@#1,\KVS@Nil
}
\long\def\KVS@@SpaceComma#1 ,#2\KVS@Nil{%
- \KVS@IfEmpty{#2}{%
- \toks@{#1}%
- }{%
- \toks@{#1,#2}%
- \expandafter\KVS@@SpaceComma\the\toks@\KVS@Nil
- }%
+\KVS@IfEmpty{#2}{%
+\toks@{#1}%
+}{%
+\toks@{#1,#2}%
+\expandafter\KVS@@SpaceComma\the\toks@\KVS@Nil
+}%
}
\def\KVS@CommaSpace{%
- \expandafter\KVS@@CommaSpace\the\toks@, \KVS@Nil
+\expandafter\KVS@@CommaSpace\the\toks@, \KVS@Nil
}
\long\def\KVS@@CommaSpace#1, #2\KVS@Nil{%
- \KVS@IfEmpty{#2}{%
- \toks@{#1}%
- }{%
- \toks@{#1,#2}%
- \expandafter\KVS@@CommaSpace\the\toks@\KVS@Nil
- }%
+\KVS@IfEmpty{#2}{%
+\toks@{#1}%
+}{%
+\toks@{#1,#2}%
+\expandafter\KVS@@CommaSpace\the\toks@\KVS@Nil
+}%
}
\def\KVS@CommaComma{%
- \expandafter\KVS@@CommaComma\the\toks@,\KVS@Nil
+\expandafter\KVS@@CommaComma\the\toks@,\KVS@Nil
}
\long\def\KVS@@CommaComma#1,,#2\KVS@Nil{%
- \toks@{#1,#2}%
- \KVS@IfEmpty{#2}{%
- }{%
- \expandafter\KVS@@CommaComma\the\toks@\KVS@Nil
- }%
+\toks@{#1,#2}%
+\KVS@IfEmpty{#2}{%
+}{%
+\expandafter\KVS@@CommaComma\the\toks@\KVS@Nil
+}%
}
\begingroup
- \lccode`\==`\=%
- \lccode`\~=`\=%
+\lccode`\==`\=%
+\lccode`\~=`\=%
\lowercase{\endgroup
- \def\KVS@Equals{%
- \toks@\expandafter{\expandafter}\expandafter
- \KVS@@Equals\the\toks@~\KVS@Nil
- }%
- \long\def\KVS@@Equals#1~#2\KVS@Nil{%
- \edef\KVS@Temp{\the\toks@}%
- \ifx\KVS@Temp\KVS@Empty
- \expandafter\KVS@FirstOfTwo
- \else
- \expandafter\KVS@SecondOfTwo
- \fi
- {%
- \toks@{#1}%
- }{%
- \toks@\expandafter{\the\toks@=#1}%
- }%
- \KVS@IfEmpty{#2}{%
- }{%
- \KVS@@Equals#2\KVS@Nil
- }%
- }%
+\def\KVS@Equals{%
+\toks@\expandafter{\expandafter}\expandafter
+\KVS@@Equals\the\toks@~\KVS@Nil
+}%
+\long\def\KVS@@Equals#1~#2\KVS@Nil{%
+\edef\KVS@Temp{\the\toks@}%
+\ifx\KVS@Temp\KVS@Empty
+\expandafter\KVS@FirstOfTwo
+\else
+\expandafter\KVS@SecondOfTwo
+\fi
+{%
+\toks@{#1}%
+}{%
+\toks@\expandafter{\the\toks@=#1}%
+}%
+\KVS@IfEmpty{#2}{%
+}{%
+\KVS@@Equals#2\KVS@Nil
+}%
+}%
}
\long\def\KVS@SpaceEquals#1{%
- \expandafter\KVS@@SpaceEquals\the\toks@#1=\KVS@Nil
+\expandafter\KVS@@SpaceEquals\the\toks@#1=\KVS@Nil
}
\long\def\KVS@@SpaceEquals#1 =#2\KVS@Nil{%
- \KVS@IfEmpty{#2}{%
- \toks@{#1}%
- }{%
- \toks@{#1=#2}%
- \expandafter\KVS@@SpaceEquals\the\toks@\KVS@Nil
- }%
+\KVS@IfEmpty{#2}{%
+\toks@{#1}%
+}{%
+\toks@{#1=#2}%
+\expandafter\KVS@@SpaceEquals\the\toks@\KVS@Nil
+}%
}
\def\KVS@EqualsSpace{%
- \expandafter\KVS@@EqualsSpace\the\toks@= \KVS@Nil
+\expandafter\KVS@@EqualsSpace\the\toks@= \KVS@Nil
}
\long\def\KVS@@EqualsSpace#1= #2\KVS@Nil{%
- \KVS@IfEmpty{#2}{%
- \toks@{#1}%
- }{%
- \toks@{#1=#2}%
- \expandafter\KVS@@EqualsSpace\the\toks@\KVS@Nil
- }%
+\KVS@IfEmpty{#2}{%
+\toks@{#1}%
+}{%
+\toks@{#1=#2}%
+\expandafter\KVS@@EqualsSpace\the\toks@\KVS@Nil
+}%
}
\long\def\kv@parse#1{%
- \kv@normalize{#1}%
- \expandafter\kv@parse@normalized\expandafter{\kv@list}%
+\kv@normalize{#1}%
+\expandafter\kv@parse@normalized\expandafter{\kv@list}%
}
\long\def\kv@parse@normalized#1#2{%
- \KVS@Parse#1,\KVS@Nil{#2}%
+\KVS@Parse#1,\KVS@Nil{#2}%
}
\long\def\KVS@Parse#1,#2\KVS@Nil#3{%
- \KVS@IfEmpty{#1}{%
- }{%
- \KVS@Process#1=\KVS@Nil{#3}%
- }%
- \KVS@MaybeBreak
- \KVS@IfEmpty{#2}{%
- }{%
- \KVS@Parse#2\KVS@Nil{#3}%
- }%
+\KVS@IfEmpty{#1}{%
+}{%
+\KVS@Process#1=\KVS@Nil{#3}%
+}%
+\KVS@MaybeBreak
+\KVS@IfEmpty{#2}{%
+}{%
+\KVS@Parse#2\KVS@Nil{#3}%
+}%
}
\long\def\KVS@Process#1=#2\KVS@Nil#3{%
- \let\KVS@MaybeBreak\relax
- \def\kv@key{#1}%
- \KVS@IfEmpty{#2}{%
- \let\kv@value\relax
- #3{#1}{}%
- }{%
- \KVS@@Process{#1}#2\KVS@Nil{#3}%
- }%
+\let\KVS@MaybeBreak\relax
+\def\kv@key{#1}%
+\KVS@IfEmpty{#2}{%
+\let\kv@value\relax
+#3{#1}{}%
+}{%
+\KVS@@Process{#1}#2\KVS@Nil{#3}%
+}%
}
\long\def\KVS@@Process#1#2=\KVS@Nil#3{%
& \edef\kv@value{\etex@unexpanded{#2}}%
@@ -4143,45 +4144,45 @@ $ \toks@{#2}%
$ \xdef\KVS@Global{\the\toks@}%
$ \endgroup
$ \let\kv@value\KVS@Global
- #3{#1}{#2}%
+#3{#1}{#2}%
}
\let\KVS@MaybeBreak\relax
\def\KVS@break#1#2#3#4{%
- \let\KVS@MaybeBreak\relax
+\let\KVS@MaybeBreak\relax
}
\def\kv@break{%
- \let\KVS@MaybeBreak\KVS@break
+\let\KVS@MaybeBreak\KVS@break
}
\def\comma@parse#1{%
- \comma@normalize{#1}%
- \expandafter\comma@parse@normalized\expandafter{\comma@list}%
+\comma@normalize{#1}%
+\expandafter\comma@parse@normalized\expandafter{\comma@list}%
}
\def\comma@parse@normalized#1#2{%
- \KVS@CommaParse#1,\KVS@Nil{#2}%
+\KVS@CommaParse#1,\KVS@Nil{#2}%
}
\def\KVS@CommaParse#1,#2\KVS@Nil#3{%
- \KVS@IfEmpty{#1}{%
- }{%
- \def\comma@entry{#1}%
- #3{#1}%
- }%
- \KVS@MaybeBreak
- \KVS@IfEmpty{#2}{%
- }{%
- \KVS@CommaParse#2\KVS@Nil{#3}%
- }%
+\KVS@IfEmpty{#1}{%
+}{%
+\def\comma@entry{#1}%
+#3{#1}%
+}%
+\KVS@MaybeBreak
+\KVS@IfEmpty{#2}{%
+}{%
+\KVS@CommaParse#2\KVS@Nil{#3}%
+}%
}
\def\comma@break{%
- \let\KVS@MaybeBreak\KVS@break
+\let\KVS@MaybeBreak\KVS@break
}
\def\kv@processor@default#1#2{%
- \begingroup
- \csname @safe@activestrue\endcsname
- \let\ifincsname\iftrue
- \edef\KVS@temp{\endgroup
- \noexpand\KVS@ProcessorDefault{#1}{#2}%
- }%
- \KVS@temp
+\begingroup
+\csname @safe@activestrue\endcsname
+\let\ifincsname\iftrue
+\edef\KVS@temp{\endgroup
+\noexpand\KVS@ProcessorDefault{#1}{#2}%
+}%
+\KVS@temp
}
\long\def\KVS@ProcessorDefault#1#2#3{%
& \unless\ifcsname KV@#1@#2\endcsname
@@ -4190,142 +4191,142 @@ $ \expandafter\ifx\csname KV@#1@#2\endcsname\relax
& \unless\ifcsname KVS@#1@handler\endcsname
$ \begingroup\expandafter\expandafter\expandafter\endgroup
$ \expandafter\ifx\csname KVS@#1@handler\endcsname\relax
- \kv@error@unknownkey{#1}{#2}%
- \else
- \csname KVS@#1@handler\endcsname{#2}{#3}%
- \relax
- \fi
- \else
- \ifx\kv@value\relax
+\kv@error@unknownkey{#1}{#2}%
+\else
+\csname KVS@#1@handler\endcsname{#2}{#3}%
+\relax
+\fi
+\else
+\ifx\kv@value\relax
& \unless\ifcsname KV@#1@#2@default\endcsname
$ \begingroup\expandafter\expandafter\expandafter\endgroup
$ \expandafter\ifx\csname KV@#1@#2@default\endcsname\relax
- \kv@error@novalue{#1}{#2}%
- \else
- \csname KV@#1@#2@default\endcsname
- \relax
- \fi
- \else
- \csname KV@#1@#2\endcsname{#3}%
- \fi
- \fi
+\kv@error@novalue{#1}{#2}%
+\else
+\csname KV@#1@#2@default\endcsname
+\relax
+\fi
+\else
+\csname KV@#1@#2\endcsname{#3}%
+\fi
+\fi
}
\long\def\kv@set@family@handler#1#2{%
- \begingroup
- \csname @safe@activestrue\endcsname
- \let\ifincsname\iftrue
- \expandafter\endgroup
- \expandafter\def\csname KVS@#1@handler\endcsname##1##2{#2}%
+\begingroup
+\csname @safe@activestrue\endcsname
+\let\ifincsname\iftrue
+\expandafter\endgroup
+\expandafter\def\csname KVS@#1@handler\endcsname##1##2{#2}%
}
\def\kv@error@novalue{%
- \kv@error@generic{No value specified for}%
+\kv@error@generic{No value specified for}%
}
\def\kv@error@unknownkey{%
- \kv@error@generic{Undefined}%
+\kv@error@generic{Undefined}%
}
\def\kv@error@generic#1#2#3{%
- \@PackageError{kvsetkeys}{%
- #1 key `#3'%
- }{%
- The keyval family of the key `#3' is `#2'.\MessageBreak
- The setting of the key is ignored because of the error.\MessageBreak
- \MessageBreak
- \@ehc
- }%
+\@PackageError{kvsetkeys}{%
+#1 key `#3'%
+}{%
+ The keyval family of the key `#3' is `#2'.\MessageBreak
+ The setting of the key is ignored because of the error.\MessageBreak
+\MessageBreak
+\@ehc
+}%
}
\long\def\kvsetkeys#1#2{%
- \kv@parse{#2}{\kv@processor@default{#1}}%
+\kv@parse{#2}{\kv@processor@default{#1}}%
}
\KVS@AtEnd%
- \endinput
+\endinput
<hobsub>
\hobsub@StopPackage
\hobsub@StartPackage{kvdefinekeys}
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode123=1 % {
- \catcode125=2 % }
- \expandafter\let\expandafter\x\csname ver@kvdefinekeys.sty\endcsname
- \ifx\x\relax % plain-TeX, first loading
- \else
- \def\empty{}%
- \ifx\x\empty % LaTeX, first loading,
- % variable is initialized, but \ProvidesPackage not yet seen
- \else
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
- \fi
- \x{kvdefinekeys}{The package is already loaded}%
- \aftergroup\endinput
- \fi
- \fi
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\expandafter\let\expandafter\x\csname ver@kvdefinekeys.sty\endcsname
+\ifx\x\relax % plain-TeX, first loading
+\else
+\def\empty{}%
+\ifx\x\empty % LaTeX, first loading,
+% variable is initialized, but \ProvidesPackage not yet seen
+\else
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+\fi
+\x{kvdefinekeys}{The package is already loaded}%
+\aftergroup\endinput
+\fi
+\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode47=12 % /
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode91=12 % [
- \catcode93=12 % ]
- \catcode123=1 % {
- \catcode125=2 % }
- \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
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode47=12 % /
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode91=12 % [
+\catcode93=12 % ]
+\catcode123=1 % {
+\catcode125=2 % }
+\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@kvdefinekeys.sty\endcsname
\ProvidesPackage{kvdefinekeys}%
- [2011/04/07 v1.3 Defining keys (HO)]%
+ [2011/04/07 v1.3 Defining keys (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode123=1 % {
- \catcode125=2 % }
- \catcode64=11 % @
- \def\x{\endgroup
- \expandafter\edef\csname KVD@AtEnd\endcsname{%
- \endlinechar=\the\endlinechar\relax
- \catcode13=\the\catcode13\relax
- \catcode32=\the\catcode32\relax
- \catcode35=\the\catcode35\relax
- \catcode61=\the\catcode61\relax
- \catcode64=\the\catcode64\relax
- \catcode123=\the\catcode123\relax
- \catcode125=\the\catcode125\relax
- }%
- }%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode123=1 % {
+\catcode125=2 % }
+\catcode64=11 % @
+\def\x{\endgroup
+\expandafter\edef\csname KVD@AtEnd\endcsname{%
+\endlinechar=\the\endlinechar\relax
+\catcode13=\the\catcode13\relax
+\catcode32=\the\catcode32\relax
+\catcode35=\the\catcode35\relax
+\catcode61=\the\catcode61\relax
+\catcode64=\the\catcode64\relax
+\catcode123=\the\catcode123\relax
+\catcode125=\the\catcode125\relax
+}%
+}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
@@ -4334,11 +4335,11 @@ $ \expandafter\ifx\csname KV@#1@#2@default\endcsname\relax
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2{%
- \edef\KVD@AtEnd{%
- \KVD@AtEnd
- \catcode#1=\the\catcode#1\relax
- }%
- \catcode#1=#2\relax
+\edef\KVD@AtEnd{%
+\KVD@AtEnd
+\catcode#1=\the\catcode#1\relax
+}%
+\catcode#1=#2\relax
}
\TMP@EnsureCode{42}{12}% *
\TMP@EnsureCode{46}{12}% .
@@ -4348,247 +4349,247 @@ $ \expandafter\ifx\csname KV@#1@#2@default\endcsname\relax
\edef\KVD@AtEnd{\KVD@AtEnd\noexpand\endinput}
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname RequirePackage\endcsname\relax
- \def\TMP@RequirePackage#1[#2]{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname ver@#1.sty\endcsname\relax
- \input #1.sty\relax
- \fi
- }%
- \TMP@RequirePackage{ltxcmds}[2010/03/01]%
+\def\TMP@RequirePackage#1[#2]{%
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname ver@#1.sty\endcsname\relax
+\input #1.sty\relax
+\fi
+}%
+\TMP@RequirePackage{ltxcmds}[2010/03/01]%
\else
- \RequirePackage{ltxcmds}[2010/03/01]%
+\RequirePackage{ltxcmds}[2010/03/01]%
\fi
\ltx@IfUndefined{protected}{%
- \ltx@IfUndefined{DeclareRobustCommand}{%
- \def\kv@define@key#1#2%
- }{%
- \DeclareRobustCommand*{\kv@define@key}[2]%
- }%
+\ltx@IfUndefined{DeclareRobustCommand}{%
+\def\kv@define@key#1#2%
}{%
- \protected\def\kv@define@key#1#2%
+\DeclareRobustCommand*{\kv@define@key}[2]%
+}%
+}{%
+\protected\def\kv@define@key#1#2%
}%
{%
- \begingroup
- \csname @safe@activestrue\endcsname
- \let\ifincsname\iftrue
- \edef\KVD@temp{\endgroup
- \noexpand\KVD@DefineKey{#1}{#2}%
- }%
- \KVD@temp
+\begingroup
+\csname @safe@activestrue\endcsname
+\let\ifincsname\iftrue
+\edef\KVD@temp{\endgroup
+\noexpand\KVD@DefineKey{#1}{#2}%
+}%
+\KVD@temp
}
\def\KVD@DefineKey#1#2{%
- \ltx@ifnextchar[{%
- \KVD@DefineKeyWithDefault{#1}{#2}%
- }{%
- \long\expandafter\def\csname KV@#1@#2\endcsname##1%
- }%
+\ltx@ifnextchar[{%
+\KVD@DefineKeyWithDefault{#1}{#2}%
+}{%
+\long\expandafter\def\csname KV@#1@#2\endcsname##1%
+}%
}
\long\def\KVD@DefineKeyWithDefault#1#2[#3]{%
- \expandafter\def\csname KV@#1@#2@default\expandafter\endcsname
- \expandafter{%
- \csname KV@#1@#2\endcsname{#3}%
- }%
- \long\expandafter\def\csname KV@#1@#2\endcsname##1%
+\expandafter\def\csname KV@#1@#2@default\expandafter\endcsname
+\expandafter{%
+\csname KV@#1@#2\endcsname{#3}%
+}%
+\long\expandafter\def\csname KV@#1@#2\endcsname##1%
}
\KVD@AtEnd%
- \endinput
+\endinput
<hobsub>
\hobsub@StopPackage
\ifluatex
\else
- \expandafter\hobsub@GobbleRemainingPackage
+\expandafter\hobsub@GobbleRemainingPackage
\fi
\hobsub@StartPackage{luatex-loader}
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode123=1 % {
- \catcode125=2 % }
- \expandafter\let\expandafter\x\csname ver@luatex-loader.sty\endcsname
- \ifx\x\relax % plain-TeX, first loading
- \else
- \def\empty{}%
- \ifx\x\empty % LaTeX, first loading,
- % variable is initialized, but \ProvidesPackage not yet seen
- \else
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
- \fi
- \x{luatex-loader}{The package is already loaded}%
- \aftergroup\endinput
- \fi
- \fi
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\expandafter\let\expandafter\x\csname ver@luatex-loader.sty\endcsname
+\ifx\x\relax % plain-TeX, first loading
+\else
+\def\empty{}%
+\ifx\x\empty % LaTeX, first loading,
+% variable is initialized, but \ProvidesPackage not yet seen
+\else
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+\fi
+\x{luatex-loader}{The package is already loaded}%
+\aftergroup\endinput
+\fi
+\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode47=12 % /
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode91=12 % [
- \catcode93=12 % ]
- \catcode123=1 % {
- \catcode125=2 % }
- \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
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode47=12 % /
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode91=12 % [
+\catcode93=12 % ]
+\catcode123=1 % {
+\catcode125=2 % }
+\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@luatex-loader.sty\endcsname
\ProvidesPackage{luatex-loader}%
- [2010/03/09 v0.4 Lua module loader (HO)]%
+ [2010/03/09 v0.4 Lua module loader (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5\endlinechar=13\relax%
- \catcode10=12 % ^^J
- \catcode34=12 % "
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode46=12 % .
- \catcode60=12 % <
- \catcode61=12 % =
- \catcode95=12 % _ (other!)
- \catcode96=12 % `
- \catcode123=1 % {
- \catcode125=2 % }
- \endlinechar=10 %
- \ifnum\luatexversion<36 %
- \directlua0%
- \else %
- \expandafter\directlua %
- \fi %
- {%
- do
- local script = "oberdiek.luatex.lua"
- local file = kpse.find_file(script, "texmfscripts")
- if file then
- texio.write_nl("(" .. file .. ")")
- dofile(file)
- else
- error("File `" .. script .. "' not found")
- end
- end
- }%
+\catcode13=5\endlinechar=13\relax%
+\catcode10=12 % ^^J
+\catcode34=12 % "
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode46=12 % .
+\catcode60=12 % <
+\catcode61=12 % =
+\catcode95=12 % _ (other!)
+\catcode96=12 % `
+\catcode123=1 % {
+\catcode125=2 % }
+\endlinechar=10 %
+\ifnum\luatexversion<36 %
+\directlua0%
+\else %
+\expandafter\directlua %
+\fi %
+{%
+ do
+ local script = "oberdiek.luatex.lua"
+ local file = kpse.find_file(script, "texmfscripts")
+ if file then
+ texio.write_nl("(" .. file .. ")")
+ dofile(file)
+ else
+ error("File `" .. script .. "' not found")
+ end
+ end
+}%
\endgroup\endinput%
- \endinput
+\endinput
<hobsub>
\hobsub@StopPackage
\hobsub@StartPackage{pdftexcmds}
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode123=1 % {
- \catcode125=2 % }
- \expandafter\let\expandafter\x\csname ver@pdftexcmds.sty\endcsname
- \ifx\x\relax % plain-TeX, first loading
- \else
- \def\empty{}%
- \ifx\x\empty % LaTeX, first loading,
- % variable is initialized, but \ProvidesPackage not yet seen
- \else
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
- \fi
- \x{pdftexcmds}{The package is already loaded}%
- \aftergroup\endinput
- \fi
- \fi
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\expandafter\let\expandafter\x\csname ver@pdftexcmds.sty\endcsname
+\ifx\x\relax % plain-TeX, first loading
+\else
+\def\empty{}%
+\ifx\x\empty % LaTeX, first loading,
+% variable is initialized, but \ProvidesPackage not yet seen
+\else
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+\fi
+\x{pdftexcmds}{The package is already loaded}%
+\aftergroup\endinput
+\fi
+\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode47=12 % /
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode91=12 % [
- \catcode93=12 % ]
- \catcode123=1 % {
- \catcode125=2 % }
- \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
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode47=12 % /
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode91=12 % [
+\catcode93=12 % ]
+\catcode123=1 % {
+\catcode125=2 % }
+\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@pdftexcmds.sty\endcsname
\ProvidesPackage{pdftexcmds}%
- [2011/04/16 v0.15 Utilities of pdfTeX for LuaTeX (HO)]%
+ [2011/04/16 v0.15 Utilities of pdfTeX for LuaTeX (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode123=1 % {
- \catcode125=2 % }
- \catcode64=11 % @
- \def\x{\endgroup
- \expandafter\edef\csname pdftexcmds@AtEnd\endcsname{%
- \endlinechar=\the\endlinechar\relax
- \catcode13=\the\catcode13\relax
- \catcode32=\the\catcode32\relax
- \catcode35=\the\catcode35\relax
- \catcode61=\the\catcode61\relax
- \catcode64=\the\catcode64\relax
- \catcode123=\the\catcode123\relax
- \catcode125=\the\catcode125\relax
- }%
- }%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode123=1 % {
+\catcode125=2 % }
+\catcode64=11 % @
+\def\x{\endgroup
+\expandafter\edef\csname pdftexcmds@AtEnd\endcsname{%
+\endlinechar=\the\endlinechar\relax
+\catcode13=\the\catcode13\relax
+\catcode32=\the\catcode32\relax
+\catcode35=\the\catcode35\relax
+\catcode61=\the\catcode61\relax
+\catcode64=\the\catcode64\relax
+\catcode123=\the\catcode123\relax
+\catcode125=\the\catcode125\relax
+}%
+}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
@@ -4597,11 +4598,11 @@ $ \expandafter\ifx\csname KV@#1@#2@default\endcsname\relax
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2{%
- \edef\pdftexcmds@AtEnd{%
- \pdftexcmds@AtEnd
- \catcode#1=\the\catcode#1\relax
- }%
- \catcode#1=#2\relax
+\edef\pdftexcmds@AtEnd{%
+\pdftexcmds@AtEnd
+\catcode#1=\the\catcode#1\relax
+}%
+\catcode#1=#2\relax
}
\TMP@EnsureCode{0}{12}%
\TMP@EnsureCode{1}{12}%
@@ -4629,129 +4630,129 @@ $ \expandafter\ifx\csname KV@#1@#2@default\endcsname\relax
\TMP@EnsureCode{96}{12}% `
\TMP@EnsureCode{126}{12}% ~ (other)
\edef\pdftexcmds@AtEnd{%
- \pdftexcmds@AtEnd
- \escapechar=\number\escapechar\relax
- \noexpand\endinput
+\pdftexcmds@AtEnd
+\escapechar=\number\escapechar\relax
+\noexpand\endinput
}
\escapechar=92 %
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname RequirePackage\endcsname\relax
- \def\TMP@RequirePackage#1[#2]{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname ver@#1.sty\endcsname\relax
- \input #1.sty\relax
- \fi
- }%
- \TMP@RequirePackage{infwarerr}[2007/09/09]%
- \TMP@RequirePackage{ifluatex}[2010/03/01]%
- \TMP@RequirePackage{ltxcmds}[2010/12/02]%
- \TMP@RequirePackage{ifpdf}[2010/09/13]%
-\else
- \RequirePackage{infwarerr}[2007/09/09]%
- \RequirePackage{ifluatex}[2010/03/01]%
- \RequirePackage{ltxcmds}[2010/12/02]%
- \RequirePackage{ifpdf}[2010/09/13]%
+\def\TMP@RequirePackage#1[#2]{%
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname ver@#1.sty\endcsname\relax
+\input #1.sty\relax
+\fi
+}%
+\TMP@RequirePackage{infwarerr}[2007/09/09]%
+\TMP@RequirePackage{ifluatex}[2010/03/01]%
+\TMP@RequirePackage{ltxcmds}[2010/12/02]%
+\TMP@RequirePackage{ifpdf}[2010/09/13]%
+\else
+\RequirePackage{infwarerr}[2007/09/09]%
+\RequirePackage{ifluatex}[2010/03/01]%
+\RequirePackage{ltxcmds}[2010/12/02]%
+\RequirePackage{ifpdf}[2010/09/13]%
\fi
\ifluatex
\else
- \@PackageInfoNoLine{pdftexcmds}{LuaTeX not detected}%
- \def\pdftexcmds@nopdftex{%
- \@PackageInfoNoLine{pdftexcmds}{pdfTeX >= 1.30 not detected}%
- \let\pdftexcmds@nopdftex\relax
- }%
- \def\pdftexcmds@temp#1{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname pdf#1\endcsname\relax
- \pdftexcmds@nopdftex
- \else
- \expandafter\def\csname pdf@#1\expandafter\endcsname
- \expandafter##\expandafter{%
- \csname pdf#1\endcsname
- }%
- \fi
- }%
- \pdftexcmds@temp{strcmp}%
- \pdftexcmds@temp{escapehex}%
- \let\pdf@escapehexnative\pdf@escapehex
- \pdftexcmds@temp{unescapehex}%
- \let\pdf@unescapehexnative\pdf@unescapehex
- \pdftexcmds@temp{escapestring}%
- \pdftexcmds@temp{escapename}%
- \pdftexcmds@temp{filesize}%
- \pdftexcmds@temp{filemoddate}%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname pdfshellescape\endcsname\relax
- \pdftexcmds@nopdftex
- \ltx@IfUndefined{pdftexversion}{%
- }{%
- \ifnum\pdftexversion>120 % 1.21a supports \ifeof18
- \ifeof18 %
- \chardef\pdf@shellescape=0 %
- \else
- \chardef\pdf@shellescape=1 %
- \fi
- \fi
- }%
- \else
- \def\pdf@shellescape{%
- \pdfshellescape
- }%
- \fi
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname pdffiledump\endcsname\relax
- \pdftexcmds@nopdftex
- \else
- \def\pdf@filedump#1#2#3{%
- \pdffiledump offset#1 length#2{#3}%
- }%
- \fi
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname pdfmdfivesum\endcsname\relax
- \pdftexcmds@nopdftex
- \else
- \def\pdf@mdfivesum#{\pdfmdfivesum}%
- \let\pdf@mdfivesumnative\pdf@mdfivesum
- \def\pdf@filemdfivesum#{\pdfmdfivesum file}%
- \fi
- \def\pdf@system#{%
- \immediate\write18%
- }%
+\@PackageInfoNoLine{pdftexcmds}{LuaTeX not detected}%
+\def\pdftexcmds@nopdftex{%
+\@PackageInfoNoLine{pdftexcmds}{pdfTeX >= 1.30 not detected}%
+\let\pdftexcmds@nopdftex\relax
+}%
+\def\pdftexcmds@temp#1{%
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname pdf#1\endcsname\relax
+\pdftexcmds@nopdftex
+\else
+\expandafter\def\csname pdf@#1\expandafter\endcsname
+\expandafter##\expandafter{%
+\csname pdf#1\endcsname
+}%
+\fi
+}%
+\pdftexcmds@temp{strcmp}%
+\pdftexcmds@temp{escapehex}%
+\let\pdf@escapehexnative\pdf@escapehex
+\pdftexcmds@temp{unescapehex}%
+\let\pdf@unescapehexnative\pdf@unescapehex
+\pdftexcmds@temp{escapestring}%
+\pdftexcmds@temp{escapename}%
+\pdftexcmds@temp{filesize}%
+\pdftexcmds@temp{filemoddate}%
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname pdfshellescape\endcsname\relax
+\pdftexcmds@nopdftex
+\ltx@IfUndefined{pdftexversion}{%
+}{%
+\ifnum\pdftexversion>120 % 1.21a supports \ifeof18
+\ifeof18 %
+\chardef\pdf@shellescape=0 %
+\else
+\chardef\pdf@shellescape=1 %
+\fi
+\fi
+}%
+\else
+\def\pdf@shellescape{%
+\pdfshellescape
+}%
+\fi
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname pdffiledump\endcsname\relax
+\pdftexcmds@nopdftex
+\else
+\def\pdf@filedump#1#2#3{%
+\pdffiledump offset#1 length#2{#3}%
+}%
+\fi
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname pdfmdfivesum\endcsname\relax
+\pdftexcmds@nopdftex
+\else
+\def\pdf@mdfivesum#{\pdfmdfivesum}%
+\let\pdf@mdfivesumnative\pdf@mdfivesum
+\def\pdf@filemdfivesum#{\pdfmdfivesum file}%
+\fi
+\def\pdf@system#{%
+\immediate\write18%
+}%
\fi
\ifluatex
- \ifnum\luatexversion<36 %
- \def\pdftexcmds@directlua{\directlua0 }%
- \else
- \let\pdftexcmds@directlua\directlua
- \fi
- \begingroup
- \newlinechar=10 %
- \endlinechar=\newlinechar
- \pdftexcmds@directlua{%
- if tex.enableprimitives then
- tex.enableprimitives(
- 'pdf@',
- {'primitive', 'ifprimitive', 'pdfdraftmode'}
- )
- tex.enableprimitives('', {'luaescapestring'})
- end
- }%
- \endgroup %
+\ifnum\luatexversion<36 %
+\def\pdftexcmds@directlua{\directlua0 }%
+\else
+\let\pdftexcmds@directlua\directlua
+\fi
+\begingroup
+\newlinechar=10 %
+\endlinechar=\newlinechar
+\pdftexcmds@directlua{%
+ if tex.enableprimitives then
+ tex.enableprimitives(
+ 'pdf@',
+{'primitive', 'ifprimitive', 'pdfdraftmode'}
+ )
+ tex.enableprimitives('', {'luaescapestring'})
+ end
+}%
+\endgroup %
\fi
\def\pdftexcmds@strip@prefix#1>{}
\def\pdftexcmds@temp#1#2#3{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname pdf@#1\endcsname\relax
- \begingroup
- \def\x{#3}%
- \edef\x{\expandafter\pdftexcmds@strip@prefix\meaning\x}%
- \escapechar=-1 %
- \edef\y{\expandafter\meaning\csname#2\endcsname}%
- \expandafter\endgroup
- \ifx\x\y
- \expandafter\let\csname pdf@#1\expandafter\endcsname
- \csname #2\endcsname
- \fi
- \fi
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname pdf@#1\endcsname\relax
+\begingroup
+\def\x{#3}%
+\edef\x{\expandafter\pdftexcmds@strip@prefix\meaning\x}%
+\escapechar=-1 %
+\edef\y{\expandafter\meaning\csname#2\endcsname}%
+\expandafter\endgroup
+\ifx\x\y
+\expandafter\let\csname pdf@#1\expandafter\endcsname
+\csname #2\endcsname
+\fi
+\fi
}
\pdftexcmds@temp{primitive}{pdfprimitive}{pdfprimitive}% pdfTeX, LuaTeX
\pdftexcmds@temp{primitive}{primitive}{primitive}% XeTeX
@@ -4762,467 +4763,466 @@ $ \expandafter\ifx\csname KV@#1@#2@default\endcsname\relax
\pdftexcmds@temp{ifprimitive}{luatexifprimitive}{ifpdfprimitive}% LuaTeX
\pdftexcmds@temp{ifprimitive}{luatexifpdfprimitive}{ifpdfprimitive}% LuaTeX
\begingroup
- \expandafter\ifx\csname pdf@primitive\endcsname\relax
- \else
- \expandafter\ifx\csname pdftexversion\endcsname\relax
- \else
- \ifnum\pdftexversion=140 %
- \expandafter\ifx\csname pdftexrevision\endcsname\relax
- \else
- \ifnum\pdftexrevision<4 %
- \endgroup
- \let\pdf@primitive\@undefined
- \@PackageInfoNoLine{pdftexcmds}{%
- \string\pdf@primitive disabled, because\MessageBreak
- \string\pdfprimitive\space is broken until pdfTeX 1.40.4%
- }%
- \begingroup
- \fi
- \fi
- \fi
- \fi
- \fi
+\expandafter\ifx\csname pdf@primitive\endcsname\relax
+\else
+\expandafter\ifx\csname pdftexversion\endcsname\relax
+\else
+\ifnum\pdftexversion=140 %
+\expandafter\ifx\csname pdftexrevision\endcsname\relax
+\else
+\ifnum\pdftexrevision<4 %
+\endgroup
+\let\pdf@primitive\@undefined
+\@PackageInfoNoLine{pdftexcmds}{%
+\string\pdf@primitive disabled, because\MessageBreak
+\string\pdfprimitive\space is broken until pdfTeX 1.40.4%
+}%
+\begingroup
+\fi
+\fi
+\fi
+\fi
+\fi
\endgroup
\begingroup
- \@PackageInfoNoLine{pdftexcmds}{%
- \string\pdf@primitive\space is %
- \expandafter\ifx\csname pdf@primitive\endcsname\relax not \fi
- available%
- }%
- \@PackageInfoNoLine{pdftexcmds}{%
- \string\pdf@ifprimitive\space is %
- \expandafter\ifx\csname pdf@ifprimitive\endcsname\relax not \fi
- available%
- }%
+\@PackageInfoNoLine{pdftexcmds}{%
+\string\pdf@primitive\space is %
+\expandafter\ifx\csname pdf@primitive\endcsname\relax not \fi
+ available%
+}%
+\@PackageInfoNoLine{pdftexcmds}{%
+\string\pdf@ifprimitive\space is %
+\expandafter\ifx\csname pdf@ifprimitive\endcsname\relax not \fi
+ available%
+}%
\endgroup
\def\pdftexcmds@temp#1{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname pdf@#1\endcsname\relax
- \begingroup
- \escapechar=-1 %
- \edef\x{\expandafter\meaning\csname#1\endcsname}%
- \def\y{#1}%
- \def\z##1->{}%
- \edef\y{\expandafter\z\meaning\y}%
- \expandafter\endgroup
- \ifx\x\y
- \expandafter\def\csname pdf@#1\expandafter\endcsname
- \expandafter{%
- \csname#1\endcsname
- }%
- \fi
- \fi
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname pdf@#1\endcsname\relax
+\begingroup
+\escapechar=-1 %
+\edef\x{\expandafter\meaning\csname#1\endcsname}%
+\def\y{#1}%
+\def\z##1->{}%
+\edef\y{\expandafter\z\meaning\y}%
+\expandafter\endgroup
+\ifx\x\y
+\expandafter\def\csname pdf@#1\expandafter\endcsname
+\expandafter{%
+\csname#1\endcsname
+}%
+\fi
+\fi
}%
\pdftexcmds@temp{shellescape}%
\pdftexcmds@temp{strcmp}%
\def\pdf@isprimitive{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname pdf@strcmp\endcsname\relax
- \long\def\pdf@isprimitive##1{%
- \expandafter\pdftexcmds@isprimitive\expandafter{\meaning##1}%
- }%
- \long\def\pdftexcmds@isprimitive##1##2{%
- \expandafter\pdftexcmds@@isprimitive\expandafter{\string##2}{##1}%
- }%
- \def\pdftexcmds@@isprimitive##1##2{%
- \ifnum0\pdftexcmds@equal##1\delimiter##2\delimiter=1 %
- \expandafter\ltx@firstoftwo
- \else
- \expandafter\ltx@secondoftwo
- \fi
- }%
- \def\pdftexcmds@equal##1##2\delimiter##3##4\delimiter{%
- \ifx##1##3%
- \ifx\relax##2##4\relax
- 1%
- \else
- \ifx\relax##2\relax
- \else
- \ifx\relax##4\relax
- \else
- \pdftexcmds@equalcont{##2}{##4}%
- \fi
- \fi
- \fi
- \fi
- }%
- \def\pdftexcmds@equalcont##1{%
- \def\pdftexcmds@equalcont####1####2##1##1##1##1{%
- ##1##1##1##1%
- \pdftexcmds@equal####1\delimiter####2\delimiter
- }%
- }%
- \expandafter\pdftexcmds@equalcont\csname fi\endcsname
- \else
- \long\def\pdf@isprimitive##1##2{%
- \ifnum\pdf@strcmp{\meaning##1}{\string##2}=0 %
- \expandafter\ltx@firstoftwo
- \else
- \expandafter\ltx@secondoftwo
- \fi
- }%
- \fi
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname pdf@strcmp\endcsname\relax
+\long\def\pdf@isprimitive##1{%
+\expandafter\pdftexcmds@isprimitive\expandafter{\meaning##1}%
+}%
+\long\def\pdftexcmds@isprimitive##1##2{%
+\expandafter\pdftexcmds@@isprimitive\expandafter{\string##2}{##1}%
+}%
+\def\pdftexcmds@@isprimitive##1##2{%
+\ifnum0\pdftexcmds@equal##1\delimiter##2\delimiter=1 %
+\expandafter\ltx@firstoftwo
+\else
+\expandafter\ltx@secondoftwo
+\fi
+}%
+\def\pdftexcmds@equal##1##2\delimiter##3##4\delimiter{%
+\ifx##1##3%
+\ifx\relax##2##4\relax
+ 1%
+\else
+\ifx\relax##2\relax
+\else
+\ifx\relax##4\relax
+\else
+\pdftexcmds@equalcont{##2}{##4}%
+\fi
+\fi
+\fi
+\fi
+}%
+\def\pdftexcmds@equalcont##1{%
+\def\pdftexcmds@equalcont####1####2##1##1##1##1{%
+##1##1##1##1%
+\pdftexcmds@equal####1\delimiter####2\delimiter
+}%
+}%
+\expandafter\pdftexcmds@equalcont\csname fi\endcsname
+\else
+\long\def\pdf@isprimitive##1##2{%
+\ifnum\pdf@strcmp{\meaning##1}{\string##2}=0 %
+\expandafter\ltx@firstoftwo
+\else
+\expandafter\ltx@secondoftwo
+\fi
+}%
+\fi
}
\ifluatex
\else
- \pdf@isprimitive
+\pdf@isprimitive
\fi
\let\pdftexcmds@temp\ltx@zero %
\ltx@IfUndefined{pdfdraftmode}{%
- \@PackageInfoNoLine{pdftexcmds}{\ltx@backslashchar pdfdraftmode not found}%
+\@PackageInfoNoLine{pdftexcmds}{\ltx@backslashchar pdfdraftmode not found}%
}{%
- \ifpdf
- \let\pdftexcmds@temp\ltx@one
- \@PackageInfoNoLine{pdftexcmds}{\ltx@backslashchar pdfdraftmode found}%
- \else
- \@PackageInfoNoLine{pdftexcmds}{%
- \ltx@backslashchar pdfdraftmode is ignored in DVI mode%
- }%
- \fi
+\ifpdf
+\let\pdftexcmds@temp\ltx@one
+\@PackageInfoNoLine{pdftexcmds}{\ltx@backslashchar pdfdraftmode found}%
+\else
+\@PackageInfoNoLine{pdftexcmds}{%
+\ltx@backslashchar pdfdraftmode is ignored in DVI mode%
+}%
+\fi
}
\ifcase\pdftexcmds@temp
- \let\pdf@draftmode\ltx@zero
- \let\pdf@ifdraftmode\ltx@secondoftwo
- \def\pdftexcmds@setdraftmode#1{}%
-\else
- \let\pdftexcmds@draftmode\pdfdraftmode
- \def\pdf@ifdraftmode{%
- \ifnum\pdftexcmds@draftmode=\ltx@one
- \expandafter\ltx@firstoftwo
- \else
- \expandafter\ltx@secondoftwo
- \fi
- }%
- \def\pdf@draftmode{%
- \ifnum\pdftexcmds@draftmode=\ltx@one
- \expandafter\ltx@one
- \else
- \expandafter\ltx@zero
- \fi
- }%
- \def\pdftexcmds@setdraftmode#1{%
- \pdftexcmds@draftmode=#1\relax
- }%
+\let\pdf@draftmode\ltx@zero
+\let\pdf@ifdraftmode\ltx@secondoftwo
+\def\pdftexcmds@setdraftmode#1{}%
+\else
+\let\pdftexcmds@draftmode\pdfdraftmode
+\def\pdf@ifdraftmode{%
+\ifnum\pdftexcmds@draftmode=\ltx@one
+\expandafter\ltx@firstoftwo
+\else
+\expandafter\ltx@secondoftwo
+\fi
+}%
+\def\pdf@draftmode{%
+\ifnum\pdftexcmds@draftmode=\ltx@one
+\expandafter\ltx@one
+\else
+\expandafter\ltx@zero
+\fi
+}%
+\def\pdftexcmds@setdraftmode#1{%
+\pdftexcmds@draftmode=#1\relax
+}%
\fi
\def\pdf@setdraftmode#1{%
- \begingroup
- \count\ltx@cclv=#1\relax
- \edef\x{\endgroup
- \noexpand\pdftexcmds@@setdraftmode{\the\count\ltx@cclv}%
- }%
- \x
+\begingroup
+\count\ltx@cclv=#1\relax
+\edef\x{\endgroup
+\noexpand\pdftexcmds@@setdraftmode{\the\count\ltx@cclv}%
+}%
+\x
}
\def\pdftexcmds@@setdraftmode#1{%
- \ifcase#1 %
- \pdftexcmds@setdraftmode{#1}%
- \or
- \pdftexcmds@setdraftmode{#1}%
- \else
- \@PackageWarning{pdftexcmds}{%
- \string\pdf@setdraftmode: Ignoring\MessageBreak
- invalid value `#1'%
- }%
- \fi
+\ifcase#1 %
+\pdftexcmds@setdraftmode{#1}%
+\or
+\pdftexcmds@setdraftmode{#1}%
+\else
+\@PackageWarning{pdftexcmds}{%
+\string\pdf@setdraftmode: Ignoring\MessageBreak
+ invalid value `#1'%
+}%
+\fi
}
\ifluatex
\else
- \expandafter\pdftexcmds@AtEnd
+\expandafter\pdftexcmds@AtEnd
\fi%
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname RequirePackage\endcsname\relax
- \def\TMP@RequirePackage#1[#2]{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname ver@#1.sty\endcsname\relax
- \input #1.sty\relax
- \fi
- }%
- \TMP@RequirePackage{luatex-loader}[2009/04/10]%
+\def\TMP@RequirePackage#1[#2]{%
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname ver@#1.sty\endcsname\relax
+\input #1.sty\relax
+\fi
+}%
+\TMP@RequirePackage{luatex-loader}[2009/04/10]%
\else
- \RequirePackage{luatex-loader}[2009/04/10]%
+\RequirePackage{luatex-loader}[2009/04/10]%
\fi
\pdftexcmds@directlua{%
- require("oberdiek.pdftexcmds")%
+ require("oberdiek.pdftexcmds")%
}
\begingroup
- \def\x{2011/04/16 v0.15}%
- \ltx@onelevel@sanitize\x
- \edef\y{%
- \pdftexcmds@directlua{%
- if oberdiek.pdftexcmds.getversion then %
- oberdiek.pdftexcmds.getversion()%
- end%
- }%
- }%
- \ifx\x\y
- \else
- \@PackageError{pdftexcmds}{%
- Wrong version of lua module.\MessageBreak
- Package version: \x\MessageBreak
- Lua module: \y
- }\@ehc
- \fi
+\def\x{2011/04/16 v0.15}%
+\ltx@onelevel@sanitize\x
+\edef\y{%
+\pdftexcmds@directlua{%
+ if oberdiek.pdftexcmds.getversion then %
+ oberdiek.pdftexcmds.getversion()%
+ end%
+}%
+}%
+\ifx\x\y
+\else
+\@PackageError{pdftexcmds}{%
+ Wrong version of lua module.\MessageBreak
+ Package version: \x\MessageBreak
+ Lua module: \y
+}\@ehc
+\fi
\endgroup
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname newtoks\endcsname\relax
- \toksdef\pdftexcmds@toks=0 %
+\toksdef\pdftexcmds@toks=0 %
\else
- \csname newtoks\endcsname\pdftexcmds@toks
+\csname newtoks\endcsname\pdftexcmds@toks
\fi
\def\pdftexcmds@Patch{0}
-
\ifnum\luatexversion>40 %
- \ifnum\luatexversion<66 %
- \def\pdftexcmds@Patch{1}%
- \fi
+\ifnum\luatexversion<66 %
+\def\pdftexcmds@Patch{1}%
+\fi
\fi
\ifcase\pdftexcmds@Patch
- \catcode`\&=14 %
-\else
- \catcode`\&=9 %
- \def\pdftexcmds@PatchDecode#1\@nil{%
- \pdftexcmds@DecodeA#1^^A^^A\@nil{}%
- }%
- \def\pdftexcmds@DecodeA#1^^A^^A#2\@nil#3{%
- \ifx\relax#2\relax
- \ltx@ReturnAfterElseFi{%
- \pdftexcmds@DecodeB#3#1^^A^^B\@nil{}%
- }%
- \else
- \ltx@ReturnAfterFi{%
- \pdftexcmds@DecodeA#2\@nil{#3#1^^@}%
- }%
- \fi
- }%
- \def\pdftexcmds@DecodeB#1^^A^^B#2\@nil#3{%
- \ifx\relax#2\relax%
- \ltx@ReturnAfterElseFi{%
- \ltx@zero
- #3#1%
- }%
- \else
- \ltx@ReturnAfterFi{%
- \pdftexcmds@DecodeB#2\@nil{#3#1^^A}%
- }%
- \fi
- }%
+\catcode`\&=14 %
+\else
+\catcode`\&=9 %
+\def\pdftexcmds@PatchDecode#1\@nil{%
+\pdftexcmds@DecodeA#1^^A^^A\@nil{}%
+}%
+\def\pdftexcmds@DecodeA#1^^A^^A#2\@nil#3{%
+\ifx\relax#2\relax
+\ltx@ReturnAfterElseFi{%
+\pdftexcmds@DecodeB#3#1^^A^^B\@nil{}%
+}%
+\else
+\ltx@ReturnAfterFi{%
+\pdftexcmds@DecodeA#2\@nil{#3#1^^@}%
+}%
+\fi
+}%
+\def\pdftexcmds@DecodeB#1^^A^^B#2\@nil#3{%
+\ifx\relax#2\relax%
+\ltx@ReturnAfterElseFi{%
+\ltx@zero
+#3#1%
+}%
+\else
+\ltx@ReturnAfterFi{%
+\pdftexcmds@DecodeB#2\@nil{#3#1^^A}%
+}%
+\fi
+}%
\fi
\ifnum\luatexversion<36 %
\else
- \catcode`\0=9 %
+\catcode`\0=9 %
\fi
\long\def\pdf@strcmp#1#2{%
- \directlua0{%
- oberdiek.pdftexcmds.strcmp("\luaescapestring{#1}",%
- "\luaescapestring{#2}")%
- }%
+\directlua0{%
+ oberdiek.pdftexcmds.strcmp("\luaescapestring{#1}",%
+ "\luaescapestring{#2}")%
+}%
}%
\pdf@isprimitive
\long\def\pdf@escapehex#1{%
- \directlua0{%
- oberdiek.pdftexcmds.escapehex("\luaescapestring{#1}", "byte")%
- }%
+\directlua0{%
+ oberdiek.pdftexcmds.escapehex("\luaescapestring{#1}", "byte")%
+}%
}%
\long\def\pdf@escapehexnative#1{%
- \directlua0{%
- oberdiek.pdftexcmds.escapehex("\luaescapestring{#1}")%
- }%
+\directlua0{%
+ oberdiek.pdftexcmds.escapehex("\luaescapestring{#1}")%
+}%
}%
\def\pdf@unescapehex#1{%
& \romannumeral\expandafter\pdftexcmds@PatchDecode
- \the\expandafter\pdftexcmds@toks
- \directlua0{%
- oberdiek.pdftexcmds.toks="pdftexcmds@toks"%
- oberdiek.pdftexcmds.unescapehex("\luaescapestring{#1}", "byte", \pdftexcmds@Patch)%
- }%
+\the\expandafter\pdftexcmds@toks
+\directlua0{%
+ oberdiek.pdftexcmds.toks="pdftexcmds@toks"%
+ oberdiek.pdftexcmds.unescapehex("\luaescapestring{#1}", "byte", \pdftexcmds@Patch)%
+}%
& \@nil
}%
\def\pdf@unescapehexnative#1{%
& \romannumeral\expandafter\pdftexcmds@PatchDecode
- \the\expandafter\pdftexcmds@toks
- \directlua0{%
- oberdiek.pdftexcmds.toks="pdftexcmds@toks"%
- oberdiek.pdftexcmds.unescapehex("\luaescapestring{#1}", \pdftexcmds@Patch)%
- }%
+\the\expandafter\pdftexcmds@toks
+\directlua0{%
+ oberdiek.pdftexcmds.toks="pdftexcmds@toks"%
+ oberdiek.pdftexcmds.unescapehex("\luaescapestring{#1}", \pdftexcmds@Patch)%
+}%
& \@nil
}%
\long\def\pdf@escapestring#1{%
- \directlua0{%
- oberdiek.pdftexcmds.escapestring("\luaescapestring{#1}", "byte")%
- }%
+\directlua0{%
+ oberdiek.pdftexcmds.escapestring("\luaescapestring{#1}", "byte")%
+}%
}
\long\def\pdf@escapename#1{%
- \directlua0{%
- oberdiek.pdftexcmds.escapename("\luaescapestring{#1}", "byte")%
- }%
+\directlua0{%
+ oberdiek.pdftexcmds.escapename("\luaescapestring{#1}", "byte")%
+}%
}
\long\def\pdf@escapenamenative#1{%
- \directlua0{%
- oberdiek.pdftexcmds.escapename("\luaescapestring{#1}")%
- }%
+\directlua0{%
+ oberdiek.pdftexcmds.escapename("\luaescapestring{#1}")%
+}%
}
\def\pdf@filesize#1{%
- \directlua0{%
- oberdiek.pdftexcmds.filesize("\luaescapestring{#1}")%
- }%
+\directlua0{%
+ oberdiek.pdftexcmds.filesize("\luaescapestring{#1}")%
+}%
}
\def\pdf@filemoddate#1{%
- \directlua0{%
- oberdiek.pdftexcmds.filemoddate("\luaescapestring{#1}")%
- }%
+\directlua0{%
+ oberdiek.pdftexcmds.filemoddate("\luaescapestring{#1}")%
+}%
}
\def\pdf@filedump#1#2#3{%
- \directlua0{%
- oberdiek.pdftexcmds.filedump("\luaescapestring{\number#1}",%
- "\luaescapestring{\number#2}",%
- "\luaescapestring{#3}")%
- }%
+\directlua0{%
+ oberdiek.pdftexcmds.filedump("\luaescapestring{\number#1}",%
+ "\luaescapestring{\number#2}",%
+ "\luaescapestring{#3}")%
+}%
}%
\long\def\pdf@mdfivesum#1{%
- \directlua0{%
- oberdiek.pdftexcmds.mdfivesum("\luaescapestring{#1}", "byte")%
- }%
+\directlua0{%
+ oberdiek.pdftexcmds.mdfivesum("\luaescapestring{#1}", "byte")%
+}%
}%
\long\def\pdf@mdfivesumnative#1{%
- \directlua0{%
- oberdiek.pdftexcmds.mdfivesum("\luaescapestring{#1}")%
- }%
+\directlua0{%
+ oberdiek.pdftexcmds.mdfivesum("\luaescapestring{#1}")%
+}%
}%
\def\pdf@filemdfivesum#1{%
- \directlua0{%
- oberdiek.pdftexcmds.filemdfivesum("\luaescapestring{#1}")%
- }%
+\directlua0{%
+ oberdiek.pdftexcmds.filemdfivesum("\luaescapestring{#1}")%
+}%
}%
\ifnum\luatexversion<70 %
\else
- \def\pdf@shellescape{%
- \directlua0{%
- oberdiek.pdftexcmds.shellescape()%
- }%
- }%
+\def\pdf@shellescape{%
+\directlua0{%
+ oberdiek.pdftexcmds.shellescape()%
+}%
+}%
\fi
\def\pdf@system#1{%
- \directlua0{%
- oberdiek.pdftexcmds.system("\luaescapestring{#1}")%
- }%
+\directlua0{%
+ oberdiek.pdftexcmds.system("\luaescapestring{#1}")%
+}%
}
\def\pdf@lastsystemstatus{%
- \directlua0{%
- oberdiek.pdftexcmds.lastsystemstatus()%
- }%
+\directlua0{%
+ oberdiek.pdftexcmds.lastsystemstatus()%
+}%
}
\def\pdf@lastsystemexit{%
- \directlua0{%
- oberdiek.pdftexcmds.lastsystemexit()%
- }%
+\directlua0{%
+ oberdiek.pdftexcmds.lastsystemexit()%
+}%
}
\catcode`\0=12 %
\ifnum0%
- \pdftexcmds@directlua{%
- if io.popen then %
- tex.write("1")%
- end%
- }%
- =1 %
- \def\pdf@pipe#1{%
+\pdftexcmds@directlua{%
+ if io.popen then %
+ tex.write("1")%
+ end%
+}%
+ =1 %
+\def\pdf@pipe#1{%
& \romannumeral\expandafter\pdftexcmds@PatchDecode
- \the\expandafter\pdftexcmds@toks
- \pdftexcmds@directlua{%
- oberdiek.pdftexcmds.toks="pdftexcmds@toks"%
- oberdiek.pdftexcmds.pipe("\luaescapestring{#1}", \pdftexcmds@Patch)%
- }%
+\the\expandafter\pdftexcmds@toks
+\pdftexcmds@directlua{%
+ oberdiek.pdftexcmds.toks="pdftexcmds@toks"%
+ oberdiek.pdftexcmds.pipe("\luaescapestring{#1}", \pdftexcmds@Patch)%
+}%
& \@nil
- }%
+}%
\fi
\pdftexcmds@AtEnd%
- \endinput
+\endinput
<hobsub>
\hobsub@StopPackage
\hobsub@StartPackage{pdfescape}
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode123=1 % {
- \catcode125=2 % }
- \expandafter\let\expandafter\x\csname ver@pdfescape.sty\endcsname
- \ifx\x\relax % plain-TeX, first loading
- \else
- \def\empty{}%
- \ifx\x\empty % LaTeX, first loading,
- % variable is initialized, but \ProvidesPackage not yet seen
- \else
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
- \fi
- \x{pdfescape}{The package is already loaded}%
- \aftergroup\endinput
- \fi
- \fi
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\expandafter\let\expandafter\x\csname ver@pdfescape.sty\endcsname
+\ifx\x\relax % plain-TeX, first loading
+\else
+\def\empty{}%
+\ifx\x\empty % LaTeX, first loading,
+% variable is initialized, but \ProvidesPackage not yet seen
+\else
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+\fi
+\x{pdfescape}{The package is already loaded}%
+\aftergroup\endinput
+\fi
+\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode47=12 % /
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode91=12 % [
- \catcode93=12 % ]
- \catcode123=1 % {
- \catcode125=2 % }
- \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
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode47=12 % /
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode91=12 % [
+\catcode93=12 % ]
+\catcode123=1 % {
+\catcode125=2 % }
+\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@pdfescape.sty\endcsname
\ProvidesPackage{pdfescape}%
- [2011/04/04 v1.12 Provides string conversions (HO)]%
+ [2011/04/04 v1.12 Provides string conversions (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode123 1 % {
- \catcode125 2 % }
- \catcode64 11 %
- \def\x{\endgroup
- \expandafter\edef\csname PE@AtEnd\endcsname{%
- \endlinechar=\the\endlinechar\relax
- \catcode13=\the\catcode13\relax
- \catcode32=\the\catcode32\relax
- \catcode35=\the\catcode35\relax
- \catcode61=\the\catcode61\relax
- \catcode64=\the\catcode64\relax
- \catcode123=\the\catcode123\relax
- \catcode125=\the\catcode125\relax
- }%
- }%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode123 1 % {
+\catcode125 2 % }
+\catcode64 11 %
+\def\x{\endgroup
+\expandafter\edef\csname PE@AtEnd\endcsname{%
+\endlinechar=\the\endlinechar\relax
+\catcode13=\the\catcode13\relax
+\catcode32=\the\catcode32\relax
+\catcode35=\the\catcode35\relax
+\catcode61=\the\catcode61\relax
+\catcode64=\the\catcode64\relax
+\catcode123=\the\catcode123\relax
+\catcode125=\the\catcode125\relax
+}%
+}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
@@ -5231,11 +5231,11 @@ $ \expandafter\ifx\csname KV@#1@#2@default\endcsname\relax
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2#3{%
- \edef\PE@AtEnd{%
- \PE@AtEnd
- #1#2=\the#1#2\relax
- }%
- #1#2=#3\relax
+\edef\PE@AtEnd{%
+\PE@AtEnd
+#1#2=\the#1#2\relax
+}%
+#1#2=#3\relax
}
\TMP@EnsureCode\catcode{0}{12}% ^^@
\TMP@EnsureCode\catcode{34}{12}% "
@@ -5256,686 +5256,686 @@ $ \expandafter\ifx\csname KV@#1@#2@default\endcsname\relax
\edef\PE@AtEnd{\PE@AtEnd\noexpand\endinput}
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname RequirePackage\endcsname\relax
- \def\TMP@RequirePackage#1[#2]{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname ver@#1.sty\endcsname\relax
- \input #1.sty\relax
- \fi
- }%
- \TMP@RequirePackage{ltxcmds}[2010/04/08]%
+\def\TMP@RequirePackage#1[#2]{%
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname ver@#1.sty\endcsname\relax
+\input #1.sty\relax
+\fi
+}%
+\TMP@RequirePackage{ltxcmds}[2010/04/08]%
\else
- \RequirePackage{ltxcmds}[2010/04/08]%
+\RequirePackage{ltxcmds}[2010/04/08]%
\fi
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname detokenize\endcsname\relax
- \long\def\EdefSanitize#1#2{%
- \begingroup
- \csname @safe@activestrue\endcsname
- \edef#1{#2}%
- \PE@onelevel@sanitize#1%
- \expandafter\endgroup
- \expandafter\def\expandafter#1\expandafter{#1}%
- }%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname @onelevel@sanitize\endcsname\relax
- \def\PE@onelevel@sanitize#1{%
- \edef#1{\expandafter\PE@strip@prefix\meaning#1}%
- }%
- \def\PE@strip@prefix#1>{}%
- \else
- \let\PE@onelevel@sanitize\@onelevel@sanitize
- \fi
-\else
- \long\def\EdefSanitize#1#2{%
- \begingroup
- \csname @safe@activestrue\endcsname
- \edef#1{#2}%
- \expandafter\endgroup
- \expandafter\def\expandafter#1\expandafter{%
- \detokenize\expandafter{#1}%
- }%
- }%
- \def\PE@onelevel@sanitize#1{%
- \edef#1{\detokenize\expandafter{#1}}%
- }%
+\long\def\EdefSanitize#1#2{%
+\begingroup
+\csname @safe@activestrue\endcsname
+\edef#1{#2}%
+\PE@onelevel@sanitize#1%
+\expandafter\endgroup
+\expandafter\def\expandafter#1\expandafter{#1}%
+}%
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname @onelevel@sanitize\endcsname\relax
+\def\PE@onelevel@sanitize#1{%
+\edef#1{\expandafter\PE@strip@prefix\meaning#1}%
+}%
+\def\PE@strip@prefix#1>{}%
+\else
+\let\PE@onelevel@sanitize\@onelevel@sanitize
+\fi
+\else
+\long\def\EdefSanitize#1#2{%
+\begingroup
+\csname @safe@activestrue\endcsname
+\edef#1{#2}%
+\expandafter\endgroup
+\expandafter\def\expandafter#1\expandafter{%
+\detokenize\expandafter{#1}%
+}%
+}%
+\def\PE@onelevel@sanitize#1{%
+\edef#1{\detokenize\expandafter{#1}}%
+}%
\fi
\let\PE@sanitize\EdefSanitize
\begingroup
- \catcode`\ =12\relax%
+\catcode`\ =12\relax%
\def\x{\endgroup\def\PE@space@other{ }}\x\relax
\def\PE@space@space{ }
\def\PE@SanitizeSpaceOther#1{%
- \edef#1{\expandafter\PE@SpaceToOther#1 \relax}%
+\edef#1{\expandafter\PE@SpaceToOther#1 \relax}%
}
\def\PE@SpaceToOther#1 #2\relax{%
- #1%
- \ifx\\#2\\%
- \else
- \PE@space@other
- \ltx@ReturnAfterFi{%
- \PE@SpaceToOther#2\relax
- }%
- \fi
+#1%
+\ifx\\#2\\%
+\else
+\PE@space@other
+\ltx@ReturnAfterFi{%
+\PE@SpaceToOther#2\relax
+}%
+\fi
}
\def\EdefUnescapeName#1#2{%
- \EdefSanitize#1{#2}%
- \PE@SanitizeSpaceOther#1%
- \PE@UnescapeName#1%
- \PE@onelevel@sanitize#1%
+\EdefSanitize#1{#2}%
+\PE@SanitizeSpaceOther#1%
+\PE@UnescapeName#1%
+\PE@onelevel@sanitize#1%
}
\begingroup
- \catcode`\$=6 % hash
- \catcode`\#=12 % other
- \gdef\PE@UnescapeName$1{%
- \begingroup
- \PE@InitUccodeHexDigit
- \def\PE@result{}%
- \expandafter\PE@DeName$1#\relax\relax
- \expandafter\endgroup
- \expandafter\def\expandafter$1\expandafter{\PE@result}%
- }%
- \gdef\PE@DeName$1#$2$3{%
- \ifx\relax$2%
- \edef\PE@result{\PE@result$1}%
- \let\PE@next\relax
- \else
- \ifx\relax$3%
- % wrong escape sequence in input
- \edef\PE@result{\PE@result$1#}%
- \let\PE@next\relax
- \else
- \uppercase{%
- \def\PE@testA{$2}%
- \def\PE@testB{$3}%
- }%
- \ifcase\ifcase\expandafter\PE@TestUcHexDigit\PE@testA
- \ifcase\expandafter\PE@TestUcHexDigit\PE@testB
- \ltx@zero
- \else
- \ltx@one
- \fi
- \else
- \ltx@one
- \fi
- \uccode\ltx@zero="\PE@testA\PE@testB\relax
- \uppercase{%
- \def\PE@temp{^^@}%
- }%
- \uccode\ltx@zero=\ltx@zero
- \edef\PE@result{\PE@result$1\PE@temp}%
- \let\PE@next\PE@DeName
- \else
- % wrong escape sequence in input
- \edef\PE@result{\PE@result$1#}%
- \def\PE@next{\PE@DeName$2$3}%
- \fi
- \fi
- \fi
- \PE@next
- }%
+\catcode`\$=6 % hash
+\catcode`\#=12 % other
+\gdef\PE@UnescapeName$1{%
+\begingroup
+\PE@InitUccodeHexDigit
+\def\PE@result{}%
+\expandafter\PE@DeName$1#\relax\relax
+\expandafter\endgroup
+\expandafter\def\expandafter$1\expandafter{\PE@result}%
+}%
+\gdef\PE@DeName$1#$2$3{%
+\ifx\relax$2%
+\edef\PE@result{\PE@result$1}%
+\let\PE@next\relax
+\else
+\ifx\relax$3%
+% wrong escape sequence in input
+\edef\PE@result{\PE@result$1#}%
+\let\PE@next\relax
+\else
+\uppercase{%
+\def\PE@testA{$2}%
+\def\PE@testB{$3}%
+}%
+\ifcase\ifcase\expandafter\PE@TestUcHexDigit\PE@testA
+\ifcase\expandafter\PE@TestUcHexDigit\PE@testB
+\ltx@zero
+\else
+\ltx@one
+\fi
+\else
+\ltx@one
+\fi
+\uccode\ltx@zero="\PE@testA\PE@testB\relax
+\uppercase{%
+\def\PE@temp{^^@}%
+}%
+\uccode\ltx@zero=\ltx@zero
+\edef\PE@result{\PE@result$1\PE@temp}%
+\let\PE@next\PE@DeName
+\else
+% wrong escape sequence in input
+\edef\PE@result{\PE@result$1#}%
+\def\PE@next{\PE@DeName$2$3}%
+\fi
+\fi
+\fi
+\PE@next
+}%
\endgroup
\def\PE@InitUccodeHexDigit{%
- \uccode`a=`A\relax
- \uccode`b=`B\relax
- \uccode`c=`C\relax
- \uccode`d=`D\relax
- \uccode`e=`E\relax
- \uccode`f=`F\relax
- \uccode`A=\ltx@zero
- \uccode`B=\ltx@zero
- \uccode`C=\ltx@zero
- \uccode`D=\ltx@zero
- \uccode`E=\ltx@zero
- \uccode`F=\ltx@zero
- \uccode`0=\ltx@zero
- \uccode`1=\ltx@zero
- \uccode`2=\ltx@zero
- \uccode`3=\ltx@zero
- \uccode`4=\ltx@zero
- \uccode`5=\ltx@zero
- \uccode`6=\ltx@zero
- \uccode`7=\ltx@zero
- \uccode`8=\ltx@zero
- \uccode`9=\ltx@zero
+\uccode`a=`A\relax
+\uccode`b=`B\relax
+\uccode`c=`C\relax
+\uccode`d=`D\relax
+\uccode`e=`E\relax
+\uccode`f=`F\relax
+\uccode`A=\ltx@zero
+\uccode`B=\ltx@zero
+\uccode`C=\ltx@zero
+\uccode`D=\ltx@zero
+\uccode`E=\ltx@zero
+\uccode`F=\ltx@zero
+\uccode`0=\ltx@zero
+\uccode`1=\ltx@zero
+\uccode`2=\ltx@zero
+\uccode`3=\ltx@zero
+\uccode`4=\ltx@zero
+\uccode`5=\ltx@zero
+\uccode`6=\ltx@zero
+\uccode`7=\ltx@zero
+\uccode`8=\ltx@zero
+\uccode`9=\ltx@zero
}
\def\PE@TestUcHexDigit#1{%
- \ifnum`#1<48 % 0
- \ltx@one
- \else
- \ifnum`#1>70 % F
- \ltx@one
- \else
- \ifnum`#1>57 % 9
- \ifnum`#1<65 % A
- \ltx@one
- \else
- \ltx@zero
- \fi
- \else
- \ltx@zero
- \fi
- \fi
- \fi
+\ifnum`#1<48 % 0
+\ltx@one
+\else
+\ifnum`#1>70 % F
+\ltx@one
+\else
+\ifnum`#1>57 % 9
+\ifnum`#1<65 % A
+\ltx@one
+\else
+\ltx@zero
+\fi
+\else
+\ltx@zero
+\fi
+\fi
+\fi
}
\def\EdefUnescapeString#1#2{%
- \EdefSanitize#1{#2}%
- \PE@SanitizeSpaceOther#1%
- \PE@NormalizeLineEnd#1%
- \PE@UnescapeString#1%
- \PE@onelevel@sanitize#1%
+\EdefSanitize#1{#2}%
+\PE@SanitizeSpaceOther#1%
+\PE@NormalizeLineEnd#1%
+\PE@UnescapeString#1%
+\PE@onelevel@sanitize#1%
}
\begingroup
- \uccode`\8=10 % lf
- \uccode`\9=13 % cr
+\uccode`\8=10 % lf
+\uccode`\9=13 % cr
\def\x#1#2{\endgroup
- \def\PE@NormalizeLineEnd##1{%
- \def\PE@result{}%
- \expandafter\PE@@NormalizeLineEnd##1#2\relax
- \let##1\PE@result
- }%
- \def\PE@@NormalizeLineEnd##1#2##2{%
- \ifx\relax##2%
- \edef\PE@result{\PE@result##1}%
- \let\PE@next\relax
- \else
- \edef\PE@result{\PE@result##1#1}%
- \ifx#1##2% lf
- \let\PE@next\PE@@NormalizeLineEnd
- \else
- \def\PE@next{\PE@@NormalizeLineEnd##2}%
- \fi
- \fi
- \PE@next
- }%
+\def\PE@NormalizeLineEnd##1{%
+\def\PE@result{}%
+\expandafter\PE@@NormalizeLineEnd##1#2\relax
+\let##1\PE@result
+}%
+\def\PE@@NormalizeLineEnd##1#2##2{%
+\ifx\relax##2%
+\edef\PE@result{\PE@result##1}%
+\let\PE@next\relax
+\else
+\edef\PE@result{\PE@result##1#1}%
+\ifx#1##2% lf
+\let\PE@next\PE@@NormalizeLineEnd
+\else
+\def\PE@next{\PE@@NormalizeLineEnd##2}%
+\fi
+\fi
+\PE@next
+}%
}%
\uppercase{%
- \x 89%
+\x 89%
}
\begingroup
- \catcode`\|=0 %
- \catcode`\\=12 %
- |gdef|PE@UnescapeString#1{%
- |begingroup
- |def|PE@result{}%
- |expandafter|PE@DeString#1\|relax
- |expandafter|endgroup
- |expandafter|def|expandafter#1|expandafter{|PE@result}%
- }%
- |gdef|PE@DeString#1\#2{%
- |ifx|relax#2%
- |edef|PE@result{|PE@result#1}%
- |let|PE@next|relax
- |else
- |if n#2%
- |uccode|ltx@zero=10 %
- |else|if r#2%
- |uccode|ltx@zero=13 %
- |else|if t#2%
- |uccode|ltx@zero=9 %
- |else|if b#2%
- |uccode|ltx@zero=8 %
- |else|if f#2%
- |uccode|ltx@zero=12 %
- |else
- |uccode|ltx@zero=|ltx@zero
- |fi|fi|fi|fi|fi
- |ifnum|uccode|ltx@zero>|ltx@zero
- |uppercase{%
- |edef|PE@temp{^^@}%
- }%
- |edef|PE@result{|PE@result#1|PE@temp}%
- |let|PE@next|PE@DeString
- |else
- |if\#2% backslash
- |edef|PE@result{|PE@result#1}%
- |let|PE@next|PE@CheckEndBackslash
- |else
- |ifnum`#2=10 % linefeed
- |edef|PE@result{|PE@result#1}%
- |let|PE@next|PE@DeString
- |else
- |ifcase|PE@TestOctDigit#2%
- |edef|PE@result{|PE@result#1}%
- |def|PE@next{|PE@OctI#2}%
- |else
- |edef|PE@result{|PE@result#1#2}%
- |let|PE@next|PE@DeString
- |fi
- |fi
- |fi
- |fi
- |fi
- |PE@next
- }%
- |gdef|PE@CheckEndBackslash#1{%
- |ifx|relax#1%
- |else
- |edef|PE@result{|PE@result\}%
- |expandafter|PE@DeString|expandafter#1%
- |fi
- }%
+\catcode`\|=0 %
+\catcode`\\=12 %
+ |gdef|PE@UnescapeString#1{%
+ |begingroup
+ |def|PE@result{}%
+ |expandafter|PE@DeString#1\|relax
+ |expandafter|endgroup
+ |expandafter|def|expandafter#1|expandafter{|PE@result}%
+}%
+ |gdef|PE@DeString#1\#2{%
+ |ifx|relax#2%
+ |edef|PE@result{|PE@result#1}%
+ |let|PE@next|relax
+ |else
+ |if n#2%
+ |uccode|ltx@zero=10 %
+ |else|if r#2%
+ |uccode|ltx@zero=13 %
+ |else|if t#2%
+ |uccode|ltx@zero=9 %
+ |else|if b#2%
+ |uccode|ltx@zero=8 %
+ |else|if f#2%
+ |uccode|ltx@zero=12 %
+ |else
+ |uccode|ltx@zero=|ltx@zero
+ |fi|fi|fi|fi|fi
+ |ifnum|uccode|ltx@zero>|ltx@zero
+ |uppercase{%
+ |edef|PE@temp{^^@}%
+}%
+ |edef|PE@result{|PE@result#1|PE@temp}%
+ |let|PE@next|PE@DeString
+ |else
+ |if\#2% backslash
+ |edef|PE@result{|PE@result#1}%
+ |let|PE@next|PE@CheckEndBackslash
+ |else
+ |ifnum`#2=10 % linefeed
+ |edef|PE@result{|PE@result#1}%
+ |let|PE@next|PE@DeString
+ |else
+ |ifcase|PE@TestOctDigit#2%
+ |edef|PE@result{|PE@result#1}%
+ |def|PE@next{|PE@OctI#2}%
+ |else
+ |edef|PE@result{|PE@result#1#2}%
+ |let|PE@next|PE@DeString
+ |fi
+ |fi
+ |fi
+ |fi
+ |fi
+ |PE@next
+}%
+ |gdef|PE@CheckEndBackslash#1{%
+ |ifx|relax#1%
+ |else
+ |edef|PE@result{|PE@result\}%
+ |expandafter|PE@DeString|expandafter#1%
+ |fi
+}%
|endgroup
\def\PE@TestOctDigit#1{%
- \ifnum`#1<48 % 0
- \ltx@one
- \else
- \ifnum`#1>55 % 7
- \ltx@one
- \else
- \ltx@zero
- \fi
- \fi
+\ifnum`#1<48 % 0
+\ltx@one
+\else
+\ifnum`#1>55 % 7
+\ltx@one
+\else
+\ltx@zero
+\fi
+\fi
}
\def\PE@OctI#1#2{%
- \ifcase\PE@TestOctDigit#2%
- \def\PE@next{\PE@OctII{#1#2}}%
- \else
- \def\PE@next{\PE@OctAll#1#2}%
- \fi
- \PE@next
+\ifcase\PE@TestOctDigit#2%
+\def\PE@next{\PE@OctII{#1#2}}%
+\else
+\def\PE@next{\PE@OctAll#1#2}%
+\fi
+\PE@next
}
\def\PE@OctII#1#2{%
- \ifcase\PE@TestOctDigit#2%
- \def\PE@next{\PE@OctAll{#1#2}}%
- \else
- \def\PE@next{\PE@OctAll{#1}#2}%
- \fi
- \PE@next
+\ifcase\PE@TestOctDigit#2%
+\def\PE@next{\PE@OctAll{#1#2}}%
+\else
+\def\PE@next{\PE@OctAll{#1}#2}%
+\fi
+\PE@next
}
\def\PE@OctAll#1{%
- \uccode\ltx@zero='#1\relax
- \uppercase{%
- \edef\PE@result{\PE@result^^@}%
- }%
- \PE@DeString
+\uccode\ltx@zero='#1\relax
+\uppercase{%
+\edef\PE@result{\PE@result^^@}%
+}%
+\PE@DeString
}
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname RequirePackage\endcsname\relax
- \def\TMP@RequirePackage#1[#2]{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname ver@#1.sty\endcsname\relax
- \input #1.sty\relax
- \fi
- }%
- \TMP@RequirePackage{pdftexcmds}[2007/11/11]%
+\def\TMP@RequirePackage#1[#2]{%
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname ver@#1.sty\endcsname\relax
+\input #1.sty\relax
+\fi
+}%
+\TMP@RequirePackage{pdftexcmds}[2007/11/11]%
\else
- \RequirePackage{pdftexcmds}[2007/11/11]%
+\RequirePackage{pdftexcmds}[2007/11/11]%
\fi
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname pdf@escapehex\endcsname\relax
- \long\def\EdefEscapeHex#1#2{%
- \EdefSanitize#1{#2}%
- \PE@SanitizeSpaceOther#1%
- \PE@EscapeHex#1%
- }%
- \def\EdefUnescapeHex#1#2{%
- \EdefSanitize#1{#2}%
- \PE@UnescapeHex#1%
- }%
- \long\def\EdefEscapeName#1#2{%
- \EdefSanitize#1{#2}%
- \PE@SanitizeSpaceOther#1%
- \PE@EscapeName#1%
- }%
- \long\def\EdefEscapeString#1#2{%
- \EdefSanitize#1{#2}%
- \PE@SanitizeSpaceOther#1%
- \PE@EscapeString#1%
- }%
-\else
- \long\def\PE@edefbabel#1#2#3{%
- \begingroup
- \csname @save@activestrue\endcsname
- \edef#1{#2{#3}}%
- \expandafter\endgroup
- \expandafter\def\expandafter#1\expandafter{#1}%
- }%
- \long\def\EdefEscapeHex#1#2{%
- \PE@edefbabel#1\pdf@escapehex{#2}%
- }%
- \def\EdefUnescapeHex#1#2{%
- \PE@edefbabel#1\pdf@unescapehex{#2}%
- }%
- \long\def\EdefEscapeName#1#2{%
- \PE@edefbabel#1\pdf@escapename{#2}%
- }%
- \long\def\EdefEscapeString#1#2{%
- \PE@edefbabel#1\pdf@escapestring{#2}%
- }%
- \expandafter\PE@AtEnd
+\long\def\EdefEscapeHex#1#2{%
+\EdefSanitize#1{#2}%
+\PE@SanitizeSpaceOther#1%
+\PE@EscapeHex#1%
+}%
+\def\EdefUnescapeHex#1#2{%
+\EdefSanitize#1{#2}%
+\PE@UnescapeHex#1%
+}%
+\long\def\EdefEscapeName#1#2{%
+\EdefSanitize#1{#2}%
+\PE@SanitizeSpaceOther#1%
+\PE@EscapeName#1%
+}%
+\long\def\EdefEscapeString#1#2{%
+\EdefSanitize#1{#2}%
+\PE@SanitizeSpaceOther#1%
+\PE@EscapeString#1%
+}%
+\else
+\long\def\PE@edefbabel#1#2#3{%
+\begingroup
+\csname @save@activestrue\endcsname
+\edef#1{#2{#3}}%
+\expandafter\endgroup
+\expandafter\def\expandafter#1\expandafter{#1}%
+}%
+\long\def\EdefEscapeHex#1#2{%
+\PE@edefbabel#1\pdf@escapehex{#2}%
+}%
+\def\EdefUnescapeHex#1#2{%
+\PE@edefbabel#1\pdf@unescapehex{#2}%
+}%
+\long\def\EdefEscapeName#1#2{%
+\PE@edefbabel#1\pdf@escapename{#2}%
+}%
+\long\def\EdefEscapeString#1#2{%
+\PE@edefbabel#1\pdf@escapestring{#2}%
+}%
+\expandafter\PE@AtEnd
\fi%
\edef\PE@hash{\string#}
\begingroup
- \escapechar=-1 %
+\escapechar=-1 %
\edef\x{\endgroup
- \def\noexpand\PE@backslash{\string\\}%
+\def\noexpand\PE@backslash{\string\\}%
}
\x
\ltx@newif\ifPE@etex
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname numexpr\endcsname\relax
\else
- \PE@etextrue
+\PE@etextrue
\fi
\ifPE@etex
- \def\PE@EscapeHex#1{%
- \edef#1{\expandafter\PE@ToHex#1\relax}%
- }%
+\def\PE@EscapeHex#1{%
+\edef#1{\expandafter\PE@ToHex#1\relax}%
+}%
\else
- \def\PE@EscapeHex#1{%
- \def\PE@result{}%
- \expandafter\PE@ToHex#1\relax
- \let#1\PE@result
- }%
+\def\PE@EscapeHex#1{%
+\def\PE@result{}%
+\expandafter\PE@ToHex#1\relax
+\let#1\PE@result
+}%
\fi
\def\PE@ToHex#1{%
- \ifx\relax#1%
- \else
- \PE@HexChar{#1}%
- \expandafter\PE@ToHex
- \fi
+\ifx\relax#1%
+\else
+\PE@HexChar{#1}%
+\expandafter\PE@ToHex
+\fi
}%
\ifPE@etex
- \def\PE@HexChar#1{%
- \PE@HexDigit{\numexpr\dimexpr.0625\dimexpr`#1sp\relax\relax\relax}%
- \PE@HexDigit{%
- \numexpr`#1-16*\dimexpr.0625\dimexpr`#1sp\relax\relax\relax
- }%
- }%
-\else
- \def\PE@HexChar#1{%
- \dimen0=`#1sp%
- \dimen2=.0625\dimen0 %
- \advance\dimen0-16\dimen2 %
- \edef\PE@result{%
- \PE@result
- \PE@HexDigit{\dimen2 }%
- \PE@HexDigit{\dimen0 }%
- }%
- }%
+\def\PE@HexChar#1{%
+\PE@HexDigit{\numexpr\dimexpr.0625\dimexpr`#1sp\relax\relax\relax}%
+\PE@HexDigit{%
+\numexpr`#1-16*\dimexpr.0625\dimexpr`#1sp\relax\relax\relax
+}%
+}%
+\else
+\def\PE@HexChar#1{%
+\dimen0=`#1sp%
+\dimen2=.0625\dimen0 %
+\advance\dimen0-16\dimen2 %
+\edef\PE@result{%
+\PE@result
+\PE@HexDigit{\dimen2 }%
+\PE@HexDigit{\dimen0 }%
+}%
+}%
\fi
\def\PE@HexDigit#1{%
- \expandafter\string
- \ifcase#1%
- 0\or 1\or 2\or 3\or 4\or 5\or 6\or 7\or 8\or 9\or
- A\or B\or C\or D\or E\or F%
- \fi
+\expandafter\string
+\ifcase#1%
+ 0\or 1\or 2\or 3\or 4\or 5\or 6\or 7\or 8\or 9\or
+ A\or B\or C\or D\or E\or F%
+\fi
}
\ifPE@etex
- \def\PE@OctChar#1{%
- \expandafter\PE@@OctChar
- \the\numexpr\dimexpr.015625\dimexpr`#1sp\relax\relax
- \expandafter\relax
- \expandafter\relax
- \the\numexpr\dimexpr.125\dimexpr`#1sp\relax\relax\relax
- \relax
- #1%
- }%
- \def\PE@@OctChar#1\relax#2\relax#3{%
- \PE@backslash
- #1%
- \the\numexpr#2-8*#1\relax
- \the\numexpr\dimexpr`#3sp\relax-8*#2\relax
- }%
-\else
- \def\PE@OctChar#1{%
- \dimen0=`#1sp%
- \dimen2=.125\dimen0 %
- \dimen4=.125\dimen2 %
- \advance\dimen0-8\dimen2 %
- \advance\dimen2-8\dimen4 %
- \edef\PE@result{%
- \PE@result
- \PE@backslash
- \number\dimen4 %
- \number\dimen2 %
- \number\dimen0 %
- }%
- }%
+\def\PE@OctChar#1{%
+\expandafter\PE@@OctChar
+\the\numexpr\dimexpr.015625\dimexpr`#1sp\relax\relax
+\expandafter\relax
+\expandafter\relax
+\the\numexpr\dimexpr.125\dimexpr`#1sp\relax\relax\relax
+\relax
+#1%
+}%
+\def\PE@@OctChar#1\relax#2\relax#3{%
+\PE@backslash
+#1%
+\the\numexpr#2-8*#1\relax
+\the\numexpr\dimexpr`#3sp\relax-8*#2\relax
+}%
+\else
+\def\PE@OctChar#1{%
+\dimen0=`#1sp%
+\dimen2=.125\dimen0 %
+\dimen4=.125\dimen2 %
+\advance\dimen0-8\dimen2 %
+\advance\dimen2-8\dimen4 %
+\edef\PE@result{%
+\PE@result
+\PE@backslash
+\number\dimen4 %
+\number\dimen2 %
+\number\dimen0 %
+}%
+}%
\fi
\def\PE@UnescapeHex#1{%
- \begingroup
- \PE@InitUccodeHexDigit
- \def\PE@result{}%
- \expandafter\PE@DeHex#1\relax\relax
- \expandafter\endgroup
- \expandafter\def\expandafter#1\expandafter{\PE@result}%
+\begingroup
+\PE@InitUccodeHexDigit
+\def\PE@result{}%
+\expandafter\PE@DeHex#1\relax\relax
+\expandafter\endgroup
+\expandafter\def\expandafter#1\expandafter{\PE@result}%
}
\def\PE@DeHex#1#2{%
- \ifx#2\relax
- \ifx#1\relax
- \let\PE@next\relax
- \else
- \uppercase{%
- \def\PE@testA{#1}%
- }%
- \ifcase\expandafter\PE@TestUcHexDigit\PE@testA
- \def\PE@next{%
- \PE@DeHex#10\relax\relax
- }%
- \else
- \let\PE@next\relax
- \fi
- \fi
- \else
- \uppercase{%
- \def\PE@testA{#1}%
- \def\PE@testB{#2}%
- }%
- \ifcase\expandafter\PE@TestUcHexDigit\PE@testA
- \ifcase\expandafter\PE@TestUcHexDigit\PE@testB
- \uccode\ltx@zero="\PE@testA\PE@testB\relax
- \ifnum\uccode\ltx@zero=32 %
- \let\PE@temp\PE@space@space
- \else
- \uppercase{%
- \def\PE@temp{^^@}%
- }%
- \fi
- \edef\PE@result{\PE@result\PE@temp}%
- \let\PE@next\PE@DeHex
- \else
- % invalid input sequence
- \def\PE@next{%
- \PE@DeHex#1%
- }%
- \fi
- \else
- % invalid input sequence
- \def\PE@next{\PE@DeHex#2}%
- \fi
- \fi
- \PE@next
+\ifx#2\relax
+\ifx#1\relax
+\let\PE@next\relax
+\else
+\uppercase{%
+\def\PE@testA{#1}%
+}%
+\ifcase\expandafter\PE@TestUcHexDigit\PE@testA
+\def\PE@next{%
+\PE@DeHex#10\relax\relax
+}%
+\else
+\let\PE@next\relax
+\fi
+\fi
+\else
+\uppercase{%
+\def\PE@testA{#1}%
+\def\PE@testB{#2}%
+}%
+\ifcase\expandafter\PE@TestUcHexDigit\PE@testA
+\ifcase\expandafter\PE@TestUcHexDigit\PE@testB
+\uccode\ltx@zero="\PE@testA\PE@testB\relax
+\ifnum\uccode\ltx@zero=32 %
+\let\PE@temp\PE@space@space
+\else
+\uppercase{%
+\def\PE@temp{^^@}%
+}%
+\fi
+\edef\PE@result{\PE@result\PE@temp}%
+\let\PE@next\PE@DeHex
+\else
+% invalid input sequence
+\def\PE@next{%
+\PE@DeHex#1%
+}%
+\fi
+\else
+% invalid input sequence
+\def\PE@next{\PE@DeHex#2}%
+\fi
+\fi
+\PE@next
}
\ifPE@etex
- \def\PE@EscapeName#1{%
- \edef#1{\expandafter\PE@EscapeNameTokens#1\relax}%
- }%
+\def\PE@EscapeName#1{%
+\edef#1{\expandafter\PE@EscapeNameTokens#1\relax}%
+}%
\else
- \def\PE@EscapeName#1{%
- \def\PE@result{}%
- \expandafter\PE@EscapeNameTokens#1\relax
- \let#1\PE@result
- }%
+\def\PE@EscapeName#1{%
+\def\PE@result{}%
+\expandafter\PE@EscapeNameTokens#1\relax
+\let#1\PE@result
+}%
\fi
\def\PE@EscapeNameTokens#1{%
- \ifx\relax#1%
- \else
- \ifnum`#1<33 %
- \ifcase`#1 %
- % drop illegal zero
- \else
- \PE@EscapeNameAdd\PE@hash
- \PE@HexChar#1%
- \fi
- \else
- \ifnum`#1>126 %
- \PE@EscapeNameAdd\PE@hash
- \PE@HexChar#1%
- \else \ifnum`#1=35 \PE@EscapeNameHashChar 23% #
- \else\ifnum`#1=37 \PE@EscapeNameHashChar 25% %
- \else\ifnum`#1=40 \PE@EscapeNameHashChar 28% (
- \else\ifnum`#1=41 \PE@EscapeNameHashChar 29% )
- \else\ifnum`#1=47 \PE@EscapeNameHashChar 2F% /
- \else\ifnum`#1=60 \PE@EscapeNameHashChar 3C% <
- \else\ifnum`#1=62 \PE@EscapeNameHashChar 3E% >
- \else\ifnum`#1=91 \PE@EscapeNameHashChar 5B% [
- \else\ifnum`#1=93 \PE@EscapeNameHashChar 5D% ]
- \else\ifnum`#1=123 \PE@EscapeNameHashChar 7B% {
- \else\ifnum`#1=125 \PE@EscapeNameHashChar 7D% }
- \else
- \PE@EscapeNameAdd{#1}%
- \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
- \fi
- \fi
- \expandafter\PE@EscapeNameTokens
- \fi
+\ifx\relax#1%
+\else
+\ifnum`#1<33 %
+\ifcase`#1 %
+% drop illegal zero
+\else
+\PE@EscapeNameAdd\PE@hash
+\PE@HexChar#1%
+\fi
+\else
+\ifnum`#1>126 %
+\PE@EscapeNameAdd\PE@hash
+\PE@HexChar#1%
+\else \ifnum`#1=35 \PE@EscapeNameHashChar 23% #
+\else\ifnum`#1=37 \PE@EscapeNameHashChar 25% %
+\else\ifnum`#1=40 \PE@EscapeNameHashChar 28% (
+\else\ifnum`#1=41 \PE@EscapeNameHashChar 29% )
+\else\ifnum`#1=47 \PE@EscapeNameHashChar 2F% /
+\else\ifnum`#1=60 \PE@EscapeNameHashChar 3C% <
+\else\ifnum`#1=62 \PE@EscapeNameHashChar 3E% >
+\else\ifnum`#1=91 \PE@EscapeNameHashChar 5B% [
+\else\ifnum`#1=93 \PE@EscapeNameHashChar 5D% ]
+\else\ifnum`#1=123 \PE@EscapeNameHashChar 7B% {
+\else\ifnum`#1=125 \PE@EscapeNameHashChar 7D% }
+\else
+\PE@EscapeNameAdd{#1}%
+\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
+\fi
+\fi
+\expandafter\PE@EscapeNameTokens
+\fi
}%
\def\PE@EscapeNameHashChar#1#2{%
- \PE@EscapeNameAdd{\PE@hash\string#1\string#2}%
+\PE@EscapeNameAdd{\PE@hash\string#1\string#2}%
}%
\ifPE@etex
- \def\PE@EscapeNameAdd#1{#1}%
+\def\PE@EscapeNameAdd#1{#1}%
\else
- \def\PE@EscapeNameAdd#1{%
- \edef\PE@result{%
- \PE@result
- #1%
- }%
- }%
+\def\PE@EscapeNameAdd#1{%
+\edef\PE@result{%
+\PE@result
+#1%
+}%
+}%
\fi
\ifPE@etex
- \def\PE@EscapeString#1{%
- \edef#1{\expandafter\PE@EscapeStringTokens#1\relax}%
- }%
-\else
- \def\PE@EscapeString#1{%
- \begingroup
- \def\PE@result{}%
- \expandafter\PE@EscapeStringTokens#1\relax
- \expandafter\endgroup
- \expandafter\def\expandafter#1\expandafter{\PE@result}%
- }%
+\def\PE@EscapeString#1{%
+\edef#1{\expandafter\PE@EscapeStringTokens#1\relax}%
+}%
+\else
+\def\PE@EscapeString#1{%
+\begingroup
+\def\PE@result{}%
+\expandafter\PE@EscapeStringTokens#1\relax
+\expandafter\endgroup
+\expandafter\def\expandafter#1\expandafter{\PE@result}%
+}%
\fi
\def\PE@EscapeStringTokens#1{%
- \ifx\relax#1%
- \else
- \ifnum`#1<33 %
- \PE@OctChar#1%
- \else
- \ifnum`#1>126 %
- \PE@OctChar#1%
- \else \ifnum`#1=40 \PE@EscapeStringAdd{\string\(}% (
- \else\ifnum`#1=41 \PE@EscapeStringAdd{\string\)}% )
- \else\ifnum`#1=92 \PE@EscapeStringAdd{\string\\}% \
- \else
- \PE@EscapeStringAdd{#1}%
- \fi\fi\fi
- \fi
- \fi
- \expandafter\PE@EscapeStringTokens
- \fi
+\ifx\relax#1%
+\else
+\ifnum`#1<33 %
+\PE@OctChar#1%
+\else
+\ifnum`#1>126 %
+\PE@OctChar#1%
+\else \ifnum`#1=40 \PE@EscapeStringAdd{\string\(}% (
+\else\ifnum`#1=41 \PE@EscapeStringAdd{\string\)}% )
+\else\ifnum`#1=92 \PE@EscapeStringAdd{\string\\}% \
+\else
+\PE@EscapeStringAdd{#1}%
+\fi\fi\fi
+\fi
+\fi
+\expandafter\PE@EscapeStringTokens
+\fi
}%
\ifPE@etex
- \def\PE@EscapeStringAdd#1{#1}%
+\def\PE@EscapeStringAdd#1{#1}%
\else
- \def\PE@EscapeStringAdd#1{%
- \edef\PE@result{%
- \PE@result
- #1%
- }%
- }%
+\def\PE@EscapeStringAdd#1{%
+\edef\PE@result{%
+\PE@result
+#1%
+}%
+}%
\fi
\PE@AtEnd%
- \endinput
+\endinput
<hobsub>
\hobsub@StopPackage
\hobsub@StartPackage{bigintcalc}
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode123=1 % {
- \catcode125=2 % }
- \expandafter\let\expandafter\x\csname ver@bigintcalc.sty\endcsname
- \ifx\x\relax % plain-TeX, first loading
- \else
- \def\empty{}%
- \ifx\x\empty % LaTeX, first loading,
- % variable is initialized, but \ProvidesPackage not yet seen
- \else
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
- \fi
- \x{bigintcalc}{The package is already loaded}%
- \aftergroup\endinput
- \fi
- \fi
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\expandafter\let\expandafter\x\csname ver@bigintcalc.sty\endcsname
+\ifx\x\relax % plain-TeX, first loading
+\else
+\def\empty{}%
+\ifx\x\empty % LaTeX, first loading,
+% variable is initialized, but \ProvidesPackage not yet seen
+\else
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+\fi
+\x{bigintcalc}{The package is already loaded}%
+\aftergroup\endinput
+\fi
+\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode47=12 % /
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode91=12 % [
- \catcode93=12 % ]
- \catcode123=1 % {
- \catcode125=2 % }
- \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
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode47=12 % /
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode91=12 % [
+\catcode93=12 % ]
+\catcode123=1 % {
+\catcode125=2 % }
+\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@bigintcalc.sty\endcsname
\ProvidesPackage{bigintcalc}%
- [2011/01/30 v1.2 Expandable big integer calculations (HO)]%
+ [2011/01/30 v1.2 Expandable big integer calculations (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode123=1 % {
- \catcode125=2 % }
- \catcode64=11 % @
- \def\x{\endgroup
- \expandafter\edef\csname BIC@AtEnd\endcsname{%
- \endlinechar=\the\endlinechar\relax
- \catcode13=\the\catcode13\relax
- \catcode32=\the\catcode32\relax
- \catcode35=\the\catcode35\relax
- \catcode61=\the\catcode61\relax
- \catcode64=\the\catcode64\relax
- \catcode123=\the\catcode123\relax
- \catcode125=\the\catcode125\relax
- }%
- }%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode123=1 % {
+\catcode125=2 % }
+\catcode64=11 % @
+\def\x{\endgroup
+\expandafter\edef\csname BIC@AtEnd\endcsname{%
+\endlinechar=\the\endlinechar\relax
+\catcode13=\the\catcode13\relax
+\catcode32=\the\catcode32\relax
+\catcode35=\the\catcode35\relax
+\catcode61=\the\catcode61\relax
+\catcode64=\the\catcode64\relax
+\catcode123=\the\catcode123\relax
+\catcode125=\the\catcode125\relax
+}%
+}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
@@ -5944,11 +5944,11 @@ $ \expandafter\ifx\csname KV@#1@#2@default\endcsname\relax
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2{%
- \edef\BIC@AtEnd{%
- \BIC@AtEnd
- \catcode#1=\the\catcode#1\relax
- }%
- \catcode#1=#2\relax
+\edef\BIC@AtEnd{%
+\BIC@AtEnd
+\catcode#1=\the\catcode#1\relax
+}%
+\catcode#1=#2\relax
}
\TMP@EnsureCode{33}{12}% !
\TMP@EnsureCode{36}{14}% $ (comment!)
@@ -5970,357 +5970,357 @@ $ \expandafter\ifx\csname KV@#1@#2@default\endcsname\relax
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname BIC@TestMode\endcsname\relax
\else
- \catcode63=9 % ? (ignore)
+\catcode63=9 % ? (ignore)
\fi
? \let\BIC@@TestMode\BIC@TestMode
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname numexpr\endcsname\relax
- \catcode36=9 % $ (ignore)
+\catcode36=9 % $ (ignore)
\else
- \catcode38=9 % & (ignore)
+\catcode38=9 % & (ignore)
\fi
\let\BIC@Fi\fi
\def\BIC@AfterFi#1#2\BIC@Fi{\fi#1}%
\def\BIC@AfterFiFi#1#2\BIC@Fi{\fi\fi#1}%
\def\BIC@AfterFiFiFi#1#2\BIC@Fi{\fi\fi\fi#1}%
\begingroup
- \def\x#1{\endgroup
- \let\BIC@Space= #1%
- }%
+\def\x#1{\endgroup
+\let\BIC@Space= #1%
+}%
\x{ }
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname RequirePackage\endcsname\relax
- \def\TMP@RequirePackage#1[#2]{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname ver@#1.sty\endcsname\relax
- \input #1.sty\relax
- \fi
- }%
- \TMP@RequirePackage{pdftexcmds}[2007/11/11]%
+\def\TMP@RequirePackage#1[#2]{%
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname ver@#1.sty\endcsname\relax
+\input #1.sty\relax
+\fi
+}%
+\TMP@RequirePackage{pdftexcmds}[2007/11/11]%
\else
\fi
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname pdf@escapehex\endcsname\relax
- \def\BIC@Expand#1{%
- \romannumeral0%
- \BIC@@Expand#1!\@nil{}%
- }%
- \def\BIC@@Expand#1#2\@nil#3{%
- \expandafter\ifcat\noexpand#1\relax
- \expandafter\@firstoftwo
- \else
- \expandafter\@secondoftwo
- \fi
- {%
- \expandafter\BIC@@Expand#1#2\@nil{#3}%
- }{%
- \ifx#1!%
- \expandafter\@firstoftwo
- \else
- \expandafter\@secondoftwo
- \fi
- { #3}{%
- \BIC@@Expand#2\@nil{#3#1}%
- }%
- }%
- }%
- \expandafter\ifx\csname @firstoftwo\endcsname\relax
- \long\def\@firstoftwo#1#2{#1}%
- \fi
- \expandafter\ifx\csname @secondoftwo\endcsname\relax
- \long\def\@secondoftwo#1#2{#2}%
- \fi
-\else
- \def\BIC@Expand#1{%
- \romannumeral0\expandafter\expandafter\expandafter\BIC@Space
- \pdf@unescapehex{%
- \expandafter\expandafter\expandafter
- \BIC@StripHexSpace\pdf@escapehex{#1}20\@nil
- }%
- }%
- \def\BIC@StripHexSpace#120#2\@nil{%
- #1%
- \ifx\\#2\\%
- \else
- \BIC@AfterFi{%
- \BIC@StripHexSpace#2\@nil
- }%
- \BIC@Fi
- }%
+\def\BIC@Expand#1{%
+\romannumeral0%
+\BIC@@Expand#1!\@nil{}%
+}%
+\def\BIC@@Expand#1#2\@nil#3{%
+\expandafter\ifcat\noexpand#1\relax
+\expandafter\@firstoftwo
+\else
+\expandafter\@secondoftwo
+\fi
+{%
+\expandafter\BIC@@Expand#1#2\@nil{#3}%
+}{%
+\ifx#1!%
+\expandafter\@firstoftwo
+\else
+\expandafter\@secondoftwo
+\fi
+{ #3}{%
+\BIC@@Expand#2\@nil{#3#1}%
+}%
+}%
+}%
+\expandafter\ifx\csname @firstoftwo\endcsname\relax
+\long\def\@firstoftwo#1#2{#1}%
+\fi
+\expandafter\ifx\csname @secondoftwo\endcsname\relax
+\long\def\@secondoftwo#1#2{#2}%
+\fi
+\else
+\def\BIC@Expand#1{%
+\romannumeral0\expandafter\expandafter\expandafter\BIC@Space
+\pdf@unescapehex{%
+\expandafter\expandafter\expandafter
+\BIC@StripHexSpace\pdf@escapehex{#1}20\@nil
+}%
+}%
+\def\BIC@StripHexSpace#120#2\@nil{%
+#1%
+\ifx\\#2\\%
+\else
+\BIC@AfterFi{%
+\BIC@StripHexSpace#2\@nil
+}%
+\BIC@Fi
+}%
\fi
\def\BIC@Normalize#1#2{%
- \ifx#2-%
- \ifx\\#1\\%
- \BIC@AfterFiFi{%
- \BIC@Normalize-%
- }%
- \else
- \BIC@AfterFiFi{%
- \BIC@Normalize{}%
- }%
- \fi
- \else
- \ifx#2+%
- \BIC@AfterFiFi{%
- \BIC@Normalize{#1}%
- }%
- \else
- \ifx#20%
- \BIC@AfterFiFiFi{%
- \BIC@NormalizeZero{#1}%
- }%
- \else
- \BIC@AfterFiFiFi{%
- \BIC@NormalizeDigits#1#2%
- }%
- \fi
- \fi
- \BIC@Fi
+\ifx#2-%
+\ifx\\#1\\%
+\BIC@AfterFiFi{%
+\BIC@Normalize-%
+}%
+\else
+\BIC@AfterFiFi{%
+\BIC@Normalize{}%
+}%
+\fi
+\else
+\ifx#2+%
+\BIC@AfterFiFi{%
+\BIC@Normalize{#1}%
+}%
+\else
+\ifx#20%
+\BIC@AfterFiFiFi{%
+\BIC@NormalizeZero{#1}%
+}%
+\else
+\BIC@AfterFiFiFi{%
+\BIC@NormalizeDigits#1#2%
+}%
+\fi
+\fi
+\BIC@Fi
}
\def\BIC@NormalizeZero#1#2{%
- \ifx#2!%
- \BIC@AfterFi{ 0}%
- \else
- \ifx#20%
- \BIC@AfterFiFi{%
- \BIC@NormalizeZero{#1}%
- }%
- \else
- \BIC@AfterFiFi{%
- \BIC@NormalizeDigits#1#2%
- }%
- \fi
- \BIC@Fi
+\ifx#2!%
+\BIC@AfterFi{ 0}%
+\else
+\ifx#20%
+\BIC@AfterFiFi{%
+\BIC@NormalizeZero{#1}%
+}%
+\else
+\BIC@AfterFiFi{%
+\BIC@NormalizeDigits#1#2%
+}%
+\fi
+\BIC@Fi
}
\def\BIC@NormalizeDigits#1!{ #1}
\def\bigintcalcNum#1{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@Normalize
- \expandafter\expandafter\expandafter{%
- \expandafter\expandafter\expandafter}%
- \BIC@Expand{#1}!%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@Normalize
+\expandafter\expandafter\expandafter{%
+\expandafter\expandafter\expandafter}%
+\BIC@Expand{#1}!%
}
\def\bigintcalcInv#1{%
- \romannumeral0\expandafter\expandafter\expandafter\BIC@Space
- \bigintcalcNum{-#1}%
+\romannumeral0\expandafter\expandafter\expandafter\BIC@Space
+\bigintcalcNum{-#1}%
}
\def\bigintcalcAbs#1{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@Abs
- \bigintcalcNum{#1}%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@Abs
+\bigintcalcNum{#1}%
}
\def\BIC@Abs#1{%
- \ifx#1-%
- \expandafter\BIC@Space
- \else
- \expandafter\BIC@Space
- \expandafter#1%
- \fi
+\ifx#1-%
+\expandafter\BIC@Space
+\else
+\expandafter\BIC@Space
+\expandafter#1%
+\fi
}
\def\bigintcalcSgn#1{%
- \number
- \expandafter\expandafter\expandafter\BIC@Sgn
- \bigintcalcNum{#1}! %
+\number
+\expandafter\expandafter\expandafter\BIC@Sgn
+\bigintcalcNum{#1}! %
}
\def\BIC@Sgn#1#2!{%
- \ifx#1-%
- -1%
- \else
- \ifx#10%
- 0%
- \else
- 1%
- \fi
- \fi
+\ifx#1-%
+ -1%
+\else
+\ifx#10%
+ 0%
+\else
+ 1%
+\fi
+\fi
}
\def\bigintcalcCmp#1#2{%
- \number
- \expandafter\expandafter\expandafter\BIC@Cmp
- \bigintcalcNum{#2}!{#1}%
+\number
+\expandafter\expandafter\expandafter\BIC@Cmp
+\bigintcalcNum{#2}!{#1}%
}
\def\BIC@Cmp#1!#2{%
- \expandafter\expandafter\expandafter\BIC@@Cmp
- \bigintcalcNum{#2}!#1!%
+\expandafter\expandafter\expandafter\BIC@@Cmp
+\bigintcalcNum{#2}!#1!%
}
\def\BIC@@Cmp#1#2!#3#4!{%
- \ifx#1-%
- \ifx#3-%
- \BIC@AfterFiFi{%
- \BIC@@Cmp#4!#2!%
- }%
- \else
- \BIC@AfterFiFi{%
- -1 %
- }%
- \fi
- \else
- \ifx#3-%
- \BIC@AfterFiFi{%
- 1 %
- }%
- \else
- \BIC@AfterFiFi{%
- \BIC@CmpLength#1#2!#3#4!#1#2!#3#4!%
- }%
- \fi
- \BIC@Fi
+\ifx#1-%
+\ifx#3-%
+\BIC@AfterFiFi{%
+\BIC@@Cmp#4!#2!%
+}%
+\else
+\BIC@AfterFiFi{%
+ -1 %
+}%
+\fi
+\else
+\ifx#3-%
+\BIC@AfterFiFi{%
+ 1 %
+}%
+\else
+\BIC@AfterFiFi{%
+\BIC@CmpLength#1#2!#3#4!#1#2!#3#4!%
+}%
+\fi
+\BIC@Fi
}
\def\BIC@PosCmp#1!#2!{%
- \BIC@CmpLength#1!#2!#1!#2!%
+\BIC@CmpLength#1!#2!#1!#2!%
}
\def\BIC@CmpLength#1#2!#3#4!{%
- \ifx\\#2\\%
- \ifx\\#4\\%
- \BIC@AfterFiFi\BIC@CmpDiff
- \else
- \BIC@AfterFiFi{%
- \BIC@CmpResult{-1}%
- }%
- \fi
- \else
- \ifx\\#4\\%
- \BIC@AfterFiFi{%
- \BIC@CmpResult1%
- }%
- \else
- \BIC@AfterFiFi{%
- \BIC@CmpLength#2!#4!%
- }%
- \fi
- \BIC@Fi
+\ifx\\#2\\%
+\ifx\\#4\\%
+\BIC@AfterFiFi\BIC@CmpDiff
+\else
+\BIC@AfterFiFi{%
+\BIC@CmpResult{-1}%
+}%
+\fi
+\else
+\ifx\\#4\\%
+\BIC@AfterFiFi{%
+\BIC@CmpResult1%
+}%
+\else
+\BIC@AfterFiFi{%
+\BIC@CmpLength#2!#4!%
+}%
+\fi
+\BIC@Fi
}
\def\BIC@CmpResult#1#2!#3!{#1 }
\def\BIC@CmpDiff#1#2!#3#4!{%
- \ifnum#1<#3 %
- \BIC@AfterFi{%
- -1 %
- }%
- \else
- \ifnum#1>#3 %
- \BIC@AfterFiFi{%
- 1 %
- }%
- \else
- \ifx\\#2\\%
- \BIC@AfterFiFiFi{%
- 0 %
- }%
- \else
- \BIC@AfterFiFiFi{%
- \BIC@CmpDiff#2!#4!%
- }%
- \fi
- \fi
- \BIC@Fi
+\ifnum#1<#3 %
+\BIC@AfterFi{%
+ -1 %
+}%
+\else
+\ifnum#1>#3 %
+\BIC@AfterFiFi{%
+ 1 %
+}%
+\else
+\ifx\\#2\\%
+\BIC@AfterFiFiFi{%
+ 0 %
+}%
+\else
+\BIC@AfterFiFiFi{%
+\BIC@CmpDiff#2!#4!%
+}%
+\fi
+\fi
+\BIC@Fi
}
\def\bigintcalcMin#1{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@MinMax
- \bigintcalcNum{#1}!-!%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@MinMax
+\bigintcalcNum{#1}!-!%
}
\def\bigintcalcMax#1{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@MinMax
- \bigintcalcNum{#1}!!%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@MinMax
+\bigintcalcNum{#1}!!%
}
\def\BIC@MinMax#1!#2!#3{%
- \expandafter\expandafter\expandafter\BIC@@MinMax
- \bigintcalcNum{#3}!#1!#2!%
+\expandafter\expandafter\expandafter\BIC@@MinMax
+\bigintcalcNum{#3}!#1!#2!%
}
\def\BIC@@MinMax#1!#2!#3!{%
- \ifnum\BIC@@Cmp#1!#2!=#31 %
- \BIC@AfterFi{ #1}%
- \else
- \BIC@AfterFi{ #2}%
- \BIC@Fi
+\ifnum\BIC@@Cmp#1!#2!=#31 %
+\BIC@AfterFi{ #1}%
+\else
+\BIC@AfterFi{ #2}%
+\BIC@Fi
}
\def\bigintcalcOdd#1{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@Odd
- \bigintcalcAbs{#1}!%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@Odd
+\bigintcalcAbs{#1}!%
}
\def\BigIntCalcOdd#1!{%
- \romannumeral0%
- \BIC@Odd#1!%
+\romannumeral0%
+\BIC@Odd#1!%
}
\def\BIC@Odd#1#2{%
- \ifx#2!%
- \ifodd#1 %
- \BIC@AfterFiFi{ 1}%
- \else
- \BIC@AfterFiFi{ 0}%
- \fi
- \else
- \expandafter\BIC@Odd\expandafter#2%
- \BIC@Fi
+\ifx#2!%
+\ifodd#1 %
+\BIC@AfterFiFi{ 1}%
+\else
+\BIC@AfterFiFi{ 0}%
+\fi
+\else
+\expandafter\BIC@Odd\expandafter#2%
+\BIC@Fi
}
\def\bigintcalcInc#1{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@IncSwitch
- \bigintcalcNum{#1}!%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@IncSwitch
+\bigintcalcNum{#1}!%
}
\def\BIC@IncSwitch#1#2!{%
- \ifcase\BIC@@Cmp#1#2!-1!%
- \BIC@AfterFi{ 0}%
- \or
- \BIC@AfterFi{%
- \BIC@Inc#1#2!{}%
- }%
- \else
- \BIC@AfterFi{%
- \expandafter-\romannumeral0%
- \BIC@Dec#2!{}%
- }%
- \BIC@Fi
+\ifcase\BIC@@Cmp#1#2!-1!%
+\BIC@AfterFi{ 0}%
+\or
+\BIC@AfterFi{%
+\BIC@Inc#1#2!{}%
+}%
+\else
+\BIC@AfterFi{%
+\expandafter-\romannumeral0%
+\BIC@Dec#2!{}%
+}%
+\BIC@Fi
}
\def\bigintcalcDec#1{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@DecSwitch
- \bigintcalcNum{#1}!%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@DecSwitch
+\bigintcalcNum{#1}!%
}
\def\BIC@DecSwitch#1#2!{%
- \ifcase\BIC@Sgn#1#2! %
- \BIC@AfterFi{ -1}%
- \or
- \BIC@AfterFi{%
- \BIC@Dec#1#2!{}%
- }%
- \else
- \BIC@AfterFi{%
- \expandafter-\romannumeral0%
- \BIC@Inc#2!{}%
- }%
- \BIC@Fi
+\ifcase\BIC@Sgn#1#2! %
+\BIC@AfterFi{ -1}%
+\or
+\BIC@AfterFi{%
+\BIC@Dec#1#2!{}%
+}%
+\else
+\BIC@AfterFi{%
+\expandafter-\romannumeral0%
+\BIC@Inc#2!{}%
+}%
+\BIC@Fi
}
\def\BigIntCalcInc#1!{%
- \romannumeral0\BIC@Inc#1!{}%
+\romannumeral0\BIC@Inc#1!{}%
}
\def\BigIntCalcDec#1!{%
- \romannumeral0\BIC@Dec#1!{}%
+\romannumeral0\BIC@Dec#1!{}%
}
\def\BIC@Inc#1#2!#3{%
- \ifx\\#2\\%
- \BIC@AfterFi{%
- \BIC@@Inc1#1#3!{}%
- }%
- \else
- \BIC@AfterFi{%
- \BIC@Inc#2!{#1#3}%
- }%
- \BIC@Fi
+\ifx\\#2\\%
+\BIC@AfterFi{%
+\BIC@@Inc1#1#3!{}%
+}%
+\else
+\BIC@AfterFi{%
+\BIC@Inc#2!{#1#3}%
+}%
+\BIC@Fi
}
\def\BIC@@Inc#1#2#3!#4{%
- \ifcase#1 %
- \ifx\\#3\\%
- \BIC@AfterFiFi{ #2#4}%
- \else
- \BIC@AfterFiFi{%
- \BIC@@Inc0#3!{#2#4}%
- }%
- \fi
- \else
- \ifnum#2<9 %
- \BIC@AfterFiFi{%
+\ifcase#1 %
+\ifx\\#3\\%
+\BIC@AfterFiFi{ #2#4}%
+\else
+\BIC@AfterFiFi{%
+\BIC@@Inc0#3!{#2#4}%
+}%
+\fi
+\else
+\ifnum#2<9 %
+\BIC@AfterFiFi{%
& \expandafter\BIC@@@Inc\the\numexpr#2+1\relax
$ \expandafter\expandafter\expandafter\BIC@@@Inc
$ \ifcase#2 \expandafter1%
@@ -6334,51 +6334,51 @@ $ \or\expandafter8%
$ \or\expandafter9%
$? \else\BigIntCalcError:ThisCannotHappen%
$ \fi
- 0#3!{#4}%
- }%
- \else
- \BIC@AfterFiFi{%
- \BIC@@@Inc01#3!{#4}%
- }%
- \fi
- \BIC@Fi
+ 0#3!{#4}%
+}%
+\else
+\BIC@AfterFiFi{%
+\BIC@@@Inc01#3!{#4}%
+}%
+\fi
+\BIC@Fi
}
\def\BIC@@@Inc#1#2#3!#4{%
- \ifx\\#3\\%
- \ifnum#2=1 %
- \BIC@AfterFiFi{ 1#1#4}%
- \else
- \BIC@AfterFiFi{ #1#4}%
- \fi
- \else
- \BIC@AfterFi{%
- \BIC@@Inc#2#3!{#1#4}%
- }%
- \BIC@Fi
+\ifx\\#3\\%
+\ifnum#2=1 %
+\BIC@AfterFiFi{ 1#1#4}%
+\else
+\BIC@AfterFiFi{ #1#4}%
+\fi
+\else
+\BIC@AfterFi{%
+\BIC@@Inc#2#3!{#1#4}%
+}%
+\BIC@Fi
}
\def\BIC@Dec#1#2!#3{%
- \ifx\\#2\\%
- \BIC@AfterFi{%
- \BIC@@Dec1#1#3!{}%
- }%
- \else
- \BIC@AfterFi{%
- \BIC@Dec#2!{#1#3}%
- }%
- \BIC@Fi
+\ifx\\#2\\%
+\BIC@AfterFi{%
+\BIC@@Dec1#1#3!{}%
+}%
+\else
+\BIC@AfterFi{%
+\BIC@Dec#2!{#1#3}%
+}%
+\BIC@Fi
}
\def\BIC@@Dec#1#2#3!#4{%
- \ifcase#1 %
- \ifx\\#3\\%
- \BIC@AfterFiFi{ #2#4}%
- \else
- \BIC@AfterFiFi{%
- \BIC@@Dec0#3!{#2#4}%
- }%
- \fi
- \else
- \ifnum#2>0 %
- \BIC@AfterFiFi{%
+\ifcase#1 %
+\ifx\\#3\\%
+\BIC@AfterFiFi{ #2#4}%
+\else
+\BIC@AfterFiFi{%
+\BIC@@Dec0#3!{#2#4}%
+}%
+\fi
+\else
+\ifnum#2>0 %
+\BIC@AfterFiFi{%
& \expandafter\BIC@@@Dec\the\numexpr#2-1\relax
$ \expandafter\expandafter\expandafter\BIC@@@Dec
$ \ifcase#2
@@ -6394,149 +6394,149 @@ $ \or\expandafter7%
$ \or\expandafter8%
$? \else\BigIntCalcError:ThisCannotHappen%
$ \fi
- 0#3!{#4}%
- }%
- \else
- \BIC@AfterFiFi{%
- \BIC@@@Dec91#3!{#4}%
- }%
- \fi
- \BIC@Fi
+ 0#3!{#4}%
+}%
+\else
+\BIC@AfterFiFi{%
+\BIC@@@Dec91#3!{#4}%
+}%
+\fi
+\BIC@Fi
}
\def\BIC@@@Dec#1#2#3!#4{%
- \ifx\\#3\\%
- \ifcase#1 %
- \ifx\\#4\\%
- \BIC@AfterFiFiFi{ 0}%
- \else
- \BIC@AfterFiFiFi{ #4}%
- \fi
- \else
- \BIC@AfterFiFi{ #1#4}%
- \fi
- \else
- \BIC@AfterFi{%
- \BIC@@Dec#2#3!{#1#4}%
- }%
- \BIC@Fi
+\ifx\\#3\\%
+\ifcase#1 %
+\ifx\\#4\\%
+\BIC@AfterFiFiFi{ 0}%
+\else
+\BIC@AfterFiFiFi{ #4}%
+\fi
+\else
+\BIC@AfterFiFi{ #1#4}%
+\fi
+\else
+\BIC@AfterFi{%
+\BIC@@Dec#2#3!{#1#4}%
+}%
+\BIC@Fi
}
\def\bigintcalcAdd#1{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@Add
- \bigintcalcNum{#1}!%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@Add
+\bigintcalcNum{#1}!%
}
\def\BIC@Add#1!#2{%
- \expandafter\expandafter\expandafter
- \BIC@AddSwitch\bigintcalcNum{#2}!#1!%
+\expandafter\expandafter\expandafter
+\BIC@AddSwitch\bigintcalcNum{#2}!#1!%
}
\def\bigintcalcSub#1#2{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@Add
- \bigintcalcNum{-#2}!{#1}%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@Add
+\bigintcalcNum{-#2}!{#1}%
}
\def\BIC@AddSwitch#1#2!#3#4!{%
- \ifx#1-% x < 0
- \ifx#3-% y < 0
- \expandafter-\romannumeral0%
- \ifnum\BIC@PosCmp#2!#4!=1 % -x > -y
- \BIC@AfterFiFiFi{%
- \BIC@AddXY#2!#4!!!%
- }%
- \else % -x <= -y
- \BIC@AfterFiFiFi{%
- \BIC@AddXY#4!#2!!!%
- }%
- \fi
- \else % y >= 0
- \ifcase\BIC@PosCmp#2!#3#4!% -x = y
- \BIC@AfterFiFiFi{ 0}%
- \or % -x > y
- \expandafter-\romannumeral0%
- \BIC@AfterFiFiFi{%
- \BIC@SubXY#2!#3#4!!!%
- }%
- \else % -x <= y
- \BIC@AfterFiFiFi{%
- \BIC@SubXY#3#4!#2!!!%
- }%
- \fi
- \fi
- \else % x >= 0
- \ifx#3-% y < 0
- \ifcase\BIC@PosCmp#1#2!#4!% x = -y
- \BIC@AfterFiFiFi{ 0}%
- \or % x > -y
- \BIC@AfterFiFiFi{%
- \BIC@SubXY#1#2!#4!!!%
- }%
- \else % x <= -y
- \expandafter-\romannumeral0%
- \BIC@AfterFiFiFi{%
- \BIC@SubXY#4!#1#2!!!%
- }%
- \fi
- \else % y >= 0
- \ifnum\BIC@PosCmp#1#2!#3#4!=1 % x > y
- \BIC@AfterFiFiFi{%
- \BIC@AddXY#1#2!#3#4!!!%
- }%
- \else % x <= y
- \BIC@AfterFiFiFi{%
- \BIC@AddXY#3#4!#1#2!!!%
- }%
- \fi
- \fi
- \BIC@Fi
+\ifx#1-% x < 0
+\ifx#3-% y < 0
+\expandafter-\romannumeral0%
+\ifnum\BIC@PosCmp#2!#4!=1 % -x > -y
+\BIC@AfterFiFiFi{%
+\BIC@AddXY#2!#4!!!%
+}%
+\else % -x <= -y
+\BIC@AfterFiFiFi{%
+\BIC@AddXY#4!#2!!!%
+}%
+\fi
+\else % y >= 0
+\ifcase\BIC@PosCmp#2!#3#4!% -x = y
+\BIC@AfterFiFiFi{ 0}%
+\or % -x > y
+\expandafter-\romannumeral0%
+\BIC@AfterFiFiFi{%
+\BIC@SubXY#2!#3#4!!!%
+}%
+\else % -x <= y
+\BIC@AfterFiFiFi{%
+\BIC@SubXY#3#4!#2!!!%
+}%
+\fi
+\fi
+\else % x >= 0
+\ifx#3-% y < 0
+\ifcase\BIC@PosCmp#1#2!#4!% x = -y
+\BIC@AfterFiFiFi{ 0}%
+\or % x > -y
+\BIC@AfterFiFiFi{%
+\BIC@SubXY#1#2!#4!!!%
+}%
+\else % x <= -y
+\expandafter-\romannumeral0%
+\BIC@AfterFiFiFi{%
+\BIC@SubXY#4!#1#2!!!%
+}%
+\fi
+\else % y >= 0
+\ifnum\BIC@PosCmp#1#2!#3#4!=1 % x > y
+\BIC@AfterFiFiFi{%
+\BIC@AddXY#1#2!#3#4!!!%
+}%
+\else % x <= y
+\BIC@AfterFiFiFi{%
+\BIC@AddXY#3#4!#1#2!!!%
+}%
+\fi
+\fi
+\BIC@Fi
}
\def\BigIntCalcAdd#1!#2!{%
- \romannumeral0\BIC@AddXY#1!#2!!!%
+\romannumeral0\BIC@AddXY#1!#2!!!%
}
\def\BigIntCalcSub#1!#2!{%
- \romannumeral0\BIC@SubXY#1!#2!!!%
+\romannumeral0\BIC@SubXY#1!#2!!!%
}
\def\BIC@AddXY#1#2!#3#4!#5!#6!{%
- \ifx\\#2\\%
- \ifx\\#3\\%
- \BIC@AfterFiFi{%
- \BIC@DoAdd0!#1#5!#60!%
- }%
- \else
- \BIC@AfterFiFi{%
- \BIC@DoAdd0!#1#5!#3#6!%
- }%
- \fi
- \else
- \ifx\\#4\\%
- \ifx\\#3\\%
- \BIC@AfterFiFiFi{%
- \BIC@AddXY#2!{}!#1#5!#60!%
- }%
- \else
- \BIC@AfterFiFiFi{%
- \BIC@AddXY#2!{}!#1#5!#3#6!%
- }%
- \fi
- \else
- \BIC@AfterFiFi{%
- \BIC@AddXY#2!#4!#1#5!#3#6!%
- }%
- \fi
- \BIC@Fi
+\ifx\\#2\\%
+\ifx\\#3\\%
+\BIC@AfterFiFi{%
+\BIC@DoAdd0!#1#5!#60!%
+}%
+\else
+\BIC@AfterFiFi{%
+\BIC@DoAdd0!#1#5!#3#6!%
+}%
+\fi
+\else
+\ifx\\#4\\%
+\ifx\\#3\\%
+\BIC@AfterFiFiFi{%
+\BIC@AddXY#2!{}!#1#5!#60!%
+}%
+\else
+\BIC@AfterFiFiFi{%
+\BIC@AddXY#2!{}!#1#5!#3#6!%
+}%
+\fi
+\else
+\BIC@AfterFiFi{%
+\BIC@AddXY#2!#4!#1#5!#3#6!%
+}%
+\fi
+\BIC@Fi
}
\def\BIC@DoAdd#1#2!#3#4!#5#6!{%
- \ifx\\#4\\%
- \BIC@AfterFi{%
+\ifx\\#4\\%
+\BIC@AfterFi{%
& \expandafter\BIC@Space
& \the\numexpr#1+#3+#5\relax#2%
$ \expandafter\expandafter\expandafter\BIC@AddResult
$ \BIC@AddDigit#1#3#5#2%
- }%
- \else
- \BIC@AfterFi{%
- \expandafter\expandafter\expandafter\BIC@DoAdd
- \BIC@AddDigit#1#3#5#2!#4!#6!%
- }%
- \BIC@Fi
+}%
+\else
+\BIC@AfterFi{%
+\expandafter\expandafter\expandafter\BIC@DoAdd
+\BIC@AddDigit#1#3#5#2!#4!#6!%
+}%
+\BIC@Fi
}
$ \def\BIC@AddResult#1{%
$ \ifx#10%
@@ -6546,7 +6546,7 @@ $ \expandafter\BIC@Space\expandafter#1%
$ \fi
$ }%
\def\BIC@AddDigit#1#2#3{%
- \romannumeral0%
+\romannumeral0%
& \expandafter\BIC@@AddDigit\the\numexpr#1+#2+#3!%
$ \expandafter\BIC@@AddDigit\number%
$ \csname
@@ -6559,11 +6559,11 @@ $ \fi
$ \endcsname#3!%
}
\def\BIC@@AddDigit#1!{%
- \ifnum#1<10 %
- \BIC@AfterFi{ 0#1}%
- \else
- \BIC@AfterFi{ #1}%
- \BIC@Fi
+\ifnum#1<10 %
+\BIC@AfterFi{ 0#1}%
+\else
+\BIC@AfterFi{ #1}%
+\BIC@Fi
}
$ \expandafter\def\csname BIC@AddCarry0\endcsname#1{#1}%
$ \expandafter\def\csname BIC@AddCarry10\endcsname#1{1#1}%
@@ -6586,56 +6586,56 @@ $ \BIC@Temp 7{8\or9\or10\or11\or12\or13\or14\or15\or16}%
$ \BIC@Temp 8{9\or10\or11\or12\or13\or14\or15\or16\or17}%
$ \BIC@Temp 9{10\or11\or12\or13\or14\or15\or16\or17\or18}%
\def\BIC@SubXY#1#2!#3#4!#5!#6!{%
- \ifx\\#2\\%
- \ifx\\#3\\%
- \BIC@AfterFiFi{%
- \BIC@DoSub0!#1#5!#60!%
- }%
- \else
- \BIC@AfterFiFi{%
- \BIC@DoSub0!#1#5!#3#6!%
- }%
- \fi
- \else
- \ifx\\#4\\%
- \ifx\\#3\\%
- \BIC@AfterFiFiFi{%
- \BIC@SubXY#2!{}!#1#5!#60!%
- }%
- \else
- \BIC@AfterFiFiFi{%
- \BIC@SubXY#2!{}!#1#5!#3#6!%
- }%
- \fi
- \else
- \BIC@AfterFiFi{%
- \BIC@SubXY#2!#4!#1#5!#3#6!%
- }%
- \fi
- \BIC@Fi
+\ifx\\#2\\%
+\ifx\\#3\\%
+\BIC@AfterFiFi{%
+\BIC@DoSub0!#1#5!#60!%
+}%
+\else
+\BIC@AfterFiFi{%
+\BIC@DoSub0!#1#5!#3#6!%
+}%
+\fi
+\else
+\ifx\\#4\\%
+\ifx\\#3\\%
+\BIC@AfterFiFiFi{%
+\BIC@SubXY#2!{}!#1#5!#60!%
+}%
+\else
+\BIC@AfterFiFiFi{%
+\BIC@SubXY#2!{}!#1#5!#3#6!%
+}%
+\fi
+\else
+\BIC@AfterFiFi{%
+\BIC@SubXY#2!#4!#1#5!#3#6!%
+}%
+\fi
+\BIC@Fi
}
\def\BIC@DoSub#1#2!#3#4!#5#6!{%
- \ifx\\#4\\%
- \BIC@AfterFi{%
- \expandafter\expandafter\expandafter\BIC@SubResult
- \BIC@SubDigit#1#3#5#2%
- }%
- \else
- \BIC@AfterFi{%
- \expandafter\expandafter\expandafter\BIC@DoSub
- \BIC@SubDigit#1#3#5#2!#4!#6!%
- }%
- \BIC@Fi
+\ifx\\#4\\%
+\BIC@AfterFi{%
+\expandafter\expandafter\expandafter\BIC@SubResult
+\BIC@SubDigit#1#3#5#2%
+}%
+\else
+\BIC@AfterFi{%
+\expandafter\expandafter\expandafter\BIC@DoSub
+\BIC@SubDigit#1#3#5#2!#4!#6!%
+}%
+\BIC@Fi
}
\def\BIC@SubResult#1{%
- \ifx#10%
- \expandafter\BIC@SubResult
- \else
- \expandafter\BIC@Space\expandafter#1%
- \fi
+\ifx#10%
+\expandafter\BIC@SubResult
+\else
+\expandafter\BIC@Space\expandafter#1%
+\fi
}
\def\BIC@SubDigit#1#2#3{%
- \romannumeral0%
+\romannumeral0%
& \expandafter\BIC@@SubDigit\the\numexpr#2-#3-#1!%
$ \expandafter\BIC@@AddDigit\number
$ \csname
@@ -6676,26 +6676,26 @@ $ \BIC@Temp 7{13\or14\or15\or16\or17\or18\or19\or0\or1\or2}%
$ \BIC@Temp 8{12\or13\or14\or15\or16\or17\or18\or19\or0\or1}%
$ \BIC@Temp 9{11\or12\or13\or14\or15\or16\or17\or18\or19\or0}%
\def\bigintcalcShl#1{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@Shl
- \bigintcalcNum{#1}!%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@Shl
+\bigintcalcNum{#1}!%
}
\def\BIC@Shl#1#2!{%
- \ifx#1-%
- \BIC@AfterFi{%
- \expandafter-\romannumeral0%
+\ifx#1-%
+\BIC@AfterFi{%
+\expandafter-\romannumeral0%
& \BIC@@Shl#2!!%
$ \BIC@AddXY#2!#2!!!%
- }%
- \else
- \BIC@AfterFi{%
+}%
+\else
+\BIC@AfterFi{%
& \BIC@@Shl#1#2!!%
$ \BIC@AddXY#1#2!#1#2!!!%
- }%
- \BIC@Fi
+}%
+\BIC@Fi
}
\def\BigIntCalcShl#1!{%
- \romannumeral0%
+\romannumeral0%
& \BIC@@Shl#1!!%
$ \BIC@AddXY#1!#1!!!%
}
@@ -6734,82 +6734,82 @@ $ \BIC@AddXY#1!#1!!!%
& \BIC@Fi
& }%
\def\bigintcalcShr#1{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@Shr
- \bigintcalcNum{#1}!%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@Shr
+\bigintcalcNum{#1}!%
}
\def\BIC@Shr#1#2!{%
- \ifx#1-%
- \expandafter-\romannumeral0%
- \BIC@AfterFi{%
- \BIC@@Shr#2!%
- }%
- \else
- \BIC@AfterFi{%
- \BIC@@Shr#1#2!%
- }%
- \BIC@Fi
+\ifx#1-%
+\expandafter-\romannumeral0%
+\BIC@AfterFi{%
+\BIC@@Shr#2!%
+}%
+\else
+\BIC@AfterFi{%
+\BIC@@Shr#1#2!%
+}%
+\BIC@Fi
}
\def\BigIntCalcShr#1!{%
- \romannumeral0%
- \BIC@@Shr#1!%
+\romannumeral0%
+\BIC@@Shr#1!%
}
\def\BIC@@Shr#1#2!{%
- \ifcase#1 %
- \BIC@AfterFi{ 0}%
- \or
- \ifx\\#2\\%
- \BIC@AfterFiFi{ 0}%
- \else
- \BIC@AfterFiFi{%
- \BIC@@@Shr#1#2!!%
- }%
- \fi
- \else
- \BIC@AfterFi{%
- \BIC@@@Shr0#1#2!!%
- }%
- \BIC@Fi
+\ifcase#1 %
+\BIC@AfterFi{ 0}%
+\or
+\ifx\\#2\\%
+\BIC@AfterFiFi{ 0}%
+\else
+\BIC@AfterFiFi{%
+\BIC@@@Shr#1#2!!%
+}%
+\fi
+\else
+\BIC@AfterFi{%
+\BIC@@@Shr0#1#2!!%
+}%
+\BIC@Fi
}
\def\BIC@@@Shr#1#2#3!#4!{%
- \ifx\\#3\\%
- \ifodd#1#2 %
- \BIC@AfterFiFi{%
+\ifx\\#3\\%
+\ifodd#1#2 %
+\BIC@AfterFiFi{%
& \expandafter\BIC@ShrResult\the\numexpr(#1#2-1)/2\relax
$ \expandafter\expandafter\expandafter\BIC@ShrResult
$ \csname BIC@ShrDigit#1#2\endcsname
- #4!%
- }%
- \else
- \BIC@AfterFiFi{%
+#4!%
+}%
+\else
+\BIC@AfterFiFi{%
& \expandafter\BIC@ShrResult\the\numexpr#1#2/2\relax
$ \expandafter\expandafter\expandafter\BIC@ShrResult
$ \csname BIC@ShrDigit#1#2\endcsname
- #4!%
- }%
- \fi
- \else
- \ifodd#1#2 %
- \BIC@AfterFiFi{%
+#4!%
+}%
+\fi
+\else
+\ifodd#1#2 %
+\BIC@AfterFiFi{%
& \expandafter\BIC@@@@Shr\the\numexpr(#1#2-1)/2\relax1%
$ \expandafter\expandafter\expandafter\BIC@@@@Shr
$ \csname BIC@ShrDigit#1#2\endcsname
- #3!#4!%
- }%
- \else
- \BIC@AfterFiFi{%
+#3!#4!%
+}%
+\else
+\BIC@AfterFiFi{%
& \expandafter\BIC@@@@Shr\the\numexpr#1#2/2\relax0%
$ \expandafter\expandafter\expandafter\BIC@@@@Shr
$ \csname BIC@ShrDigit#1#2\endcsname
- #3!#4!%
- }%
- \fi
- \BIC@Fi
+#3!#4!%
+}%
+\fi
+\BIC@Fi
}
& \def\BIC@ShrResult#1#2!{ #2#1}%
$ \def\BIC@ShrResult#1#2#3!{ #3#1}%
\def\BIC@@@@Shr#1#2#3!#4!{%
- \BIC@@@Shr#2#3!#4#1!%
+\BIC@@@Shr#2#3!#4#1!%
}
$ \def\BIC@Temp#1#2#3#4{%
$ \expandafter\def\csname BIC@ShrDigit#1#2\endcsname{#3#4}%
@@ -6835,59 +6835,59 @@ $ \BIC@Temp 1781%
$ \BIC@Temp 1890%
$ \BIC@Temp 1991%
\def\BIC@Tim#1!#2{%
- \romannumeral0%
- \ifcase#2 % 0
- \BIC@AfterFi{ 0}%
- \or % 1
- \BIC@AfterFi{ #1}%
- \or % 2
- \BIC@AfterFi{%
- \BIC@Shl#1!%
- }%
- \else % 3-9
- \BIC@AfterFi{%
- \BIC@@Tim#1!!#2%
- }%
- \BIC@Fi
+\romannumeral0%
+\ifcase#2 % 0
+\BIC@AfterFi{ 0}%
+\or % 1
+\BIC@AfterFi{ #1}%
+\or % 2
+\BIC@AfterFi{%
+\BIC@Shl#1!%
+}%
+\else % 3-9
+\BIC@AfterFi{%
+\BIC@@Tim#1!!#2%
+}%
+\BIC@Fi
}
\def\BIC@@Tim#1#2!{%
- \ifx\\#2\\%
- \BIC@AfterFi{%
- \BIC@ProcessTim0!#1%
- }%
- \else
- \BIC@AfterFi{%
- \BIC@@Tim#2!#1%
- }%
- \BIC@Fi
+\ifx\\#2\\%
+\BIC@AfterFi{%
+\BIC@ProcessTim0!#1%
+}%
+\else
+\BIC@AfterFi{%
+\BIC@@Tim#2!#1%
+}%
+\BIC@Fi
}
\def\BIC@ProcessTim#1#2!#3#4!#5{%
- \ifx\\#4\\%
- \BIC@AfterFi{%
- \expandafter\BIC@Space
+\ifx\\#4\\%
+\BIC@AfterFi{%
+\expandafter\BIC@Space
& \the\numexpr#3*#5+#1\relax
$ \romannumeral0\BIC@TimDigit#3#5#1%
- #2%
- }%
- \else
- \BIC@AfterFi{%
- \expandafter\BIC@@ProcessTim
+#2%
+}%
+\else
+\BIC@AfterFi{%
+\expandafter\BIC@@ProcessTim
& \the\numexpr#3*#5+#1%
$ \romannumeral0\BIC@TimDigit#3#5#1%
- !#2!#4!#5%
- }%
- \BIC@Fi
+ !#2!#4!#5%
+}%
+\BIC@Fi
}
\def\BIC@@ProcessTim#1#2!{%
- \ifx\\#2\\%
- \BIC@AfterFi{%
- \BIC@ProcessTim0#1%
- }%
- \else
- \BIC@AfterFi{%
- \BIC@ProcessTim#1#2%
- }%
- \BIC@Fi
+\ifx\\#2\\%
+\BIC@AfterFi{%
+\BIC@ProcessTim0#1%
+}%
+\else
+\BIC@AfterFi{%
+\BIC@ProcessTim#1#2%
+}%
+\BIC@Fi
}
$ \def\BIC@TimDigit#1#2#3{%
$ \ifcase#1 % 0
@@ -6931,799 +6931,798 @@ $ \BIC@Temp 7{14\or21\or28\or35\or42\or49\or56\or63}%
$ \BIC@Temp 8{16\or24\or32\or40\or48\or56\or64\or72}%
$ \BIC@Temp 9{18\or27\or36\or45\or54\or63\or72\or81}%
\def\bigintcalcMul#1#2{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@Mul
- \bigintcalcNum{#1}!{#2}%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@Mul
+\bigintcalcNum{#1}!{#2}%
}
\def\BIC@Mul#1!#2{%
- \expandafter\expandafter\expandafter\BIC@MulSwitch
- \bigintcalcNum{#2}!#1!%
+\expandafter\expandafter\expandafter\BIC@MulSwitch
+\bigintcalcNum{#2}!#1!%
}
\def\BIC@MulSwitch#1#2!#3#4!{%
- \ifcase\BIC@Sgn#1#2! % x = 0
- \BIC@AfterFi{ 0}%
- \or % x > 0
- \ifcase\BIC@Sgn#3#4! % y = 0
- \BIC@AfterFiFi{ 0}%
- \or % y > 0
- \ifnum\BIC@PosCmp#1#2!#3#4!=1 % x > y
- \BIC@AfterFiFiFi{%
- \BIC@ProcessMul0!#1#2!#3#4!%
- }%
- \else % x <= y
- \BIC@AfterFiFiFi{%
- \BIC@ProcessMul0!#3#4!#1#2!%
- }%
- \fi
- \else % y < 0
- \expandafter-\romannumeral0%
- \ifnum\BIC@PosCmp#1#2!#4!=1 % x > -y
- \BIC@AfterFiFiFi{%
- \BIC@ProcessMul0!#1#2!#4!%
- }%
- \else % x <= -y
- \BIC@AfterFiFiFi{%
- \BIC@ProcessMul0!#4!#1#2!%
- }%
- \fi
- \fi
- \else % x < 0
- \ifcase\BIC@Sgn#3#4! % y = 0
- \BIC@AfterFiFi{ 0}%
- \or % y > 0
- \expandafter-\romannumeral0%
- \ifnum\BIC@PosCmp#2!#3#4!=1 % -x > y
- \BIC@AfterFiFiFi{%
- \BIC@ProcessMul0!#2!#3#4!%
- }%
- \else % -x <= y
- \BIC@AfterFiFiFi{%
- \BIC@ProcessMul0!#3#4!#2!%
- }%
- \fi
- \else % y < 0
- \ifnum\BIC@PosCmp#2!#4!=1 % -x > -y
- \BIC@AfterFiFiFi{%
- \BIC@ProcessMul0!#2!#4!%
- }%
- \else % -x <= -y
- \BIC@AfterFiFiFi{%
- \BIC@ProcessMul0!#4!#2!%
- }%
- \fi
- \fi
- \BIC@Fi
+\ifcase\BIC@Sgn#1#2! % x = 0
+\BIC@AfterFi{ 0}%
+\or % x > 0
+\ifcase\BIC@Sgn#3#4! % y = 0
+\BIC@AfterFiFi{ 0}%
+\or % y > 0
+\ifnum\BIC@PosCmp#1#2!#3#4!=1 % x > y
+\BIC@AfterFiFiFi{%
+\BIC@ProcessMul0!#1#2!#3#4!%
+}%
+\else % x <= y
+\BIC@AfterFiFiFi{%
+\BIC@ProcessMul0!#3#4!#1#2!%
+}%
+\fi
+\else % y < 0
+\expandafter-\romannumeral0%
+\ifnum\BIC@PosCmp#1#2!#4!=1 % x > -y
+\BIC@AfterFiFiFi{%
+\BIC@ProcessMul0!#1#2!#4!%
+}%
+\else % x <= -y
+\BIC@AfterFiFiFi{%
+\BIC@ProcessMul0!#4!#1#2!%
+}%
+\fi
+\fi
+\else % x < 0
+\ifcase\BIC@Sgn#3#4! % y = 0
+\BIC@AfterFiFi{ 0}%
+\or % y > 0
+\expandafter-\romannumeral0%
+\ifnum\BIC@PosCmp#2!#3#4!=1 % -x > y
+\BIC@AfterFiFiFi{%
+\BIC@ProcessMul0!#2!#3#4!%
+}%
+\else % -x <= y
+\BIC@AfterFiFiFi{%
+\BIC@ProcessMul0!#3#4!#2!%
+}%
+\fi
+\else % y < 0
+\ifnum\BIC@PosCmp#2!#4!=1 % -x > -y
+\BIC@AfterFiFiFi{%
+\BIC@ProcessMul0!#2!#4!%
+}%
+\else % -x <= -y
+\BIC@AfterFiFiFi{%
+\BIC@ProcessMul0!#4!#2!%
+}%
+\fi
+\fi
+\BIC@Fi
}
\def\BigIntCalcMul#1!#2!{%
- \romannumeral0%
- \BIC@ProcessMul0!#1!#2!%
+\romannumeral0%
+\BIC@ProcessMul0!#1!#2!%
}
\def\BIC@ProcessMul#1!#2!#3#4!{%
- \ifx\\#4\\%
- \BIC@AfterFi{%
- \expandafter\expandafter\expandafter\BIC@Space
- \bigintcalcAdd{\BIC@Tim#2!#3}{#10}%
- }%
- \else
- \BIC@AfterFi{%
- \expandafter\expandafter\expandafter\BIC@ProcessMul
- \bigintcalcAdd{\BIC@Tim#2!#3}{#10}!#2!#4!%
- }%
- \BIC@Fi
-}
-
+\ifx\\#4\\%
+\BIC@AfterFi{%
+\expandafter\expandafter\expandafter\BIC@Space
+\bigintcalcAdd{\BIC@Tim#2!#3}{#10}%
+}%
+\else
+\BIC@AfterFi{%
+\expandafter\expandafter\expandafter\BIC@ProcessMul
+\bigintcalcAdd{\BIC@Tim#2!#3}{#10}!#2!#4!%
+}%
+\BIC@Fi
+}
\def\bigintcalcSqr#1{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@Sqr
- \bigintcalcNum{#1}!%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@Sqr
+\bigintcalcNum{#1}!%
}
\def\BIC@Sqr#1{%
- \ifx#1-%
- \expandafter\BIC@@Sqr
- \else
- \expandafter\BIC@@Sqr\expandafter#1%
- \fi
+\ifx#1-%
+\expandafter\BIC@@Sqr
+\else
+\expandafter\BIC@@Sqr\expandafter#1%
+\fi
}
\def\BIC@@Sqr#1!{%
- \BIC@ProcessMul0!#1!#1!%
+\BIC@ProcessMul0!#1!#1!%
}
\def\bigintcalcFac#1{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@Fac
- \bigintcalcNum{#1}!%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@Fac
+\bigintcalcNum{#1}!%
}
\def\BIC@Fac#1#2!{%
- \ifx#1-%
- \BIC@AfterFi{ 0\BigIntCalcError:FacNegative}%
- \else
- \ifnum\BIC@PosCmp#1#2!13!<0 %
- \ifcase#1#2 %
- \BIC@AfterFiFiFi{ 1}% 0!
- \or\BIC@AfterFiFiFi{ 1}% 1!
- \or\BIC@AfterFiFiFi{ 2}% 2!
- \or\BIC@AfterFiFiFi{ 6}% 3!
- \or\BIC@AfterFiFiFi{ 24}% 4!
- \or\BIC@AfterFiFiFi{ 120}% 5!
- \or\BIC@AfterFiFiFi{ 720}% 6!
- \or\BIC@AfterFiFiFi{ 5040}% 7!
- \or\BIC@AfterFiFiFi{ 40320}% 8!
- \or\BIC@AfterFiFiFi{ 362880}% 9!
- \or\BIC@AfterFiFiFi{ 3628800}% 10!
- \or\BIC@AfterFiFiFi{ 39916800}% 11!
- \or\BIC@AfterFiFiFi{ 479001600}% 12!
+\ifx#1-%
+\BIC@AfterFi{ 0\BigIntCalcError:FacNegative}%
+\else
+\ifnum\BIC@PosCmp#1#2!13!<0 %
+\ifcase#1#2 %
+\BIC@AfterFiFiFi{ 1}% 0!
+\or\BIC@AfterFiFiFi{ 1}% 1!
+\or\BIC@AfterFiFiFi{ 2}% 2!
+\or\BIC@AfterFiFiFi{ 6}% 3!
+\or\BIC@AfterFiFiFi{ 24}% 4!
+\or\BIC@AfterFiFiFi{ 120}% 5!
+\or\BIC@AfterFiFiFi{ 720}% 6!
+\or\BIC@AfterFiFiFi{ 5040}% 7!
+\or\BIC@AfterFiFiFi{ 40320}% 8!
+\or\BIC@AfterFiFiFi{ 362880}% 9!
+\or\BIC@AfterFiFiFi{ 3628800}% 10!
+\or\BIC@AfterFiFiFi{ 39916800}% 11!
+\or\BIC@AfterFiFiFi{ 479001600}% 12!
? \else\BigIntCalcError:ThisCannotHappen%
- \fi
- \else
- \BIC@AfterFiFi{%
- \BIC@ProcessFac#1#2!479001600!%
- }%
- \fi
- \BIC@Fi
+\fi
+\else
+\BIC@AfterFiFi{%
+\BIC@ProcessFac#1#2!479001600!%
+}%
+\fi
+\BIC@Fi
}
\def\BIC@ProcessFac#1!#2!{%
- \ifnum\BIC@PosCmp#1!12!=0 %
- \BIC@AfterFi{ #2}%
- \else
- \BIC@AfterFi{%
- \expandafter\BIC@@ProcessFac
- \romannumeral0\BIC@ProcessMul0!#2!#1!%
- !#1!%
- }%
- \BIC@Fi
+\ifnum\BIC@PosCmp#1!12!=0 %
+\BIC@AfterFi{ #2}%
+\else
+\BIC@AfterFi{%
+\expandafter\BIC@@ProcessFac
+\romannumeral0\BIC@ProcessMul0!#2!#1!%
+ !#1!%
+}%
+\BIC@Fi
}
\def\BIC@@ProcessFac#1!#2!{%
- \expandafter\BIC@ProcessFac
- \romannumeral0\BIC@Dec#2!{}%
- !#1!%
+\expandafter\BIC@ProcessFac
+\romannumeral0\BIC@Dec#2!{}%
+ !#1!%
}
\def\bigintcalcPow#1{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@Pow
- \bigintcalcNum{#1}!%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@Pow
+\bigintcalcNum{#1}!%
}
\def\BIC@Pow#1!#2{%
- \expandafter\expandafter\expandafter\BIC@PowSwitch
- \bigintcalcNum{#2}!#1!%
+\expandafter\expandafter\expandafter\BIC@PowSwitch
+\bigintcalcNum{#2}!#1!%
}
\def\BIC@PowSwitch#1#2!#3#4!{%
- \ifcase\ifx\\#2\\%
- \ifx#100 % y = 0
- \else\ifx#111 % y = 1
- \else\ifx#122 % y = 2
- \else4 % y > 2
- \fi\fi\fi
- \else
- \ifx#1-3 % y < 0
- \else4 % y > 2
- \fi
- \fi
- \BIC@AfterFi{ 1}% y = 0
- \or % y = 1
- \BIC@AfterFi{ #3#4}%
- \or % y = 2
- \ifx#3-% x < 0
- \BIC@AfterFiFi{%
- \BIC@ProcessMul0!#4!#4!%
- }%
- \else % x >= 0
- \BIC@AfterFiFi{%
- \BIC@ProcessMul0!#3#4!#3#4!%
- }%
- \fi
- \or % y < 0
- \ifcase\ifx\\#4\\%
- \ifx#300 % x = 0
- \else\ifx#311 % x = 1
- \else3 % x > 1
- \fi\fi
- \else
- \ifcase\BIC@MinusOne#3#4! %
- 3 % |x| > 1
- \or
- 2 % x = -1
+\ifcase\ifx\\#2\\%
+\ifx#100 % y = 0
+\else\ifx#111 % y = 1
+\else\ifx#122 % y = 2
+\else4 % y > 2
+\fi\fi\fi
+\else
+\ifx#1-3 % y < 0
+\else4 % y > 2
+\fi
+\fi
+\BIC@AfterFi{ 1}% y = 0
+\or % y = 1
+\BIC@AfterFi{ #3#4}%
+\or % y = 2
+\ifx#3-% x < 0
+\BIC@AfterFiFi{%
+\BIC@ProcessMul0!#4!#4!%
+}%
+\else % x >= 0
+\BIC@AfterFiFi{%
+\BIC@ProcessMul0!#3#4!#3#4!%
+}%
+\fi
+\or % y < 0
+\ifcase\ifx\\#4\\%
+\ifx#300 % x = 0
+\else\ifx#311 % x = 1
+\else3 % x > 1
+\fi\fi
+\else
+\ifcase\BIC@MinusOne#3#4! %
+ 3 % |x| > 1
+\or
+ 2 % x = -1
? \else\BigIntCalcError:ThisCannotHappen%
- \fi
- \fi
- \BIC@AfterFiFi{ 0\BigIntCalcError:DivisionByZero}% x = 0
- \or % x = 1
- \BIC@AfterFiFi{ 1}% x = 1
- \or % x = -1
- \ifcase\BIC@ModTwo#2! % even(y)
- \BIC@AfterFiFiFi{ 1}%
- \or % odd(y)
- \BIC@AfterFiFiFi{ -1}%
+\fi
+\fi
+\BIC@AfterFiFi{ 0\BigIntCalcError:DivisionByZero}% x = 0
+\or % x = 1
+\BIC@AfterFiFi{ 1}% x = 1
+\or % x = -1
+\ifcase\BIC@ModTwo#2! % even(y)
+\BIC@AfterFiFiFi{ 1}%
+\or % odd(y)
+\BIC@AfterFiFiFi{ -1}%
? \else\BigIntCalcError:ThisCannotHappen%
- \fi
- \or % |x| > 1
- \BIC@AfterFiFi{ 0}%
+\fi
+\or % |x| > 1
+\BIC@AfterFiFi{ 0}%
? \else\BigIntCalcError:ThisCannotHappen%
- \fi
- \or % y > 2
- \ifcase\ifx\\#4\\%
- \ifx#300 % x = 0
- \else\ifx#311 % x = 1
- \else4 % x > 1
- \fi\fi
- \else
- \ifx#3-%
- \ifcase\BIC@MinusOne#3#4! %
- 3 % x < -1
- \else
- 2 % x = -1
- \fi
- \else
- 4 % x > 1
- \fi
- \fi
- \BIC@AfterFiFi{ 0}% x = 0
- \or % x = 1
- \BIC@AfterFiFi{ 1}% x = 1
- \or % x = -1
- \ifcase\BIC@ModTwo#1#2! % even(y)
- \BIC@AfterFiFiFi{ 1}%
- \or % odd(y)
- \BIC@AfterFiFiFi{ -1}%
+\fi
+\or % y > 2
+\ifcase\ifx\\#4\\%
+\ifx#300 % x = 0
+\else\ifx#311 % x = 1
+\else4 % x > 1
+\fi\fi
+\else
+\ifx#3-%
+\ifcase\BIC@MinusOne#3#4! %
+ 3 % x < -1
+\else
+ 2 % x = -1
+\fi
+\else
+ 4 % x > 1
+\fi
+\fi
+\BIC@AfterFiFi{ 0}% x = 0
+\or % x = 1
+\BIC@AfterFiFi{ 1}% x = 1
+\or % x = -1
+\ifcase\BIC@ModTwo#1#2! % even(y)
+\BIC@AfterFiFiFi{ 1}%
+\or % odd(y)
+\BIC@AfterFiFiFi{ -1}%
? \else\BigIntCalcError:ThisCannotHappen%
- \fi
- \or % x < -1
- \ifcase\BIC@ModTwo#1#2! % even(y)
- \BIC@AfterFiFiFi{%
- \BIC@PowRec#4!#1#2!1!%
- }%
- \or % odd(y)
- \expandafter-\romannumeral0%
- \BIC@AfterFiFiFi{%
- \BIC@PowRec#4!#1#2!1!%
- }%
+\fi
+\or % x < -1
+\ifcase\BIC@ModTwo#1#2! % even(y)
+\BIC@AfterFiFiFi{%
+\BIC@PowRec#4!#1#2!1!%
+}%
+\or % odd(y)
+\expandafter-\romannumeral0%
+\BIC@AfterFiFiFi{%
+\BIC@PowRec#4!#1#2!1!%
+}%
? \else\BigIntCalcError:ThisCannotHappen%
- \fi
- \or % x > 1
- \BIC@AfterFiFi{%
- \BIC@PowRec#3#4!#1#2!1!%
- }%
+\fi
+\or % x > 1
+\BIC@AfterFiFi{%
+\BIC@PowRec#3#4!#1#2!1!%
+}%
? \else\BigIntCalcError:ThisCannotHappen%
- \fi
+\fi
? \else\BigIntCalcError:ThisCannotHappen%
- \BIC@Fi
+\BIC@Fi
}
\def\BIC@ModTwo#1#2!{%
- \ifx\\#2\\%
- \ifodd#1 %
- \BIC@AfterFiFi1%
- \else
- \BIC@AfterFiFi0%
- \fi
- \else
- \BIC@AfterFi{%
- \BIC@ModTwo#2!%
- }%
- \BIC@Fi
+\ifx\\#2\\%
+\ifodd#1 %
+\BIC@AfterFiFi1%
+\else
+\BIC@AfterFiFi0%
+\fi
+\else
+\BIC@AfterFi{%
+\BIC@ModTwo#2!%
+}%
+\BIC@Fi
}
\def\BIC@MinusOne#1#2!{%
- \ifx#1-%
- \BIC@@MinusOne#2!%
- \else
- 0%
- \fi
+\ifx#1-%
+\BIC@@MinusOne#2!%
+\else
+ 0%
+\fi
}
\def\BIC@@MinusOne#1#2!{%
- \ifx#11%
- \ifx\\#2\\%
- 1%
- \else
- 0%
- \fi
- \else
- 0%
- \fi
+\ifx#11%
+\ifx\\#2\\%
+ 1%
+\else
+ 0%
+\fi
+\else
+ 0%
+\fi
}
\def\BIC@PowRec#1!#2#3!#4!{%
- \ifcase\ifx#21\ifx\\#3\\0 \else1 \fi\else1 \fi % y = 1
- \ifnum\BIC@PosCmp#1!#4!=1 % x > r
- \BIC@AfterFiFi{%
- \BIC@ProcessMul0!#1!#4!%
- }%
- \else
- \BIC@AfterFiFi{%
- \BIC@ProcessMul0!#4!#1!%
- }%
- \fi
- \or
- \ifcase\BIC@ModTwo#2#3! % even(y)
- \BIC@AfterFiFi{%
- \expandafter\BIC@@PowRec\romannumeral0%
- \BIC@@Shr#2#3!%
- !#1!#4!%
- }%
- \or % odd(y)
- \ifnum\BIC@PosCmp#1!#4!=1 % x > r
- \BIC@AfterFiFiFi{%
- \expandafter\BIC@@@PowRec\romannumeral0%
- \BIC@ProcessMul0!#1!#4!%
- !#1!#2#3!%
- }%
- \else
- \BIC@AfterFiFiFi{%
- \expandafter\BIC@@@PowRec\romannumeral0%
- \BIC@ProcessMul0!#1!#4!%
- !#1!#2#3!%
- }%
- \fi
+\ifcase\ifx#21\ifx\\#3\\0 \else1 \fi\else1 \fi % y = 1
+\ifnum\BIC@PosCmp#1!#4!=1 % x > r
+\BIC@AfterFiFi{%
+\BIC@ProcessMul0!#1!#4!%
+}%
+\else
+\BIC@AfterFiFi{%
+\BIC@ProcessMul0!#4!#1!%
+}%
+\fi
+\or
+\ifcase\BIC@ModTwo#2#3! % even(y)
+\BIC@AfterFiFi{%
+\expandafter\BIC@@PowRec\romannumeral0%
+\BIC@@Shr#2#3!%
+ !#1!#4!%
+}%
+\or % odd(y)
+\ifnum\BIC@PosCmp#1!#4!=1 % x > r
+\BIC@AfterFiFiFi{%
+\expandafter\BIC@@@PowRec\romannumeral0%
+\BIC@ProcessMul0!#1!#4!%
+ !#1!#2#3!%
+}%
+\else
+\BIC@AfterFiFiFi{%
+\expandafter\BIC@@@PowRec\romannumeral0%
+\BIC@ProcessMul0!#1!#4!%
+ !#1!#2#3!%
+}%
+\fi
? \else\BigIntCalcError:ThisCannotHappen%
- \fi
+\fi
? \else\BigIntCalcError:ThisCannotHappen%
- \BIC@Fi
+\BIC@Fi
}
\def\BIC@@PowRec#1!#2!#3!{%
- \expandafter\BIC@PowRec\romannumeral0%
- \BIC@ProcessMul0!#2!#2!%
- !#1!#3!%
+\expandafter\BIC@PowRec\romannumeral0%
+\BIC@ProcessMul0!#2!#2!%
+ !#1!#3!%
}
\def\BIC@@@PowRec#1!#2!#3!{%
- \expandafter\BIC@@PowRec\romannumeral0%
- \BIC@@Shr#3!%
- !#2!#1!%
+\expandafter\BIC@@PowRec\romannumeral0%
+\BIC@@Shr#3!%
+ !#2!#1!%
}
\def\bigintcalcDiv#1{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@Div
- \bigintcalcNum{#1}!%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@Div
+\bigintcalcNum{#1}!%
}
\def\BIC@Div#1!#2{%
- \expandafter\expandafter\expandafter\BIC@DivSwitchSign
- \bigintcalcNum{#2}!#1!%
+\expandafter\expandafter\expandafter\BIC@DivSwitchSign
+\bigintcalcNum{#2}!#1!%
}
\def\BigIntCalcDiv#1!#2!{%
- \romannumeral0%
- \BIC@DivSwitchSign#2!#1!%
+\romannumeral0%
+\BIC@DivSwitchSign#2!#1!%
}
\def\BIC@DivSwitchSign#1#2!#3#4!{%
- \ifcase\BIC@Sgn#1#2! % y = 0
- \BIC@AfterFi{ 0\BigIntCalcError:DivisionByZero}%
- \or % y > 0
- \ifcase\BIC@Sgn#3#4! % x = 0
- \BIC@AfterFiFi{ 0}%
- \or % x > 0
- \BIC@AfterFiFi{%
- \BIC@DivSwitch{}#3#4!#1#2!%
- }%
- \else % x < 0
- \BIC@AfterFiFi{%
- \BIC@DivSwitch-#4!#1#2!%
- }%
- \fi
- \else % y < 0
- \ifcase\BIC@Sgn#3#4! % x = 0
- \BIC@AfterFiFi{ 0}%
- \or % x > 0
- \BIC@AfterFiFi{%
- \BIC@DivSwitch-#3#4!#2!%
- }%
- \else % x < 0
- \BIC@AfterFiFi{%
- \BIC@DivSwitch{}#4!#2!%
- }%
- \fi
- \BIC@Fi
+\ifcase\BIC@Sgn#1#2! % y = 0
+\BIC@AfterFi{ 0\BigIntCalcError:DivisionByZero}%
+\or % y > 0
+\ifcase\BIC@Sgn#3#4! % x = 0
+\BIC@AfterFiFi{ 0}%
+\or % x > 0
+\BIC@AfterFiFi{%
+\BIC@DivSwitch{}#3#4!#1#2!%
+}%
+\else % x < 0
+\BIC@AfterFiFi{%
+\BIC@DivSwitch-#4!#1#2!%
+}%
+\fi
+\else % y < 0
+\ifcase\BIC@Sgn#3#4! % x = 0
+\BIC@AfterFiFi{ 0}%
+\or % x > 0
+\BIC@AfterFiFi{%
+\BIC@DivSwitch-#3#4!#2!%
+}%
+\else % x < 0
+\BIC@AfterFiFi{%
+\BIC@DivSwitch{}#4!#2!%
+}%
+\fi
+\BIC@Fi
}
\def\BIC@DivSwitch#1#2!#3#4!{%
- \ifcase\BIC@PosCmp#3#4!#2!% y = x
- \BIC@AfterFi{ #11}%
- \or % y > x
- \BIC@AfterFi{ 0}%
- \else % y < x
- \ifx\\#1\\%
- \else
- \expandafter-\romannumeral0%
- \fi
- \ifcase\ifx\\#4\\%
- \ifx#310 % y = 1
- \else\ifx#321 % y = 2
- \else\ifx#342 % y = 4
- \else3 % y > 2
- \fi\fi\fi
- \else
- 3 % y > 2
- \fi
- \BIC@AfterFiFi{ #2}% y = 1
- \or % y = 2
- \BIC@AfterFiFi{%
- \BIC@@Shr#2!%
- }%
- \or % y = 4
- \BIC@AfterFiFi{%
- \expandafter\BIC@@Shr\romannumeral0%
- \BIC@@Shr#2!!%
- }%
- \or % y > 2
- \BIC@AfterFiFi{%
- \BIC@DivStartX#2!#3#4!!!%
- }%
+\ifcase\BIC@PosCmp#3#4!#2!% y = x
+\BIC@AfterFi{ #11}%
+\or % y > x
+\BIC@AfterFi{ 0}%
+\else % y < x
+\ifx\\#1\\%
+\else
+\expandafter-\romannumeral0%
+\fi
+\ifcase\ifx\\#4\\%
+\ifx#310 % y = 1
+\else\ifx#321 % y = 2
+\else\ifx#342 % y = 4
+\else3 % y > 2
+\fi\fi\fi
+\else
+ 3 % y > 2
+\fi
+\BIC@AfterFiFi{ #2}% y = 1
+\or % y = 2
+\BIC@AfterFiFi{%
+\BIC@@Shr#2!%
+}%
+\or % y = 4
+\BIC@AfterFiFi{%
+\expandafter\BIC@@Shr\romannumeral0%
+\BIC@@Shr#2!!%
+}%
+\or % y > 2
+\BIC@AfterFiFi{%
+\BIC@DivStartX#2!#3#4!!!%
+}%
? \else\BigIntCalcError:ThisCannotHappen%
- \fi
- \BIC@Fi
+\fi
+\BIC@Fi
}
\def\BIC@DivStartX#1#2!#3#4!#5!#6!{%
- \ifx\\#4\\%
- \BIC@AfterFi{%
- \BIC@DivStartYii#6#3#4!{#5#1}#2=!%
- }%
- \else
- \BIC@AfterFi{%
- \BIC@DivStartX#2!#4!#5#1!#6#3!%
- }%
- \BIC@Fi
+\ifx\\#4\\%
+\BIC@AfterFi{%
+\BIC@DivStartYii#6#3#4!{#5#1}#2=!%
+}%
+\else
+\BIC@AfterFi{%
+\BIC@DivStartX#2!#4!#5#1!#6#3!%
+}%
+\BIC@Fi
}
\def\BIC@DivStartYii#1!{%
- \expandafter\BIC@DivStartYiv\romannumeral0%
- \BIC@Shl#1!%
- !#1!%
+\expandafter\BIC@DivStartYiv\romannumeral0%
+\BIC@Shl#1!%
+ !#1!%
}
\def\BIC@DivStartYiv#1!{%
- \expandafter\BIC@DivStartYvi\romannumeral0%
- \BIC@Shl#1!%
- !#1!%
+\expandafter\BIC@DivStartYvi\romannumeral0%
+\BIC@Shl#1!%
+ !#1!%
}
\def\BIC@DivStartYvi#1!#2!{%
- \expandafter\BIC@DivStartYviii\romannumeral0%
- \BIC@AddXY#1!#2!!!%
- !#1!#2!%
+\expandafter\BIC@DivStartYviii\romannumeral0%
+\BIC@AddXY#1!#2!!!%
+ !#1!#2!%
}
\def\BIC@DivStartYviii#1!#2!{%
- \expandafter\BIC@DivStart\romannumeral0%
- \BIC@Shl#2!%
- !#1!#2!%
+\expandafter\BIC@DivStart\romannumeral0%
+\BIC@Shl#2!%
+ !#1!#2!%
}
\def\BIC@DivStart#1!#2!#3!#4!#5!#6!{%
- \BIC@ProcessDiv#6!!#5!#4!#3!#2!#1!=%
+\BIC@ProcessDiv#6!!#5!#4!#3!#2!#1!=%
}
\def\BIC@ProcessDiv#1#2#3!#4!#5!{%
- \ifcase\BIC@PosCmp#5!#1!% y = #1
- \ifx#2=%
- \BIC@AfterFiFi{\BIC@DivCleanup{#41}}%
- \else
- \BIC@AfterFiFi{%
- \BIC@ProcessDiv#2#3!#41!#5!%
- }%
- \fi
- \or % y > #1
- \ifx#2=%
- \BIC@AfterFiFi{\BIC@DivCleanup{#40}}%
- \else
- \ifx\\#4\\%
- \BIC@AfterFiFiFi{%
- \BIC@ProcessDiv{#1#2}#3!!#5!%
- }%
- \else
- \BIC@AfterFiFiFi{%
- \BIC@ProcessDiv{#1#2}#3!#40!#5!%
- }%
- \fi
- \fi
- \else % y < #1
- \BIC@AfterFi{%
- \BIC@@ProcessDiv{#1}#2#3!#4!#5!%
- }%
- \BIC@Fi
+\ifcase\BIC@PosCmp#5!#1!% y = #1
+\ifx#2=%
+\BIC@AfterFiFi{\BIC@DivCleanup{#41}}%
+\else
+\BIC@AfterFiFi{%
+\BIC@ProcessDiv#2#3!#41!#5!%
+}%
+\fi
+\or % y > #1
+\ifx#2=%
+\BIC@AfterFiFi{\BIC@DivCleanup{#40}}%
+\else
+\ifx\\#4\\%
+\BIC@AfterFiFiFi{%
+\BIC@ProcessDiv{#1#2}#3!!#5!%
+}%
+\else
+\BIC@AfterFiFiFi{%
+\BIC@ProcessDiv{#1#2}#3!#40!#5!%
+}%
+\fi
+\fi
+\else % y < #1
+\BIC@AfterFi{%
+\BIC@@ProcessDiv{#1}#2#3!#4!#5!%
+}%
+\BIC@Fi
}
\def\BIC@DivCleanup#1#2={ #1}%
\def\BIC@@ProcessDiv#1#2#3!#4!#5!#6!#7!{%
- \ifcase\BIC@PosCmp#7!#1!% 4y = #1
- \ifx#2=%
- \BIC@AfterFiFi{\BIC@DivCleanup{#44}}%
- \else
- \BIC@AfterFiFi{%
- \BIC@ProcessDiv#2#3!#44!#5!#6!#7!%
- }%
- \fi
- \or % 4y > #1
- \ifcase\BIC@PosCmp#6!#1!% 2y = #1
- \ifx#2=%
- \BIC@AfterFiFiFi{\BIC@DivCleanup{#42}}%
- \else
- \BIC@AfterFiFiFi{%
- \BIC@ProcessDiv#2#3!#42!#5!#6!#7!%
- }%
- \fi
- \or % 2y > #1
- \ifx#2=%
- \BIC@AfterFiFiFi{\BIC@DivCleanup{#41}}%
- \else
- \BIC@AfterFiFiFi{%
- \BIC@DivSub#1!#5!#2#3!#41!#5!#6!#7!%
- }%
- \fi
- \else % 2y < #1
- \BIC@AfterFiFi{%
- \expandafter\BIC@ProcessDivII\romannumeral0%
- \BIC@SubXY#1!#6!!!%
- !#2#3!#4!#5!23%
- #6!#7!%
- }%
- \fi
- \else % 4y < #1
- \BIC@AfterFi{%
- \BIC@@@ProcessDiv{#1}#2#3!#4!#5!#6!#7!%
- }%
- \BIC@Fi
+\ifcase\BIC@PosCmp#7!#1!% 4y = #1
+\ifx#2=%
+\BIC@AfterFiFi{\BIC@DivCleanup{#44}}%
+\else
+\BIC@AfterFiFi{%
+\BIC@ProcessDiv#2#3!#44!#5!#6!#7!%
+}%
+\fi
+\or % 4y > #1
+\ifcase\BIC@PosCmp#6!#1!% 2y = #1
+\ifx#2=%
+\BIC@AfterFiFiFi{\BIC@DivCleanup{#42}}%
+\else
+\BIC@AfterFiFiFi{%
+\BIC@ProcessDiv#2#3!#42!#5!#6!#7!%
+}%
+\fi
+\or % 2y > #1
+\ifx#2=%
+\BIC@AfterFiFiFi{\BIC@DivCleanup{#41}}%
+\else
+\BIC@AfterFiFiFi{%
+\BIC@DivSub#1!#5!#2#3!#41!#5!#6!#7!%
+}%
+\fi
+\else % 2y < #1
+\BIC@AfterFiFi{%
+\expandafter\BIC@ProcessDivII\romannumeral0%
+\BIC@SubXY#1!#6!!!%
+ !#2#3!#4!#5!23%
+#6!#7!%
+}%
+\fi
+\else % 4y < #1
+\BIC@AfterFi{%
+\BIC@@@ProcessDiv{#1}#2#3!#4!#5!#6!#7!%
+}%
+\BIC@Fi
}
\def\BIC@DivSub#1!#2!#3{%
- \expandafter\BIC@ProcessDiv\expandafter{%
- \romannumeral0%
- \BIC@SubXY#1!#2!!!%
- #3%
- }%
+\expandafter\BIC@ProcessDiv\expandafter{%
+\romannumeral0%
+\BIC@SubXY#1!#2!!!%
+#3%
+}%
}
\def\BIC@ProcessDivII#1!#2#3!#4!#5!#6#7{%
- \ifcase\BIC@PosCmp#5!#1!% y = #1
- \ifx#2=%
- \BIC@AfterFiFi{\BIC@DivCleanup{#4#7}}%
- \else
- \BIC@AfterFiFi{%
- \BIC@ProcessDiv#2#3!#4#7!#5!%
- }%
- \fi
- \or % y > #1
- \ifx#2=%
- \BIC@AfterFiFi{\BIC@DivCleanup{#4#6}}%
- \else
- \BIC@AfterFiFi{%
- \BIC@ProcessDiv{#1#2}#3!#4#6!#5!%
- }%
- \fi
- \else % y < #1
- \ifx#2=%
- \BIC@AfterFiFi{\BIC@DivCleanup{#4#7}}%
- \else
- \BIC@AfterFiFi{%
- \BIC@DivSub#1!#5!#2#3!#4#7!#5!%
- }%
- \fi
- \BIC@Fi
+\ifcase\BIC@PosCmp#5!#1!% y = #1
+\ifx#2=%
+\BIC@AfterFiFi{\BIC@DivCleanup{#4#7}}%
+\else
+\BIC@AfterFiFi{%
+\BIC@ProcessDiv#2#3!#4#7!#5!%
+}%
+\fi
+\or % y > #1
+\ifx#2=%
+\BIC@AfterFiFi{\BIC@DivCleanup{#4#6}}%
+\else
+\BIC@AfterFiFi{%
+\BIC@ProcessDiv{#1#2}#3!#4#6!#5!%
+}%
+\fi
+\else % y < #1
+\ifx#2=%
+\BIC@AfterFiFi{\BIC@DivCleanup{#4#7}}%
+\else
+\BIC@AfterFiFi{%
+\BIC@DivSub#1!#5!#2#3!#4#7!#5!%
+}%
+\fi
+\BIC@Fi
}
\def\BIC@@@ProcessDiv#1#2#3!#4!#5!#6!#7!#8!#9!{%
- \ifcase\BIC@PosCmp#8!#1!% 6y = #1
- \ifx#2=%
- \BIC@AfterFiFi{\BIC@DivCleanup{#46}}%
- \else
- \BIC@AfterFiFi{%
- \BIC@ProcessDiv#2#3!#46!#5!#6!#7!#8!#9!%
- }%
- \fi
- \or % 6y > #1
- \BIC@AfterFi{%
- \expandafter\BIC@ProcessDivII\romannumeral0%
- \BIC@SubXY#1!#7!!!%
- !#2#3!#4!#5!45%
- #6!#7!#8!#9!%
- }%
- \else % 6y < #1
- \ifcase\BIC@PosCmp#9!#1!% 8y = #1
- \ifx#2=%
- \BIC@AfterFiFiFi{\BIC@DivCleanup{#48}}%
- \else
- \BIC@AfterFiFiFi{%
- \BIC@ProcessDiv#2#3!#48!#5!#6!#7!#8!#9!%
- }%
- \fi
- \or % 8y > #1
- \BIC@AfterFiFi{%
- \expandafter\BIC@ProcessDivII\romannumeral0%
- \BIC@SubXY#1!#8!!!%
- !#2#3!#4!#5!67%
- #6!#7!#8!#9!%
- }%
- \else % 8y < #1
- \BIC@AfterFiFi{%
- \expandafter\BIC@ProcessDivII\romannumeral0%
- \BIC@SubXY#1!#9!!!%
- !#2#3!#4!#5!89%
- #6!#7!#8!#9!%
- }%
- \fi
- \BIC@Fi
+\ifcase\BIC@PosCmp#8!#1!% 6y = #1
+\ifx#2=%
+\BIC@AfterFiFi{\BIC@DivCleanup{#46}}%
+\else
+\BIC@AfterFiFi{%
+\BIC@ProcessDiv#2#3!#46!#5!#6!#7!#8!#9!%
+}%
+\fi
+\or % 6y > #1
+\BIC@AfterFi{%
+\expandafter\BIC@ProcessDivII\romannumeral0%
+\BIC@SubXY#1!#7!!!%
+ !#2#3!#4!#5!45%
+#6!#7!#8!#9!%
+}%
+\else % 6y < #1
+\ifcase\BIC@PosCmp#9!#1!% 8y = #1
+\ifx#2=%
+\BIC@AfterFiFiFi{\BIC@DivCleanup{#48}}%
+\else
+\BIC@AfterFiFiFi{%
+\BIC@ProcessDiv#2#3!#48!#5!#6!#7!#8!#9!%
+}%
+\fi
+\or % 8y > #1
+\BIC@AfterFiFi{%
+\expandafter\BIC@ProcessDivII\romannumeral0%
+\BIC@SubXY#1!#8!!!%
+ !#2#3!#4!#5!67%
+#6!#7!#8!#9!%
+}%
+\else % 8y < #1
+\BIC@AfterFiFi{%
+\expandafter\BIC@ProcessDivII\romannumeral0%
+\BIC@SubXY#1!#9!!!%
+ !#2#3!#4!#5!89%
+#6!#7!#8!#9!%
+}%
+\fi
+\BIC@Fi
}
\def\bigintcalcMod#1{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BIC@Mod
- \bigintcalcNum{#1}!%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BIC@Mod
+\bigintcalcNum{#1}!%
}
\def\BIC@Mod#1!#2{%
- \expandafter\expandafter\expandafter\BIC@ModSwitchSign
- \bigintcalcNum{#2}!#1!%
+\expandafter\expandafter\expandafter\BIC@ModSwitchSign
+\bigintcalcNum{#2}!#1!%
}
\def\BigIntCalcMod#1!#2!{%
- \romannumeral0%
- \BIC@ModSwitchSign#2!#1!%
+\romannumeral0%
+\BIC@ModSwitchSign#2!#1!%
}
\def\BIC@ModSwitchSign#1#2!#3#4!{%
- \ifcase\ifx\\#2\\%
- \ifx#100 % y = 0
- \else1 % y > 0
- \fi
- \else
- \ifx#1-2 % y < 0
- \else1 % y > 0
- \fi
- \fi
- \BIC@AfterFi{ 0\BigIntCalcError:DivisionByZero}%
- \or % y > 0
- \ifcase\ifx\\#4\\\ifx#300 \else1 \fi\else1 \fi % x = 0
- \BIC@AfterFiFi{ 0}%
- \else
- \BIC@AfterFiFi{%
- \BIC@ModSwitch{}#3#4!#1#2!%
- }%
- \fi
- \else % y < 0
- \ifcase\ifx\\#4\\%
- \ifx#300 % x = 0
- \else1 % x > 0
- \fi
- \else
- \ifx#3-2 % x < 0
- \else1 % x > 0
- \fi
- \fi
- \BIC@AfterFiFi{ 0}%
- \or % x > 0
- \BIC@AfterFiFi{%
- \BIC@ModSwitch--#3#4!#2!%
- }%
- \else % x < 0
- \BIC@AfterFiFi{%
- \BIC@ModSwitch-#4!#2!%
- }%
- \fi
- \BIC@Fi
+\ifcase\ifx\\#2\\%
+\ifx#100 % y = 0
+\else1 % y > 0
+\fi
+\else
+\ifx#1-2 % y < 0
+\else1 % y > 0
+\fi
+\fi
+\BIC@AfterFi{ 0\BigIntCalcError:DivisionByZero}%
+\or % y > 0
+\ifcase\ifx\\#4\\\ifx#300 \else1 \fi\else1 \fi % x = 0
+\BIC@AfterFiFi{ 0}%
+\else
+\BIC@AfterFiFi{%
+\BIC@ModSwitch{}#3#4!#1#2!%
+}%
+\fi
+\else % y < 0
+\ifcase\ifx\\#4\\%
+\ifx#300 % x = 0
+\else1 % x > 0
+\fi
+\else
+\ifx#3-2 % x < 0
+\else1 % x > 0
+\fi
+\fi
+\BIC@AfterFiFi{ 0}%
+\or % x > 0
+\BIC@AfterFiFi{%
+\BIC@ModSwitch--#3#4!#2!%
+}%
+\else % x < 0
+\BIC@AfterFiFi{%
+\BIC@ModSwitch-#4!#2!%
+}%
+\fi
+\BIC@Fi
}
\def\BIC@ModSwitch#1#2#3!#4#5!{%
- \ifcase\ifx\\#5\\%
- \ifx#410 % y = 1
- \else\ifx#421 % y = 2
- \else2 % y > 2
- \fi\fi
- \else2 % y > 2
- \fi
- \BIC@AfterFi{ 0}% y = 1
- \or % y = 2
- \ifcase\BIC@ModTwo#2#3! % even(x)
- \BIC@AfterFiFi{ 0}%
- \or % odd(x)
- \BIC@AfterFiFi{ #11}%
+\ifcase\ifx\\#5\\%
+\ifx#410 % y = 1
+\else\ifx#421 % y = 2
+\else2 % y > 2
+\fi\fi
+\else2 % y > 2
+\fi
+\BIC@AfterFi{ 0}% y = 1
+\or % y = 2
+\ifcase\BIC@ModTwo#2#3! % even(x)
+\BIC@AfterFiFi{ 0}%
+\or % odd(x)
+\BIC@AfterFiFi{ #11}%
? \else\BigIntCalcError:ThisCannotHappen%
- \fi
- \or % y > 2
- \ifx\\#1\\%
- \else
- \expandafter\BIC@Space\romannumeral0%
- \expandafter\BIC@ModMinus\romannumeral0%
- \fi
- \ifx#2-% x < 0
- \BIC@AfterFiFi{%
- \expandafter\expandafter\expandafter\BIC@ModX
- \bigintcalcSub{#2#3}{%
- \bigintcalcMul{#4#5}{\bigintcalcDiv{#2#3}{#4#5}}%
- }!#4#5!%
- }%
- \else % x > 0
- \BIC@AfterFiFi{%
- \expandafter\expandafter\expandafter\BIC@Space
- \bigintcalcSub{#2#3}{%
- \bigintcalcMul{#4#5}{\bigintcalcDiv{#2#3}{#4#5}}%
- }%
- }%
- \fi
+\fi
+\or % y > 2
+\ifx\\#1\\%
+\else
+\expandafter\BIC@Space\romannumeral0%
+\expandafter\BIC@ModMinus\romannumeral0%
+\fi
+\ifx#2-% x < 0
+\BIC@AfterFiFi{%
+\expandafter\expandafter\expandafter\BIC@ModX
+\bigintcalcSub{#2#3}{%
+\bigintcalcMul{#4#5}{\bigintcalcDiv{#2#3}{#4#5}}%
+}!#4#5!%
+}%
+\else % x > 0
+\BIC@AfterFiFi{%
+\expandafter\expandafter\expandafter\BIC@Space
+\bigintcalcSub{#2#3}{%
+\bigintcalcMul{#4#5}{\bigintcalcDiv{#2#3}{#4#5}}%
+}%
+}%
+\fi
? \else\BigIntCalcError:ThisCannotHappen%
- \BIC@Fi
+\BIC@Fi
}
\def\BIC@ModMinus#1{%
- \ifx#10%
- \BIC@AfterFi{ 0}%
- \else
- \BIC@AfterFi{ -#1}%
- \BIC@Fi
+\ifx#10%
+\BIC@AfterFi{ 0}%
+\else
+\BIC@AfterFi{ -#1}%
+\BIC@Fi
}
\def\BIC@ModX#1#2!#3!{%
- \ifx#1-% z < 0
- \BIC@AfterFi{%
- \expandafter\BIC@Space\romannumeral0%
- \BIC@SubXY#3!#2!!!%
- }%
- \else % z >= 0
- \BIC@AfterFi{ #1#2}%
- \BIC@Fi
+\ifx#1-% z < 0
+\BIC@AfterFi{%
+\expandafter\BIC@Space\romannumeral0%
+\BIC@SubXY#3!#2!!!%
+}%
+\else % z >= 0
+\BIC@AfterFi{ #1#2}%
+\BIC@Fi
}
\BIC@AtEnd%
- \endinput
+\endinput
<hobsub>
\hobsub@StopPackage
\hobsub@StartPackage{bitset}
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode123=1 % {
- \catcode125=2 % }
- \expandafter\let\expandafter\x\csname ver@bitset.sty\endcsname
- \ifx\x\relax % plain-TeX, first loading
- \else
- \def\empty{}%
- \ifx\x\empty % LaTeX, first loading,
- % variable is initialized, but \ProvidesPackage not yet seen
- \else
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
- \fi
- \x{bitset}{The package is already loaded}%
- \aftergroup\endinput
- \fi
- \fi
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\expandafter\let\expandafter\x\csname ver@bitset.sty\endcsname
+\ifx\x\relax % plain-TeX, first loading
+\else
+\def\empty{}%
+\ifx\x\empty % LaTeX, first loading,
+% variable is initialized, but \ProvidesPackage not yet seen
+\else
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+\fi
+\x{bitset}{The package is already loaded}%
+\aftergroup\endinput
+\fi
+\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode47=12 % /
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode91=12 % [
- \catcode93=12 % ]
- \catcode123=1 % {
- \catcode125=2 % }
- \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
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode47=12 % /
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode91=12 % [
+\catcode93=12 % ]
+\catcode123=1 % {
+\catcode125=2 % }
+\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@bitset.sty\endcsname
\ProvidesPackage{bitset}%
- [2011/01/30 v1.1 Data type bit set (HO)]%
+ [2011/01/30 v1.1 Data type bit set (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode123=1 % {
- \catcode125=2 % }
- \catcode64=11 % @
- \def\x{\endgroup
- \expandafter\edef\csname BitSet@AtEnd\endcsname{%
- \endlinechar=\the\endlinechar\relax
- \catcode13=\the\catcode13\relax
- \catcode32=\the\catcode32\relax
- \catcode35=\the\catcode35\relax
- \catcode61=\the\catcode61\relax
- \catcode64=\the\catcode64\relax
- \catcode123=\the\catcode123\relax
- \catcode125=\the\catcode125\relax
- }%
- }%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode123=1 % {
+\catcode125=2 % }
+\catcode64=11 % @
+\def\x{\endgroup
+\expandafter\edef\csname BitSet@AtEnd\endcsname{%
+\endlinechar=\the\endlinechar\relax
+\catcode13=\the\catcode13\relax
+\catcode32=\the\catcode32\relax
+\catcode35=\the\catcode35\relax
+\catcode61=\the\catcode61\relax
+\catcode64=\the\catcode64\relax
+\catcode123=\the\catcode123\relax
+\catcode125=\the\catcode125\relax
+}%
+}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
@@ -7732,11 +7731,11 @@ $ \BIC@Temp 9{18\or27\or36\or45\or54\or63\or72\or81}%
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2{%
- \edef\BitSet@AtEnd{%
- \BitSet@AtEnd
- \catcode#1=\the\catcode#1\relax
- }%
- \catcode#1=#2\relax
+\edef\BitSet@AtEnd{%
+\BitSet@AtEnd
+\catcode#1=\the\catcode#1\relax
+}%
+\catcode#1=#2\relax
}
\TMP@EnsureCode{33}{12}% !
\TMP@EnsureCode{39}{12}% '
@@ -7759,24 +7758,24 @@ $ \BIC@Temp 9{18\or27\or36\or45\or54\or63\or72\or81}%
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname BitSet@TestMode\endcsname\relax
\else
- \catcode63=9 % ? (ignore)
+\catcode63=9 % ? (ignore)
\fi
? \let\BitSet@@TestMode\BitSet@TestMode
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname RequirePackage\endcsname\relax
- \def\TMP@RequirePackage#1[#2]{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname ver@#1.sty\endcsname\relax
- \input #1.sty\relax
- \fi
- }%
- \TMP@RequirePackage{infwarerr}[2007/09/09]%
- \TMP@RequirePackage{intcalc}[2007/09/27]%
- \TMP@RequirePackage{bigintcalc}[2007/09/27]%
-\else
- \RequirePackage{infwarerr}[2007/09/09]%
- \RequirePackage{intcalc}[2007/09/27]%
- \RequirePackage{bigintcalc}[2007/09/27]%
+\def\TMP@RequirePackage#1[#2]{%
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname ver@#1.sty\endcsname\relax
+\input #1.sty\relax
+\fi
+}%
+\TMP@RequirePackage{infwarerr}[2007/09/09]%
+\TMP@RequirePackage{intcalc}[2007/09/27]%
+\TMP@RequirePackage{bigintcalc}[2007/09/27]%
+\else
+\RequirePackage{infwarerr}[2007/09/09]%
+\RequirePackage{intcalc}[2007/09/27]%
+\RequirePackage{bigintcalc}[2007/09/27]%
\fi
\def\BitSet@MaxSize{2147483647}%
\def\BitSet@Empty{}
@@ -7786,177 +7785,177 @@ $ \BIC@Temp 9{18\or27\or36\or45\or54\or63\or72\or81}%
\def\BitSet@SecondOfTwo#1#2{#2}
\def\BitSet@Space{ }
\def\BitSet@ZapSpace#1 #2{%
- #1%
- \ifx\BitSet@Empty#2%
- \else
- \expandafter\BitSet@ZapSpace
- \fi
- #2%
+#1%
+\ifx\BitSet@Empty#2%
+\else
+\expandafter\BitSet@ZapSpace
+\fi
+#2%
}
\let\BitSet@Fi\fi
\def\BitSet@AfterFi#1#2\BitSet@Fi{\fi#1}
\def\BitSet@AfterFiFi#1#2\BitSet@Fi{\fi\fi#1}%
\def\BitSet@AfterFiFiFi#1#2\BitSet@Fi{\fi\fi\fi#1}%
\def\BitSet@IfUndefined#1{%
- \expandafter\ifx\csname BS@#1\endcsname\relax
- \expandafter\BitSet@FirstOfTwo
- \else
- \expandafter\BitSet@SecondOfTwo
- \fi
+\expandafter\ifx\csname BS@#1\endcsname\relax
+\expandafter\BitSet@FirstOfTwo
+\else
+\expandafter\BitSet@SecondOfTwo
+\fi
}
\def\BitSet@CheckIndex#1#2#3{%
- \BitSet@IfUndefined{#2}{\bitsetReset{#2}}{}%
- \expandafter\expandafter\expandafter\BitSet@@CheckIndex
- \intcalcNum{#3}!%
- {#2}{#1}%
+\BitSet@IfUndefined{#2}{\bitsetReset{#2}}{}%
+\expandafter\expandafter\expandafter\BitSet@@CheckIndex
+\intcalcNum{#3}!%
+{#2}{#1}%
}
\def\BitSet@@CheckIndex#1!#2#3{%
- \ifnum#1<0 %
- \BitSet@AfterFi{%
- \@PackageError{bitset}{%
- Invalid negative index (#1)%
- }\@ehc
- }%
- \else
- \BitSet@AfterFi{%
- #3{#2}{#1}%
- }%
- \BitSet@Fi
+\ifnum#1<0 %
+\BitSet@AfterFi{%
+\@PackageError{bitset}{%
+ Invalid negative index (#1)%
+}\@ehc
+}%
+\else
+\BitSet@AfterFi{%
+#3{#2}{#1}%
+}%
+\BitSet@Fi
}
\def\bitsetReset#1{%
- \expandafter\def\csname BS@#1\endcsname{0}%
+\expandafter\def\csname BS@#1\endcsname{0}%
}
\def\bitsetLet#1#2{%
- \BitSet@IfUndefined{#2}{%
- \bitsetReset{#1}%
- }{%
- \expandafter\let\csname BS@#1\expandafter\endcsname
- \csname BS@#2\endcsname
- }%
+\BitSet@IfUndefined{#2}{%
+\bitsetReset{#1}%
+}{%
+\expandafter\let\csname BS@#1\expandafter\endcsname
+\csname BS@#2\endcsname
+}%
}
\def\bitsetSetBin#1#2{%
- \edef\BitSet@Temp{#2}%
- \edef\BitSet@Temp{%
- \expandafter\expandafter\expandafter\BitSet@ZapSpace
- \expandafter\BitSet@Temp\BitSet@Space\BitSet@Empty
- }%
- \edef\BitSet@Temp{%
- \expandafter\BitSet@KillZeros\BitSet@Temp\BitSet@Empty
- }%
- \ifx\BitSet@Temp\BitSet@Empty
- \expandafter\let\csname BS@#1\endcsname\BitSet@Zero
- \else
- \expandafter\edef\csname BS@#1\endcsname{%
- \expandafter\BitSet@Reverse\BitSet@Temp!%
- }%
- \fi
+\edef\BitSet@Temp{#2}%
+\edef\BitSet@Temp{%
+\expandafter\expandafter\expandafter\BitSet@ZapSpace
+\expandafter\BitSet@Temp\BitSet@Space\BitSet@Empty
+}%
+\edef\BitSet@Temp{%
+\expandafter\BitSet@KillZeros\BitSet@Temp\BitSet@Empty
+}%
+\ifx\BitSet@Temp\BitSet@Empty
+\expandafter\let\csname BS@#1\endcsname\BitSet@Zero
+\else
+\expandafter\edef\csname BS@#1\endcsname{%
+\expandafter\BitSet@Reverse\BitSet@Temp!%
+}%
+\fi
}
\def\BitSet@KillZeros#1{%
- \ifx#10%
- \expandafter\BitSet@KillZeros
- \else
- #1%
- \fi
+\ifx#10%
+\expandafter\BitSet@KillZeros
+\else
+#1%
+\fi
}
\def\BitSet@Reverse#1#2!{%
- \ifx\\#2\\%
- #1%
- \else
- \BitSet@AfterFi{%
- \BitSet@Reverse#2!#1%
- }%
- \BitSet@Fi
+\ifx\\#2\\%
+#1%
+\else
+\BitSet@AfterFi{%
+\BitSet@Reverse#2!#1%
+}%
+\BitSet@Fi
}
\def\bitsetSetOct{%
- \BitSet@SetOctHex\BitSet@FromFirstOct
+\BitSet@SetOctHex\BitSet@FromFirstOct
}
\def\bitsetSetHex{%
- \BitSet@SetOctHex\BitSet@FromFirstHex
+\BitSet@SetOctHex\BitSet@FromFirstHex
}
\def\BitSet@SetOctHex#1#2#3{%
- \edef\BitSet@Temp{#3}%
- \edef\BitSet@Temp{%
- \expandafter\expandafter\expandafter\BitSet@ZapSpace
- \expandafter\BitSet@Temp\BitSet@Space\BitSet@Empty
- }%
- \edef\BitSet@Temp{%
- \expandafter\BitSet@KillZeros\BitSet@Temp\BitSet@Empty
- }%
- \ifx\BitSet@Temp\BitSet@Empty
- \expandafter\let\csname BS@#2\endcsname\BitSet@Zero
- \else
- \edef\BitSet@Temp{%
- \expandafter#1\BitSet@Temp!%
- }%
- \ifx\BitSet@Temp\BitSet@Empty
- \expandafter\let\csname BS@#2\endcsname\BitSet@Zero
- \else
- \expandafter\edef\csname BS@#2\endcsname{%
- \expandafter\BitSet@Reverse\BitSet@Temp!%
- }%
- \fi
- \fi
+\edef\BitSet@Temp{#3}%
+\edef\BitSet@Temp{%
+\expandafter\expandafter\expandafter\BitSet@ZapSpace
+\expandafter\BitSet@Temp\BitSet@Space\BitSet@Empty
+}%
+\edef\BitSet@Temp{%
+\expandafter\BitSet@KillZeros\BitSet@Temp\BitSet@Empty
+}%
+\ifx\BitSet@Temp\BitSet@Empty
+\expandafter\let\csname BS@#2\endcsname\BitSet@Zero
+\else
+\edef\BitSet@Temp{%
+\expandafter#1\BitSet@Temp!%
+}%
+\ifx\BitSet@Temp\BitSet@Empty
+\expandafter\let\csname BS@#2\endcsname\BitSet@Zero
+\else
+\expandafter\edef\csname BS@#2\endcsname{%
+\expandafter\BitSet@Reverse\BitSet@Temp!%
+}%
+\fi
+\fi
}
\def\BitSet@FromFirstOct#1{%
- \ifx#1!%
- \else
- \ifcase#1 \BitSet@AfterFiFi\BitSet@FromFirstOct
- \or 1%
- \or 10%
- \or 11%
- \or 100%
- \or 101%
- \or 110%
- \or 111%
- \else \BitSetError:WrongOctalDigit%
- \fi
- \expandafter\BitSet@FromOct
- \BitSet@Fi
+\ifx#1!%
+\else
+\ifcase#1 \BitSet@AfterFiFi\BitSet@FromFirstOct
+\or 1%
+\or 10%
+\or 11%
+\or 100%
+\or 101%
+\or 110%
+\or 111%
+\else \BitSetError:WrongOctalDigit%
+\fi
+\expandafter\BitSet@FromOct
+\BitSet@Fi
}
\def\BitSet@FromOct#1{%
- \ifx#1!%
- \else
- \ifcase#1 000%
- \or 001%
- \or 010%
- \or 011%
- \or 100%
- \or 101%
- \or 110%
- \or 111%
- \else \BitSetError:WrongOctalDigit%
- \fi
- \expandafter\BitSet@FromOct
- \fi
+\ifx#1!%
+\else
+\ifcase#1 000%
+\or 001%
+\or 010%
+\or 011%
+\or 100%
+\or 101%
+\or 110%
+\or 111%
+\else \BitSetError:WrongOctalDigit%
+\fi
+\expandafter\BitSet@FromOct
+\fi
}
\def\BitSet@FromFirstHex#1{%
- \ifx#1!%
- \else
- \ifx#10%
- \BitSet@AfterFiFi\BitSet@FromFirstHex
- \fi
- \expandafter\ifx\csname BitSet@Hex#1\endcsname\relax
- \BitSetError:InvalidHexDigit%
- \else
- \expandafter\expandafter\expandafter\BitSet@KillZeros
- \csname BitSet@Hex#1\endcsname
- \fi
- \expandafter\BitSet@FromHex
- \BitSet@Fi
+\ifx#1!%
+\else
+\ifx#10%
+\BitSet@AfterFiFi\BitSet@FromFirstHex
+\fi
+\expandafter\ifx\csname BitSet@Hex#1\endcsname\relax
+\BitSetError:InvalidHexDigit%
+\else
+\expandafter\expandafter\expandafter\BitSet@KillZeros
+\csname BitSet@Hex#1\endcsname
+\fi
+\expandafter\BitSet@FromHex
+\BitSet@Fi
}
\def\BitSet@FromHex#1{%
- \ifx#1!%
- \else
- \expandafter\ifx\csname BitSet@Hex#1\endcsname\relax
- \BitSetError:InvalidHexDigit%
- \else
- \csname BitSet@Hex#1\endcsname
- \fi
- \expandafter\BitSet@FromHex
- \fi
+\ifx#1!%
+\else
+\expandafter\ifx\csname BitSet@Hex#1\endcsname\relax
+\BitSetError:InvalidHexDigit%
+\else
+\csname BitSet@Hex#1\endcsname
+\fi
+\expandafter\BitSet@FromHex
+\fi
}
\def\BitSet@Temp#1{%
- \expandafter\def\csname BitSet@Hex#1\endcsname
+\expandafter\def\csname BitSet@Hex#1\endcsname
}
\BitSet@Temp 0{0000}%
\BitSet@Temp 1{0001}%
@@ -7981,165 +7980,165 @@ $ \BIC@Temp 9{18\or27\or36\or45\or54\or63\or72\or81}%
\BitSet@Temp e{1110}%
\BitSet@Temp f{1111}%
\def\bitsetSetDec#1#2{%
- \edef\BitSet@Temp{#2}%
- \edef\BitSet@Temp{%
- \expandafter\expandafter\expandafter\BitSet@ZapSpace
- \expandafter\BitSet@Temp\BitSet@Space\BitSet@Empty
- }%
- \edef\BitSet@Temp{%
- \expandafter\BitSet@KillZeros\BitSet@Temp\BitSet@Empty
- }%
- \ifx\BitSet@Temp\BitSet@Empty
- \expandafter\let\csname BS@#1\endcsname\BitSet@Zero
- \else
- \ifcase\bigintcalcSgn{\BitSet@Temp} %
- \expandafter\let\csname BS@#1\endcsname\BitSet@Zero
- \or
- \ifnum\bigintcalcCmp\BitSet@Temp\BitSet@MaxSize>0 %
- \expandafter\edef\csname BS@#1\endcsname{%
- \expandafter\BitSet@SetDecBig\BitSet@Temp!%
- }%
- \else
- \expandafter\edef\csname BS@#1\endcsname{%
- \expandafter\BitSet@SetDec\BitSet@Temp!%
- }%
- \fi
- \else
- \@PackageError{bitset}{%
- Bit sets cannot be negative%
- }\@ehc
- \fi
- \fi
+\edef\BitSet@Temp{#2}%
+\edef\BitSet@Temp{%
+\expandafter\expandafter\expandafter\BitSet@ZapSpace
+\expandafter\BitSet@Temp\BitSet@Space\BitSet@Empty
+}%
+\edef\BitSet@Temp{%
+\expandafter\BitSet@KillZeros\BitSet@Temp\BitSet@Empty
+}%
+\ifx\BitSet@Temp\BitSet@Empty
+\expandafter\let\csname BS@#1\endcsname\BitSet@Zero
+\else
+\ifcase\bigintcalcSgn{\BitSet@Temp} %
+\expandafter\let\csname BS@#1\endcsname\BitSet@Zero
+\or
+\ifnum\bigintcalcCmp\BitSet@Temp\BitSet@MaxSize>0 %
+\expandafter\edef\csname BS@#1\endcsname{%
+\expandafter\BitSet@SetDecBig\BitSet@Temp!%
+}%
+\else
+\expandafter\edef\csname BS@#1\endcsname{%
+\expandafter\BitSet@SetDec\BitSet@Temp!%
+}%
+\fi
+\else
+\@PackageError{bitset}{%
+ Bit sets cannot be negative%
+}\@ehc
+\fi
+\fi
}
\def\BitSet@SetDecBig#1#2#3#4#5#6#7#8#9!{%
- \ifx\\#9\\%
- \BitSet@SetDec#1#2#3#4#5#6#7#8!%
- \else
- \ifcase\BigIntCalcOdd#1#2#4#5#6#7#8#9! %
- 0%
- \or
- 1%
+\ifx\\#9\\%
+\BitSet@SetDec#1#2#3#4#5#6#7#8!%
+\else
+\ifcase\BigIntCalcOdd#1#2#4#5#6#7#8#9! %
+ 0%
+\or
+ 1%
? \else\BitSetError:ThisCannotHappen%
- \fi
- \BitSet@AfterFi{%
- \expandafter\expandafter\expandafter\BitSet@SetDecBig
- \BigIntCalcShr#1#2#3#4#5#6#7#8#9!!%
- }%
- \BitSet@Fi
+\fi
+\BitSet@AfterFi{%
+\expandafter\expandafter\expandafter\BitSet@SetDecBig
+\BigIntCalcShr#1#2#3#4#5#6#7#8#9!!%
+}%
+\BitSet@Fi
}
\def\BitSet@SetDec#1!{%
- \ifcase#1 %
- \or 1%
- \else
- \ifodd#1 %
- 1%
- \else
- 0%
- \fi
- \BitSet@AfterFi{%
- \expandafter\expandafter\expandafter\BitSet@SetDec
- \IntCalcShr#1!!%
- }%
- \BitSet@Fi
+\ifcase#1 %
+\or 1%
+\else
+\ifodd#1 %
+ 1%
+\else
+ 0%
+\fi
+\BitSet@AfterFi{%
+\expandafter\expandafter\expandafter\BitSet@SetDec
+\IntCalcShr#1!!%
+}%
+\BitSet@Fi
}
\def\bitsetGetBin#1#2{%
- \romannumeral0%
- \expandafter\expandafter\expandafter\BitSet@@GetBin
- \intcalcNum{#2}!{#1}%
+\romannumeral0%
+\expandafter\expandafter\expandafter\BitSet@@GetBin
+\intcalcNum{#2}!{#1}%
}
\def\BitSet@@GetBin#1!#2{%
- \BitSet@IfUndefined{#2}{%
- \ifnum#1>1 %
- \BitSet@AfterFi{%
- \expandafter\expandafter\expandafter\BitSet@Fill
- \IntCalcDec#1!!0%
- }%
- \else
- \BitSet@AfterFi{ 0}%
- \BitSet@Fi
- }{%
- \expandafter\expandafter\expandafter\BitSet@NumBinRev
- \expandafter\expandafter\expandafter1%
- \expandafter\expandafter\expandafter!%
- \csname BS@#2\endcsname!!#1!%
- }%
+\BitSet@IfUndefined{#2}{%
+\ifnum#1>1 %
+\BitSet@AfterFi{%
+\expandafter\expandafter\expandafter\BitSet@Fill
+\IntCalcDec#1!!0%
+}%
+\else
+\BitSet@AfterFi{ 0}%
+\BitSet@Fi
+}{%
+\expandafter\expandafter\expandafter\BitSet@NumBinRev
+\expandafter\expandafter\expandafter1%
+\expandafter\expandafter\expandafter!%
+\csname BS@#2\endcsname!!#1!%
+}%
}
\def\BitSet@Fill#1!{%
- \ifnum#1>0 %
- \BitSet@AfterFi{%
- \expandafter\expandafter\expandafter\BitSet@Fill
- \IntCalcDec#1!!0%
- }%
- \else
- \BitSet@AfterFi{ }%
- \BitSet@Fi
+\ifnum#1>0 %
+\BitSet@AfterFi{%
+\expandafter\expandafter\expandafter\BitSet@Fill
+\IntCalcDec#1!!0%
+}%
+\else
+\BitSet@AfterFi{ }%
+\BitSet@Fi
}
\def\BitSet@NumBinRev#1!#2#3!{%
- \ifx\\#3\\%
- \BitSet@AfterFi{%
- \BitSet@NumBinFill#1!#2%
- }%
- \else
- \BitSet@AfterFi{%
- \expandafter\expandafter\expandafter\BitSet@NumBinRev
- \IntCalcInc#1!!#3!#2%
- }%
- \BitSet@Fi
+\ifx\\#3\\%
+\BitSet@AfterFi{%
+\BitSet@NumBinFill#1!#2%
+}%
+\else
+\BitSet@AfterFi{%
+\expandafter\expandafter\expandafter\BitSet@NumBinRev
+\IntCalcInc#1!!#3!#2%
+}%
+\BitSet@Fi
}
\def\BitSet@NumBinFill#1!#2!#3!{%
- \ifnum#3>#1 %
- \BitSet@AfterFi{%
- \expandafter\expandafter\expandafter\BitSet@Fill
- \IntCalcSub#3!#1!!#2%
- }%
- \else
- \BitSet@AfterFi{ #2}%
- \BitSet@Fi
+\ifnum#3>#1 %
+\BitSet@AfterFi{%
+\expandafter\expandafter\expandafter\BitSet@Fill
+\IntCalcSub#3!#1!!#2%
+}%
+\else
+\BitSet@AfterFi{ #2}%
+\BitSet@Fi
}
\def\bitsetGetOct#1#2{%
- \romannumeral0%
- \bitsetIsEmpty{#1}{%
- \expandafter\expandafter\expandafter\BitSet@@GetOctHex
- \intcalcNum{#2}!3!230%
- }{%
- \expandafter\expandafter\expandafter\BitSet@@GetOct
- \expandafter\expandafter\expandafter1%
- \expandafter\expandafter\expandafter!%
- \expandafter\expandafter\expandafter!%
- \csname BS@#1\endcsname00%
- \BitSet@Empty\BitSet@Empty\BitSet@Empty!{#2}%
- }%
+\romannumeral0%
+\bitsetIsEmpty{#1}{%
+\expandafter\expandafter\expandafter\BitSet@@GetOctHex
+\intcalcNum{#2}!3!230%
+}{%
+\expandafter\expandafter\expandafter\BitSet@@GetOct
+\expandafter\expandafter\expandafter1%
+\expandafter\expandafter\expandafter!%
+\expandafter\expandafter\expandafter!%
+\csname BS@#1\endcsname00%
+\BitSet@Empty\BitSet@Empty\BitSet@Empty!{#2}%
+}%
}
\def\bitsetGetHex#1#2{%
- \romannumeral0%
- \bitsetIsEmpty{#1}{%
- \expandafter\expandafter\expandafter\BitSet@@GetOctHex
- \intcalcNum{#2}!4!340%
- }{%
- \expandafter\expandafter\expandafter\BitSet@@GetHex
- \expandafter\expandafter\expandafter1%
- \expandafter\expandafter\expandafter!%
- \expandafter\expandafter\expandafter!%
- \csname BS@#1\endcsname000%
- \BitSet@Empty\BitSet@Empty\BitSet@Empty\BitSet@Empty!{#2}%
- }%
+\romannumeral0%
+\bitsetIsEmpty{#1}{%
+\expandafter\expandafter\expandafter\BitSet@@GetOctHex
+\intcalcNum{#2}!4!340%
+}{%
+\expandafter\expandafter\expandafter\BitSet@@GetHex
+\expandafter\expandafter\expandafter1%
+\expandafter\expandafter\expandafter!%
+\expandafter\expandafter\expandafter!%
+\csname BS@#1\endcsname000%
+\BitSet@Empty\BitSet@Empty\BitSet@Empty\BitSet@Empty!{#2}%
+}%
}
\def\BitSet@@GetOct#1!#2!#3#4#5{%
- \ifx#5\BitSet@Empty
- \BitSet@AfterFi{%
- \expandafter\expandafter\expandafter\BitSet@GetOctHex
- \IntCalcDec#1!!#2!23%
- }%
- \else
- \BitSet@AfterFi{%
- \expandafter\expandafter\expandafter\BitSet@@GetOct
- \number\IntCalcInc#1!\expandafter\expandafter\expandafter!%
- \csname BitSet@Oct#5#4#3\endcsname#2!%
- }%
- \BitSet@Fi
+\ifx#5\BitSet@Empty
+\BitSet@AfterFi{%
+\expandafter\expandafter\expandafter\BitSet@GetOctHex
+\IntCalcDec#1!!#2!23%
+}%
+\else
+\BitSet@AfterFi{%
+\expandafter\expandafter\expandafter\BitSet@@GetOct
+\number\IntCalcInc#1!\expandafter\expandafter\expandafter!%
+\csname BitSet@Oct#5#4#3\endcsname#2!%
+}%
+\BitSet@Fi
}
\def\BitSet@Temp#1#2#3#4{%
- \expandafter\def\csname BitSet@Oct#1#2#3\endcsname{#4}%
+\expandafter\def\csname BitSet@Oct#1#2#3\endcsname{#4}%
}
\BitSet@Temp0000%
\BitSet@Temp0011%
@@ -8150,21 +8149,21 @@ $ \BIC@Temp 9{18\or27\or36\or45\or54\or63\or72\or81}%
\BitSet@Temp1106%
\BitSet@Temp1117%
\def\BitSet@@GetHex#1!#2!#3#4#5#6{%
- \ifx#6\BitSet@Empty
- \BitSet@AfterFi{%
- \expandafter\expandafter\expandafter\BitSet@GetOctHex
- \IntCalcDec#1!!#2!34%
- }%
- \else
- \BitSet@AfterFi{%
- \expandafter\expandafter\expandafter\BitSet@@GetHex
- \number\IntCalcInc#1!\expandafter\expandafter\expandafter!%
- \csname BitSet@Hex#6#5#4#3\endcsname#2!%
- }%
- \BitSet@Fi
+\ifx#6\BitSet@Empty
+\BitSet@AfterFi{%
+\expandafter\expandafter\expandafter\BitSet@GetOctHex
+\IntCalcDec#1!!#2!34%
+}%
+\else
+\BitSet@AfterFi{%
+\expandafter\expandafter\expandafter\BitSet@@GetHex
+\number\IntCalcInc#1!\expandafter\expandafter\expandafter!%
+\csname BitSet@Hex#6#5#4#3\endcsname#2!%
+}%
+\BitSet@Fi
}
\def\BitSet@Temp#1#2#3#4#5{%
- \expandafter\def\csname BitSet@Hex#1#2#3#4\endcsname{#5}%
+\expandafter\def\csname BitSet@Hex#1#2#3#4\endcsname{#5}%
}
\BitSet@Temp00000%
\BitSet@Temp00011%
@@ -8183,67 +8182,67 @@ $ \BIC@Temp 9{18\or27\or36\or45\or54\or63\or72\or81}%
\BitSet@Temp1110E%
\BitSet@Temp1111F%
\def\BitSet@GetOctHex#1!#2!#3#4#5!#6{%
- \expandafter\BitSet@@GetOctHex
- \number\intcalcNum{#6}\expandafter\expandafter\expandafter!%
- \IntCalcMul#1!#4!!#3#4#2%
+\expandafter\BitSet@@GetOctHex
+\number\intcalcNum{#6}\expandafter\expandafter\expandafter!%
+\IntCalcMul#1!#4!!#3#4#2%
}
\def\BitSet@@GetOctHex#1!#2!#3#4{%
- \ifnum#1>#2 %
- \BitSet@AfterFi{%
- \expandafter\expandafter\expandafter\expandafter
- \expandafter\expandafter\expandafter\BitSet@Fill
- \expandafter\IntCalcDiv\number
- \expandafter\expandafter\expandafter\IntCalcAdd
- \IntCalcSub#1!#2!!#3!!#4!!%
- }%
- \else
- \BitSet@AfterFi{ }%
- \BitSet@Fi
+\ifnum#1>#2 %
+\BitSet@AfterFi{%
+\expandafter\expandafter\expandafter\expandafter
+\expandafter\expandafter\expandafter\BitSet@Fill
+\expandafter\IntCalcDiv\number
+\expandafter\expandafter\expandafter\IntCalcAdd
+\IntCalcSub#1!#2!!#3!!#4!!%
+}%
+\else
+\BitSet@AfterFi{ }%
+\BitSet@Fi
}
\def\bitsetGetDec#1{%
- \romannumeral0%
- \BitSet@IfUndefined{#1}{ 0}{%
- \expandafter\expandafter\expandafter\BitSet@GetDec
- \csname BS@#1\endcsname!%
- }%
+\romannumeral0%
+\BitSet@IfUndefined{#1}{ 0}{%
+\expandafter\expandafter\expandafter\BitSet@GetDec
+\csname BS@#1\endcsname!%
+}%
}
\def\BitSet@GetDec#1#2!{%
- \ifx\\#2\\%
- \BitSet@AfterFi{ #1}%
- \else
- \BitSet@AfterFi{%
- \BitSet@@GetDec2!#1!#2!%
- }%
- \BitSet@Fi
+\ifx\\#2\\%
+\BitSet@AfterFi{ #1}%
+\else
+\BitSet@AfterFi{%
+\BitSet@@GetDec2!#1!#2!%
+}%
+\BitSet@Fi
}
\def\BitSet@@GetDec#1!#2!#3#4!{%
- \ifx\\#4\\%
- \ifx#31%
- \BitSet@AfterFiFi{%
- \expandafter\expandafter\expandafter\BitSet@Space
- \IntCalcAdd#1!#2!%
- }%
- \else
- \BitSet@AfterFiFi{ #2}%
- \fi
- \else
- \ifx#31%
- \BitSet@AfterFiFi{%
- \csname BitSet@N#1%
- \expandafter\expandafter\expandafter\endcsname
- \IntCalcAdd#1!#2!!#4!%
- }%
- \else
- \BitSet@AfterFiFi{%
- \csname BitSet@N#1\endcsname#2!#4!%
- }%
- \fi
- \BitSet@Fi
+\ifx\\#4\\%
+\ifx#31%
+\BitSet@AfterFiFi{%
+\expandafter\expandafter\expandafter\BitSet@Space
+\IntCalcAdd#1!#2!%
+}%
+\else
+\BitSet@AfterFiFi{ #2}%
+\fi
+\else
+\ifx#31%
+\BitSet@AfterFiFi{%
+\csname BitSet@N#1%
+\expandafter\expandafter\expandafter\endcsname
+\IntCalcAdd#1!#2!!#4!%
+}%
+\else
+\BitSet@AfterFiFi{%
+\csname BitSet@N#1\endcsname#2!#4!%
+}%
+\fi
+\BitSet@Fi
}
\def\BitSet@Temp#1#2{%
- \expandafter\def\csname BitSet@N#1\endcsname{%
- \BitSet@@GetDec#2!%
- }%
+\expandafter\def\csname BitSet@N#1\endcsname{%
+\BitSet@@GetDec#2!%
+}%
}
\BitSet@Temp{1}{2}
\BitSet@Temp{2}{4}
@@ -8276,864 +8275,864 @@ $ \BIC@Temp 9{18\or27\or36\or45\or54\or63\or72\or81}%
\BitSet@Temp{268435456}{536870912}
\BitSet@Temp{536870912}{1073741824}
\expandafter\def\csname BitSet@N1073741824\endcsname{%
- \BitSet@GetDecBig2147483648!%
+\BitSet@GetDecBig2147483648!%
}%
\def\BitSet@GetDecBig#1!#2!#3#4!{%
- \ifx\\#4\\%
- \ifx#31%
- \BitSet@AfterFiFi{%
- \expandafter\expandafter\expandafter\BitSet@Space
- \BigIntCalcAdd#1!#2!%
- }%
- \else
- \BitSet@AfterFiFi{ #2}%
- \fi
- \else
- \ifx#31%
- \BitSet@AfterFiFi{%
- \expandafter\expandafter\expandafter\BitSet@@GetDecBig
- \BigIntCalcAdd#1!#2!!#1!#4!%
- }%
- \else
- \BitSet@AfterFiFi{%
- \expandafter\expandafter\expandafter\BitSet@GetDecBig
- \BigIntCalcShl#1!!#2!#4!%
- }%
- \fi
- \BitSet@Fi
+\ifx\\#4\\%
+\ifx#31%
+\BitSet@AfterFiFi{%
+\expandafter\expandafter\expandafter\BitSet@Space
+\BigIntCalcAdd#1!#2!%
+}%
+\else
+\BitSet@AfterFiFi{ #2}%
+\fi
+\else
+\ifx#31%
+\BitSet@AfterFiFi{%
+\expandafter\expandafter\expandafter\BitSet@@GetDecBig
+\BigIntCalcAdd#1!#2!!#1!#4!%
+}%
+\else
+\BitSet@AfterFiFi{%
+\expandafter\expandafter\expandafter\BitSet@GetDecBig
+\BigIntCalcShl#1!!#2!#4!%
+}%
+\fi
+\BitSet@Fi
}
\def\BitSet@@GetDecBig#1!#2!{%
- \expandafter\expandafter\expandafter\BitSet@GetDecBig
- \BigIntCalcShl#2!!#1!%
+\expandafter\expandafter\expandafter\BitSet@GetDecBig
+\BigIntCalcShl#2!!#1!%
}
\def\bitsetAnd#1#2{%
- \bitsetIsEmpty{#1}{%
- \bitsetReset{#1}%
- }{%
- \bitsetIsEmpty{#2}{%
- \bitsetReset{#1}%
- }{%
- \expandafter\edef\csname BS@#1\endcsname{%
- \expandafter\expandafter\expandafter\BitSet@And
- \csname BS@#1\expandafter\expandafter\expandafter\endcsname
- \expandafter\expandafter\expandafter!%
- \csname BS@#2\endcsname!!%
- }%
- \expandafter\ifx\csname BS@#1\endcsname\BitSet@Empty
- \bitsetReset{#1}%
- \fi
- }%
- }%
+\bitsetIsEmpty{#1}{%
+\bitsetReset{#1}%
+}{%
+\bitsetIsEmpty{#2}{%
+\bitsetReset{#1}%
+}{%
+\expandafter\edef\csname BS@#1\endcsname{%
+\expandafter\expandafter\expandafter\BitSet@And
+\csname BS@#1\expandafter\expandafter\expandafter\endcsname
+\expandafter\expandafter\expandafter!%
+\csname BS@#2\endcsname!!%
+}%
+\expandafter\ifx\csname BS@#1\endcsname\BitSet@Empty
+\bitsetReset{#1}%
+\fi
+}%
+}%
}
\def\BitSet@And#1#2!#3#4!#5!{%
- \ifx\\#2\\%
- \ifnum#1#3=11 #51\fi
- \else
- \ifx\\#4\\%
- \ifnum#1#3=11 #51\fi
- \else
- \ifnum#1#3=11 %
- #51%
- \BitSet@AfterFiFiFi{%
- \BitSet@And#2!#4!!%
- }%
- \else
- \BitSet@AfterFiFiFi{%
- \BitSet@And#2!#4!#50!%
- }%
- \fi
- \fi
- \BitSet@Fi
+\ifx\\#2\\%
+\ifnum#1#3=11 #51\fi
+\else
+\ifx\\#4\\%
+\ifnum#1#3=11 #51\fi
+\else
+\ifnum#1#3=11 %
+#51%
+\BitSet@AfterFiFiFi{%
+\BitSet@And#2!#4!!%
+}%
+\else
+\BitSet@AfterFiFiFi{%
+\BitSet@And#2!#4!#50!%
+}%
+\fi
+\fi
+\BitSet@Fi
}
\def\bitsetAndNot#1#2{%
- \bitsetIsEmpty{#1}{%
- \bitsetReset{#1}%
- }{%
- \bitsetIsEmpty{#2}{%
- }{%
- \expandafter\edef\csname BS@#1\endcsname{%
- \expandafter\expandafter\expandafter\BitSet@AndNot
- \csname BS@#1\expandafter\expandafter\expandafter\endcsname
- \expandafter\expandafter\expandafter!%
- \csname BS@#2\endcsname!!%
- }%
- \expandafter\ifx\csname BS@#1\endcsname\BitSet@Empty
- \bitsetReset{#1}%
- \fi
- }%
- }%
+\bitsetIsEmpty{#1}{%
+\bitsetReset{#1}%
+}{%
+\bitsetIsEmpty{#2}{%
+}{%
+\expandafter\edef\csname BS@#1\endcsname{%
+\expandafter\expandafter\expandafter\BitSet@AndNot
+\csname BS@#1\expandafter\expandafter\expandafter\endcsname
+\expandafter\expandafter\expandafter!%
+\csname BS@#2\endcsname!!%
+}%
+\expandafter\ifx\csname BS@#1\endcsname\BitSet@Empty
+\bitsetReset{#1}%
+\fi
+}%
+}%
}
\def\BitSet@AndNot#1#2!#3#4!#5!{%
- \ifx\\#2\\%
- \ifnum#1#3=10 #51\fi
- \else
- \ifx\\#4\\%
- #5%
- \ifnum#1#3=10 1\else 0\fi
- #2%
- \else
- \ifnum#1#3=10 %
- #51%
- \BitSet@AfterFiFiFi{%
- \BitSet@AndNot#2!#4!!%
- }%
- \else
- \BitSet@AfterFiFiFi{%
- \BitSet@AndNot#2!#4!#50!%
- }%
- \fi
- \fi
- \BitSet@Fi
+\ifx\\#2\\%
+\ifnum#1#3=10 #51\fi
+\else
+\ifx\\#4\\%
+#5%
+\ifnum#1#3=10 1\else 0\fi
+#2%
+\else
+\ifnum#1#3=10 %
+#51%
+\BitSet@AfterFiFiFi{%
+\BitSet@AndNot#2!#4!!%
+}%
+\else
+\BitSet@AfterFiFiFi{%
+\BitSet@AndNot#2!#4!#50!%
+}%
+\fi
+\fi
+\BitSet@Fi
}
\def\bitsetOr#1#2{%
- \bitsetIsEmpty{#2}{%
- \BitSet@IfUndefined{#1}{\bitsetReset{#1}}{}%
- }{%
- \bitsetIsEmpty{#1}{%
- \expandafter\let\csname BS@#1\expandafter\endcsname
- \csname BS@#2\endcsname
- }{%
- \expandafter\edef\csname BS@#1\endcsname{%
- \expandafter\expandafter\expandafter\BitSet@Or
- \csname BS@#1\expandafter\expandafter\expandafter\endcsname
- \expandafter\expandafter\expandafter!%
- \csname BS@#2\endcsname!%
- }%
- }%
- }%
+\bitsetIsEmpty{#2}{%
+\BitSet@IfUndefined{#1}{\bitsetReset{#1}}{}%
+}{%
+\bitsetIsEmpty{#1}{%
+\expandafter\let\csname BS@#1\expandafter\endcsname
+\csname BS@#2\endcsname
+}{%
+\expandafter\edef\csname BS@#1\endcsname{%
+\expandafter\expandafter\expandafter\BitSet@Or
+\csname BS@#1\expandafter\expandafter\expandafter\endcsname
+\expandafter\expandafter\expandafter!%
+\csname BS@#2\endcsname!%
+}%
+}%
+}%
}
\def\BitSet@Or#1#2!#3#4!{%
- \ifnum#1#3>0 1\else 0\fi
- \ifx\\#2\\%
- #4%
- \else
- \ifx\\#4\\%
- #2%
- \else
- \BitSet@AfterFiFi{%
- \BitSet@Or#2!#4!%
- }%
- \fi
- \BitSet@Fi
+\ifnum#1#3>0 1\else 0\fi
+\ifx\\#2\\%
+#4%
+\else
+\ifx\\#4\\%
+#2%
+\else
+\BitSet@AfterFiFi{%
+\BitSet@Or#2!#4!%
+}%
+\fi
+\BitSet@Fi
}
\def\bitsetXor#1#2{%
- \bitsetIsEmpty{#2}{%
- \BitSet@IfUndefined{#1}{\bitsetReset{#1}}{}%
- }{%
- \bitsetIsEmpty{#1}{%
- \expandafter\let\csname BS@#1\expandafter\endcsname
- \csname BS@#2\endcsname
- }{%
- \expandafter\edef\csname BS@#1\endcsname{%
- \expandafter\expandafter\expandafter\BitSet@Xor
- \csname BS@#1\expandafter\expandafter\expandafter\endcsname
- \expandafter\expandafter\expandafter!%
- \csname BS@#2\endcsname!!%
- }%
- \expandafter\ifx\csname BS@#1\endcsname\BitSet@Empty
- \bitsetReset{#1}%
- \fi
- }%
- }%
+\bitsetIsEmpty{#2}{%
+\BitSet@IfUndefined{#1}{\bitsetReset{#1}}{}%
+}{%
+\bitsetIsEmpty{#1}{%
+\expandafter\let\csname BS@#1\expandafter\endcsname
+\csname BS@#2\endcsname
+}{%
+\expandafter\edef\csname BS@#1\endcsname{%
+\expandafter\expandafter\expandafter\BitSet@Xor
+\csname BS@#1\expandafter\expandafter\expandafter\endcsname
+\expandafter\expandafter\expandafter!%
+\csname BS@#2\endcsname!!%
+}%
+\expandafter\ifx\csname BS@#1\endcsname\BitSet@Empty
+\bitsetReset{#1}%
+\fi
+}%
+}%
}
\def\BitSet@Xor#1#2!#3#4!#5!{%
- \ifx\\#2\\%
- \ifx#1#3%
- \ifx\\#4\\%
- \else
- #50#4%
- \fi
- \else
- #51#4%
- \fi
- \else
- \ifx\\#4\\%
- #5%
- \ifx#1#30\else 1\fi
- #2%
- \else
- \ifx#1#3%
- \BitSet@AfterFiFiFi{%
- \BitSet@Xor#2!#4!#50!%
- }%
- \else
- #51%
- \BitSet@AfterFiFiFi{%
- \BitSet@Xor#2!#4!!%
- }%
- \fi
- \fi
- \BitSet@Fi
+\ifx\\#2\\%
+\ifx#1#3%
+\ifx\\#4\\%
+\else
+#50#4%
+\fi
+\else
+#51#4%
+\fi
+\else
+\ifx\\#4\\%
+#5%
+\ifx#1#30\else 1\fi
+#2%
+\else
+\ifx#1#3%
+\BitSet@AfterFiFiFi{%
+\BitSet@Xor#2!#4!#50!%
+}%
+\else
+#51%
+\BitSet@AfterFiFiFi{%
+\BitSet@Xor#2!#4!!%
+}%
+\fi
+\fi
+\BitSet@Fi
}
\def\bitsetShiftLeft#1#2{%
- \BitSet@IfUndefined{#1}{%
- \bitsetReset{#1}%
- }{%
- \bitsetIsEmpty{#1}{%
- }{%
- \expandafter\expandafter\expandafter\BitSet@ShiftLeft
- \intcalcNum{#2}!{#1}%
- }%
- }%
+\BitSet@IfUndefined{#1}{%
+\bitsetReset{#1}%
+}{%
+\bitsetIsEmpty{#1}{%
+}{%
+\expandafter\expandafter\expandafter\BitSet@ShiftLeft
+\intcalcNum{#2}!{#1}%
+}%
+}%
}
\def\BitSet@ShiftLeft#1!#2{%
- \ifcase\intcalcSgn{#1} %
- \or
- \begingroup
- \uccode`m=`0 %
- \uppercase\expandafter{\expandafter\endgroup
- \expandafter\edef\csname BS@#2\expandafter\endcsname
- \expandafter{%
- \romannumeral#1000\expandafter\BitSet@Space
- \csname BS@#2\endcsname
- }%
- }%
- \else
- \expandafter\BitSet@ShiftRight\BitSet@Gobble#1!{#2}%
- \fi
+\ifcase\intcalcSgn{#1} %
+\or
+\begingroup
+\uccode`m=`0 %
+\uppercase\expandafter{\expandafter\endgroup
+\expandafter\edef\csname BS@#2\expandafter\endcsname
+\expandafter{%
+\romannumeral#1000\expandafter\BitSet@Space
+\csname BS@#2\endcsname
+}%
+}%
+\else
+\expandafter\BitSet@ShiftRight\BitSet@Gobble#1!{#2}%
+\fi
}
\def\bitsetShiftRight#1#2{%
- \BitSet@IfUndefined{#1}{%
- \bitsetReset{#1}%
- }{%
- \bitsetIsEmpty{#1}{%
- }{%
- \expandafter\expandafter\expandafter\BitSet@ShiftRight
- \intcalcNum{#2}!{#1}%
- }%
- }%
+\BitSet@IfUndefined{#1}{%
+\bitsetReset{#1}%
+}{%
+\bitsetIsEmpty{#1}{%
+}{%
+\expandafter\expandafter\expandafter\BitSet@ShiftRight
+\intcalcNum{#2}!{#1}%
+}%
+}%
}
\def\BitSet@ShiftRight#1!#2{%
- \ifcase\intcalcSgn{#1} %
- \or
- \expandafter\edef\csname BS@#2\endcsname{%
- \expandafter\expandafter\expandafter\BitSet@Kill
- \csname BS@#2\expandafter\endcsname\expandafter\BitSet@Empty
- \expandafter=%
- \expandafter{\expandafter}\expandafter{\expandafter}%
- \romannumeral#1000!%
- }%
- \else
- \expandafter\BitSet@ShiftLeft\BitSet@Gobble#1!{#2}%
- \fi
+\ifcase\intcalcSgn{#1} %
+\or
+\expandafter\edef\csname BS@#2\endcsname{%
+\expandafter\expandafter\expandafter\BitSet@Kill
+\csname BS@#2\expandafter\endcsname\expandafter\BitSet@Empty
+\expandafter=%
+\expandafter{\expandafter}\expandafter{\expandafter}%
+\romannumeral#1000!%
+}%
+\else
+\expandafter\BitSet@ShiftLeft\BitSet@Gobble#1!{#2}%
+\fi
}
\def\BitSet@Kill#1#2=#3#4#5{%
- #3#4%
- \ifx#5!%
- \ifx#1\BitSet@Empty
- 0%
- \else
- #1#2%
- \fi
- \else
- \ifx#1\BitSet@Empty
- 0%
- \BitSet@AfterFiFi\BitSet@Cleanup
- \else
- \BitSet@Kill#2=%
- \fi
- \BitSet@Fi
+#3#4%
+\ifx#5!%
+\ifx#1\BitSet@Empty
+ 0%
+\else
+#1#2%
+\fi
+\else
+\ifx#1\BitSet@Empty
+ 0%
+\BitSet@AfterFiFi\BitSet@Cleanup
+\else
+\BitSet@Kill#2=%
+\fi
+\BitSet@Fi
}
\def\bitsetClear{%
- \BitSet@CheckIndex\BitSet@Clear
+\BitSet@CheckIndex\BitSet@Clear
}
\def\bitsetSet{%
- \BitSet@CheckIndex\BitSet@Set
+\BitSet@CheckIndex\BitSet@Set
}
\def\bitsetFlip{%
- \BitSet@CheckIndex\BitSet@Flip
+\BitSet@CheckIndex\BitSet@Flip
}
\def\bitsetSetValue#1#2#3{%
- \expandafter\expandafter\expandafter\BitSet@SetValue
- \intcalcNum{#3}!{#1}{#2}%
+\expandafter\expandafter\expandafter\BitSet@SetValue
+\intcalcNum{#3}!{#1}{#2}%
}
\def\BitSet@SetValue#1!{%
- \BitSet@CheckIndex{%
- \ifcase#1 %
- \expandafter\BitSet@Clear
- \or
- \expandafter\BitSet@Set
- \else
- \BitSet@ErrorInvalidBitValue{#1}%
- \expandafter\expandafter\expandafter\BitSet@Gobble
- \expandafter\BitSet@Gobble
- \fi
- }%
+\BitSet@CheckIndex{%
+\ifcase#1 %
+\expandafter\BitSet@Clear
+\or
+\expandafter\BitSet@Set
+\else
+\BitSet@ErrorInvalidBitValue{#1}%
+\expandafter\expandafter\expandafter\BitSet@Gobble
+\expandafter\BitSet@Gobble
+\fi
+}%
}
\def\BitSet@ErrorInvalidBitValue#1{%
- \@PackageError{bitset}{%
- Invalid bit value (#1) not in range 0..1%
- }\@ehc
+\@PackageError{bitset}{%
+ Invalid bit value (#1) not in range 0..1%
+}\@ehc
}
\def\BitSet@Clear#1#2{%
- \edef\BitSet@Temp{%
- \expandafter\expandafter\expandafter\BitSet@@Clear
- \csname BS@#1\expandafter\endcsname
- \expandafter\BitSet@Empty\expandafter=\expandafter!%
- \romannumeral#2000!%
- }%
- \expandafter\let\csname BS@#1\expandafter\endcsname
- \ifx\BitSet@Temp\BitSet@Empty
- \BitSet@Zero
- \else
- \BitSet@Temp
- \fi
+\edef\BitSet@Temp{%
+\expandafter\expandafter\expandafter\BitSet@@Clear
+\csname BS@#1\expandafter\endcsname
+\expandafter\BitSet@Empty\expandafter=\expandafter!%
+\romannumeral#2000!%
+}%
+\expandafter\let\csname BS@#1\expandafter\endcsname
+\ifx\BitSet@Temp\BitSet@Empty
+\BitSet@Zero
+\else
+\BitSet@Temp
+\fi
}
\def\BitSet@@Clear#1#2=#3!#4{%
- \ifx#4!%
- \ifx#1\BitSet@Empty
- \else
- \ifx\BitSet@Empty#2%
- \else
- #30#2%
- \fi
- \fi
- \else
- \ifx#1\BitSet@Empty
- \BitSet@AfterFiFi\BitSet@Cleanup
- \else
- \ifx#10%
- \BitSet@AfterFiFiFi{%
- \BitSet@@Clear#2=#30!%
- }%
- \else
- #31%
- \BitSet@AfterFiFiFi{%
- \BitSet@@Clear#2=!%
- }%
- \fi
- \fi
- \BitSet@Fi
+\ifx#4!%
+\ifx#1\BitSet@Empty
+\else
+\ifx\BitSet@Empty#2%
+\else
+#30#2%
+\fi
+\fi
+\else
+\ifx#1\BitSet@Empty
+\BitSet@AfterFiFi\BitSet@Cleanup
+\else
+\ifx#10%
+\BitSet@AfterFiFiFi{%
+\BitSet@@Clear#2=#30!%
+}%
+\else
+#31%
+\BitSet@AfterFiFiFi{%
+\BitSet@@Clear#2=!%
+}%
+\fi
+\fi
+\BitSet@Fi
}
\def\BitSet@Set#1#2{%
- \expandafter\edef\csname BS@#1\endcsname{%
- \expandafter\expandafter\expandafter\BitSet@@Set
- \csname BS@#1\expandafter\endcsname
- \expandafter\BitSet@Empty\expandafter=%
- \expandafter{\expandafter}\expandafter{\expandafter}%
- \romannumeral#2000!%
- }%
+\expandafter\edef\csname BS@#1\endcsname{%
+\expandafter\expandafter\expandafter\BitSet@@Set
+\csname BS@#1\expandafter\endcsname
+\expandafter\BitSet@Empty\expandafter=%
+\expandafter{\expandafter}\expandafter{\expandafter}%
+\romannumeral#2000!%
+}%
}
\def\BitSet@@Set#1#2=#3#4#5{%
- #3#4%
- \ifx#5!%
- 1#2%
- \else
- \ifx#1\BitSet@Empty
- 0%
- \BitSet@AfterFiFi\BitSet@@@Set
- \else
- #1%
- \BitSet@@Set#2=%
- \fi
- \BitSet@Fi
+#3#4%
+\ifx#5!%
+ 1#2%
+\else
+\ifx#1\BitSet@Empty
+ 0%
+\BitSet@AfterFiFi\BitSet@@@Set
+\else
+#1%
+\BitSet@@Set#2=%
+\fi
+\BitSet@Fi
}
\def\BitSet@@@Set#1{%
- \ifx#1!%
- 1%
- \else
- 0%
- \expandafter\BitSet@@@Set
- \fi
+\ifx#1!%
+ 1%
+\else
+ 0%
+\expandafter\BitSet@@@Set
+\fi
}
\def\BitSet@Flip#1#2{%
- \edef\BitSet@Temp{%
- \expandafter\expandafter\expandafter\BitSet@@Flip
- \csname BS@#1\expandafter\endcsname
- \expandafter\BitSet@Empty\expandafter=\expandafter!%
- \romannumeral#2000!%
- }%
- \expandafter\let\csname BS@#1\expandafter\endcsname
- \ifx\BitSet@Temp\BitSet@Empty
- \BitSet@Zero
- \else
- \BitSet@Temp
- \fi
+\edef\BitSet@Temp{%
+\expandafter\expandafter\expandafter\BitSet@@Flip
+\csname BS@#1\expandafter\endcsname
+\expandafter\BitSet@Empty\expandafter=\expandafter!%
+\romannumeral#2000!%
+}%
+\expandafter\let\csname BS@#1\expandafter\endcsname
+\ifx\BitSet@Temp\BitSet@Empty
+\BitSet@Zero
+\else
+\BitSet@Temp
+\fi
}
\def\BitSet@@Flip#1#2=#3!#4{%
- \ifx#4!%
- \ifx#11%
- \ifx\BitSet@Empty#2%
- \else
- #30#2%
- \fi
- \else
- #31#2%
- \fi
- \else
- \ifx#1\BitSet@Empty
- #30%
- \BitSet@AfterFiFi\BitSet@@@Set
- \else
- \ifx#10%
- \BitSet@AfterFiFiFi{%
- \BitSet@@Flip#2=#30!%
- }%
- \else
- #31%
- \BitSet@AfterFiFiFi{%
- \BitSet@@Flip#2=!%
- }%
- \fi
- \fi
- \BitSet@Fi
+\ifx#4!%
+\ifx#11%
+\ifx\BitSet@Empty#2%
+\else
+#30#2%
+\fi
+\else
+#31#2%
+\fi
+\else
+\ifx#1\BitSet@Empty
+#30%
+\BitSet@AfterFiFi\BitSet@@@Set
+\else
+\ifx#10%
+\BitSet@AfterFiFiFi{%
+\BitSet@@Flip#2=#30!%
+}%
+\else
+#31%
+\BitSet@AfterFiFiFi{%
+\BitSet@@Flip#2=!%
+}%
+\fi
+\fi
+\BitSet@Fi
}
\def\bitsetClearRange{%
- \BitSet@Range\BitSet@Clear
+\BitSet@Range\BitSet@Clear
}
\def\bitsetSetRange{%
- \BitSet@Range\BitSet@Set
+\BitSet@Range\BitSet@Set
}
\def\bitsetFlipRange{%
- \BitSet@Range\BitSet@Flip
+\BitSet@Range\BitSet@Flip
}
\def\bitsetSetValueRange#1#2#3#4{%
- \expandafter\expandafter\expandafter\BitSet@SetValueRange
- \intcalcNum{#4}!{#1}{#2}{#3}%
+\expandafter\expandafter\expandafter\BitSet@SetValueRange
+\intcalcNum{#4}!{#1}{#2}{#3}%
}
\def\BitSet@SetValueRange#1!#2#3#4{%
- \ifcase#1 %
- \BitSet@Range\BitSet@Clear{#2}{#3}{#4}%
- \or
- \BitSet@Range\BitSet@Set{#2}{#3}{#4}%
- \else
- \BitSet@ErrorInvalidBitValue{#1}%
- \fi
+\ifcase#1 %
+\BitSet@Range\BitSet@Clear{#2}{#3}{#4}%
+\or
+\BitSet@Range\BitSet@Set{#2}{#3}{#4}%
+\else
+\BitSet@ErrorInvalidBitValue{#1}%
+\fi
}
\def\BitSet@Range#1#2#3#4{%
- \edef\BitSet@Temp{%
- \noexpand\BitSet@@Range\noexpand#1{#2}%
- \intcalcNum{#3}!\intcalcNum{#4}!%
- }%
- \BitSet@Temp
+\edef\BitSet@Temp{%
+\noexpand\BitSet@@Range\noexpand#1{#2}%
+\intcalcNum{#3}!\intcalcNum{#4}!%
+}%
+\BitSet@Temp
}
\def\BitSet@@Range#1#2#3!#4!{%
- \ifnum#3<0 %
- \BitSet@NegativeIndex#1{#2}#3!#4!0!#4!%
- \else
- \ifnum#4<0 %
- \BitSet@NegativeIndex#1{#2}#3!#4!#3!0!%
- \else
- \ifcase\intcalcCmp{#3}{#4} %
- \or
- \@PackageError{bitset}{%
- Wrong index numbers in range [#3..#4]\MessageBreak% hash-ok
- for clear/set/flip on bit set `#2'.\MessageBreak
- The lower index exceeds the upper index.\MessageBreak
- Canceling the operation as error recovery%
- }\@ehc
- \else
- \BitSet@@@Range#3!#4!#1{#2}%
- \fi
- \fi
- \fi
+\ifnum#3<0 %
+\BitSet@NegativeIndex#1{#2}#3!#4!0!#4!%
+\else
+\ifnum#4<0 %
+\BitSet@NegativeIndex#1{#2}#3!#4!#3!0!%
+\else
+\ifcase\intcalcCmp{#3}{#4} %
+\or
+\@PackageError{bitset}{%
+ Wrong index numbers in range [#3..#4]\MessageBreak% hash-ok
+ for clear/set/flip on bit set `#2'.\MessageBreak
+ The lower index exceeds the upper index.\MessageBreak
+ Canceling the operation as error recovery%
+}\@ehc
+\else
+\BitSet@@@Range#3!#4!#1{#2}%
+\fi
+\fi
+\fi
}
\def\BitSet@NegativeIndex#1#2#3!#4!#5!#6!{%
- \@PackageError{bitset}{%
- Negative index in range [#3..#4]\MessageBreak % hash-ok
- for \string\bitset
- \ifx#1\BitSet@Clear
- Clear%
- \else
- \ifx#1\BitSet@Set
- Set%
- \else
- Flip%
- \fi
- \fi
- Range on bit set `#2'.\MessageBreak
- Using [#5..#6] as error recovery% hash-ok
- }\@ehc
- \BitSet@@Range#1{#2}#5!#6!%
+\@PackageError{bitset}{%
+ Negative index in range [#3..#4]\MessageBreak % hash-ok
+ for \string\bitset
+\ifx#1\BitSet@Clear
+ Clear%
+\else
+\ifx#1\BitSet@Set
+ Set%
+\else
+ Flip%
+\fi
+\fi
+ Range on bit set `#2'.\MessageBreak
+ Using [#5..#6] as error recovery% hash-ok
+}\@ehc
+\BitSet@@Range#1{#2}#5!#6!%
}
\def\BitSet@@@Range#1!#2!#3#4{%
- \ifnum#1<#2 %
- #3{#4}{#1}%
- \BitSet@AfterFi{%
- \expandafter\expandafter\expandafter\BitSet@@@Range
- \IntCalcInc#1!!#2!#3{#4}%
- }%
- \BitSet@Fi
+\ifnum#1<#2 %
+#3{#4}{#1}%
+\BitSet@AfterFi{%
+\expandafter\expandafter\expandafter\BitSet@@@Range
+\IntCalcInc#1!!#2!#3{#4}%
+}%
+\BitSet@Fi
}
\def\bitsetGet#1#2{%
- \number
- \expandafter\expandafter\expandafter\BitSet@Get
- \intcalcNum{#2}!{#1}%
+\number
+\expandafter\expandafter\expandafter\BitSet@Get
+\intcalcNum{#2}!{#1}%
}
\def\BitSet@Get#1!#2{%
- \ifnum#1<0 %
- \BitSet@AfterFi{%
- 0 \BitSetError:NegativeIndex%
- }%
- \else
- \BitSet@IfUndefined{#2}{0}{%
- \expandafter\expandafter\expandafter\BitSet@@Get
- \csname BS@#2\expandafter\endcsname
- \expandafter!\expandafter=%
- \expandafter{\expandafter}\expandafter{\expandafter}%
- \romannumeral\intcalcNum{#1}000!%
- }%
- \expandafter\BitSet@Space
- \BitSet@Fi
+\ifnum#1<0 %
+\BitSet@AfterFi{%
+ 0 \BitSetError:NegativeIndex%
+}%
+\else
+\BitSet@IfUndefined{#2}{0}{%
+\expandafter\expandafter\expandafter\BitSet@@Get
+\csname BS@#2\expandafter\endcsname
+\expandafter!\expandafter=%
+\expandafter{\expandafter}\expandafter{\expandafter}%
+\romannumeral\intcalcNum{#1}000!%
+}%
+\expandafter\BitSet@Space
+\BitSet@Fi
}
\def\BitSet@@Get#1#2=#3#4#5{%
- #3#4%
- \ifx#5!%
- \ifx#1!%
- 0%
- \else
- #1%
- \fi
- \else
- \ifx#1!%
- 0%
- \BitSet@AfterFiFi\BitSet@Cleanup
- \else
- \BitSet@@Get#2=%
- \fi
- \BitSet@Fi
+#3#4%
+\ifx#5!%
+\ifx#1!%
+ 0%
+\else
+#1%
+\fi
+\else
+\ifx#1!%
+ 0%
+\BitSet@AfterFiFi\BitSet@Cleanup
+\else
+\BitSet@@Get#2=%
+\fi
+\BitSet@Fi
}
\def\bitsetNextClearBit#1#2{%
- \number
- \expandafter\expandafter\expandafter\BitSet@NextClearBit
- \intcalcNum{#2}!{#1} %
+\number
+\expandafter\expandafter\expandafter\BitSet@NextClearBit
+\intcalcNum{#2}!{#1} %
}
\def\BitSet@NextClearBit#1!#2{%
- \ifnum#1<0 %
- \BitSet@NextClearBit0!{#2}%
- \BitSet@AfterFi{%
- \expandafter\BitSet@Space
- \expandafter\BitSetError:NegativeIndex\romannumeral0%
- }%
- \else
- \bitsetIsEmpty{#2}{#1}{%
- \expandafter\BitSet@Skip
- \number#1\expandafter\expandafter\expandafter!%
- \csname BS@#2\endcsname!!!!!!!!!=%
- {\BitSet@@NextClearBit#1!}%
- }%
- \BitSet@Fi
+\ifnum#1<0 %
+\BitSet@NextClearBit0!{#2}%
+\BitSet@AfterFi{%
+\expandafter\BitSet@Space
+\expandafter\BitSetError:NegativeIndex\romannumeral0%
+}%
+\else
+\bitsetIsEmpty{#2}{#1}{%
+\expandafter\BitSet@Skip
+\number#1\expandafter\expandafter\expandafter!%
+\csname BS@#2\endcsname!!!!!!!!!=%
+{\BitSet@@NextClearBit#1!}%
+}%
+\BitSet@Fi
}
\def\BitSet@@NextClearBit#1!#2{%
- \ifx#2!%
- #1%
- \else
- \ifx#20%
- #1%
- \BitSet@AfterFiFi\BitSet@Cleanup
- \else
- \BitSet@AfterFiFi{%
- \expandafter\expandafter\expandafter\BitSet@@NextClearBit
- \IntCalcInc#1!!%
- }%
- \fi
- \BitSet@Fi
+\ifx#2!%
+#1%
+\else
+\ifx#20%
+#1%
+\BitSet@AfterFiFi\BitSet@Cleanup
+\else
+\BitSet@AfterFiFi{%
+\expandafter\expandafter\expandafter\BitSet@@NextClearBit
+\IntCalcInc#1!!%
+}%
+\fi
+\BitSet@Fi
}
\def\bitsetNextSetBit#1#2{%
- \number
- \expandafter\expandafter\expandafter\BitSet@NextSetBit
- \intcalcNum{#2}!{#1} %
+\number
+\expandafter\expandafter\expandafter\BitSet@NextSetBit
+\intcalcNum{#2}!{#1} %
}
\def\BitSet@NextSetBit#1!#2{%
- \ifnum#1<0 %
- \BitSet@NextSetBit0!{#2}%
- \BitSet@AfterFi{%
- \expandafter\BitSet@Space
- \expandafter\BitSetError:NegativeIndex\romannumeral0%
- }%
- \else
- \bitsetIsEmpty{#2}{-1}{%
- \expandafter\BitSet@Skip
- \number#1\expandafter\expandafter\expandafter!%
- \csname BS@#2\endcsname!!!!!!!!!=%
- {\BitSet@@NextSetBit#1!}%
- }%
- \BitSet@Fi
+\ifnum#1<0 %
+\BitSet@NextSetBit0!{#2}%
+\BitSet@AfterFi{%
+\expandafter\BitSet@Space
+\expandafter\BitSetError:NegativeIndex\romannumeral0%
+}%
+\else
+\bitsetIsEmpty{#2}{-1}{%
+\expandafter\BitSet@Skip
+\number#1\expandafter\expandafter\expandafter!%
+\csname BS@#2\endcsname!!!!!!!!!=%
+{\BitSet@@NextSetBit#1!}%
+}%
+\BitSet@Fi
}
\def\BitSet@@NextSetBit#1!#2{%
- \ifx#2!%
- -1%
- \else
- \ifx#21%
- #1%
- \BitSet@AfterFiFi\BitSet@Cleanup
- \else
- \BitSet@AfterFiFi{%
- \expandafter\expandafter\expandafter\BitSet@@NextSetBit
- \IntCalcInc#1!!%
- }%
- \fi
- \BitSet@Fi
+\ifx#2!%
+ -1%
+\else
+\ifx#21%
+#1%
+\BitSet@AfterFiFi\BitSet@Cleanup
+\else
+\BitSet@AfterFiFi{%
+\expandafter\expandafter\expandafter\BitSet@@NextSetBit
+\IntCalcInc#1!!%
+}%
+\fi
+\BitSet@Fi
}
\def\BitSet@Cleanup#1!{}
\def\BitSet@Skip#1!#2{%
- \ifx#2!%
- \BitSet@AfterFi{%
- \BitSet@SkipContinue%
- }%
- \else
- \ifcase#1 %
- \BitSet@AfterFiFi{%
- \BitSet@SkipContinue#2%
- }%
- \or
- \BitSet@AfterFiFi\BitSet@SkipContinue
- \or
- \BitSet@AfterFiFi{%
- \expandafter\BitSet@SkipContinue\BitSet@Gobble
- }%
- \else
- \ifnum#1>8 %
- \BitSet@AfterFiFiFi{%
- \expandafter\BitSet@Skip
- \number\IntCalcSub#1!8!\expandafter!%
- \BitSet@GobbleSeven
- }%
- \else
- \BitSet@AfterFiFiFi{%
- \expandafter\expandafter\expandafter\BitSet@Skip
- \IntCalcDec#1!!%
- }%
- \fi
- \fi
- \BitSet@Fi
+\ifx#2!%
+\BitSet@AfterFi{%
+\BitSet@SkipContinue%
+}%
+\else
+\ifcase#1 %
+\BitSet@AfterFiFi{%
+\BitSet@SkipContinue#2%
+}%
+\or
+\BitSet@AfterFiFi\BitSet@SkipContinue
+\or
+\BitSet@AfterFiFi{%
+\expandafter\BitSet@SkipContinue\BitSet@Gobble
+}%
+\else
+\ifnum#1>8 %
+\BitSet@AfterFiFiFi{%
+\expandafter\BitSet@Skip
+\number\IntCalcSub#1!8!\expandafter!%
+\BitSet@GobbleSeven
+}%
+\else
+\BitSet@AfterFiFiFi{%
+\expandafter\expandafter\expandafter\BitSet@Skip
+\IntCalcDec#1!!%
+}%
+\fi
+\fi
+\BitSet@Fi
}
\def\BitSet@SkipContinue#1!#2=#3{%
- #3#1!%
+#3#1!%
}
\def\BitSet@GobbleSeven#1#2#3#4#5#6#7{}
\def\bitsetGetSetBitList#1{%
- \romannumeral0%
- \bitsetIsEmpty{#1}{ }{%
- \expandafter\BitSet@GetSetBitList
- \number\BitSet@NextSetBit0!{#1}!{#1}{}!%
- }%
+\romannumeral0%
+\bitsetIsEmpty{#1}{ }{%
+\expandafter\BitSet@GetSetBitList
+\number\BitSet@NextSetBit0!{#1}!{#1}{}!%
+}%
}
\def\BitSet@GetSetBitList#1!#2#3#4!{%
- \ifnum#1<0 %
- \BitSet@AfterFi{ #4}%
- \else
- \BitSet@AfterFi{%
- \expandafter\BitSet@GetSetBitList\number
- \expandafter\expandafter\expandafter\BitSet@NextSetBit
- \IntCalcInc#1!!{#2}!{#2},#4#3#1!%
- }%
- \BitSet@Fi
+\ifnum#1<0 %
+\BitSet@AfterFi{ #4}%
+\else
+\BitSet@AfterFi{%
+\expandafter\BitSet@GetSetBitList\number
+\expandafter\expandafter\expandafter\BitSet@NextSetBit
+\IntCalcInc#1!!{#2}!{#2},#4#3#1!%
+}%
+\BitSet@Fi
}
\def\bitsetSize#1{%
- \number
- \BitSet@IfUndefined{#1}{0 }{%
- \expandafter\expandafter\expandafter\BitSet@Size
- \expandafter\expandafter\expandafter1%
- \expandafter\expandafter\expandafter!%
- \csname BS@#1\endcsname!0!%
- }%
+\number
+\BitSet@IfUndefined{#1}{0 }{%
+\expandafter\expandafter\expandafter\BitSet@Size
+\expandafter\expandafter\expandafter1%
+\expandafter\expandafter\expandafter!%
+\csname BS@#1\endcsname!0!%
+}%
}
\def\BitSet@Size#1!#2#3!#4!{%
- \ifx#21%
- \ifx\\#3\\%
- \BitSet@AfterFiFi{#1 }%
- \else
- \BitSet@AfterFiFi{%
- \expandafter\expandafter\expandafter\BitSet@Size
- \IntCalcInc#1!!#3!#1!%
- }%
- \fi
- \else
- \ifx\\#3\\%
- \BitSet@AfterFiFi{#4 }%
- \else
- \BitSet@AfterFiFi{%
- \expandafter\expandafter\expandafter\BitSet@Size
- \IntCalcInc#1!!#3!#4!%
- }%
- \fi
- \fi
- \BitSet@Fi
+\ifx#21%
+\ifx\\#3\\%
+\BitSet@AfterFiFi{#1 }%
+\else
+\BitSet@AfterFiFi{%
+\expandafter\expandafter\expandafter\BitSet@Size
+\IntCalcInc#1!!#3!#1!%
+}%
+\fi
+\else
+\ifx\\#3\\%
+\BitSet@AfterFiFi{#4 }%
+\else
+\BitSet@AfterFiFi{%
+\expandafter\expandafter\expandafter\BitSet@Size
+\IntCalcInc#1!!#3!#4!%
+}%
+\fi
+\fi
+\BitSet@Fi
}
\def\bitsetCardinality#1{%
- \number
- \BitSet@IfUndefined{#1}{0 }{%
- \expandafter\expandafter\expandafter\BitSet@Cardinality
- \expandafter\expandafter\expandafter0%
- \expandafter\expandafter\expandafter!%
- \csname BS@#1\endcsname!%
- }%
+\number
+\BitSet@IfUndefined{#1}{0 }{%
+\expandafter\expandafter\expandafter\BitSet@Cardinality
+\expandafter\expandafter\expandafter0%
+\expandafter\expandafter\expandafter!%
+\csname BS@#1\endcsname!%
+}%
}
\def\BitSet@Cardinality#1!#2#3!{%
- \ifx#21%
- \ifx\\#3\\%
- \BitSet@AfterFiFi{\IntCalcInc#1! }%
- \else
- \BitSet@AfterFiFi{%
- \expandafter\expandafter\expandafter\BitSet@Cardinality
- \IntCalcInc#1!!#3!%
- }%
- \fi
- \else
- \ifx\\#3\\%
- \BitSet@AfterFiFi{#1 }%
- \else
- \BitSet@AfterFiFi{%
- \BitSet@Cardinality#1!#3!%
- }%
- \fi
- \fi
- \BitSet@Fi
+\ifx#21%
+\ifx\\#3\\%
+\BitSet@AfterFiFi{\IntCalcInc#1! }%
+\else
+\BitSet@AfterFiFi{%
+\expandafter\expandafter\expandafter\BitSet@Cardinality
+\IntCalcInc#1!!#3!%
+}%
+\fi
+\else
+\ifx\\#3\\%
+\BitSet@AfterFiFi{#1 }%
+\else
+\BitSet@AfterFiFi{%
+\BitSet@Cardinality#1!#3!%
+}%
+\fi
+\fi
+\BitSet@Fi
}
\def\bitsetIsDefined#1{%
- \BitSet@IfUndefined{#1}%
- \BitSet@SecondOfTwo
- \BitSet@FirstOfTwo
+\BitSet@IfUndefined{#1}%
+\BitSet@SecondOfTwo
+\BitSet@FirstOfTwo
}
\def\bitsetIsEmpty#1{%
- \BitSet@IfUndefined{#1}\BitSet@FirstOfTwo{%
- \expandafter\ifx\csname BS@#1\endcsname\BitSet@Zero
- \expandafter\BitSet@FirstOfTwo
- \else
- \expandafter\BitSet@SecondOfTwo
- \fi
- }%
+\BitSet@IfUndefined{#1}\BitSet@FirstOfTwo{%
+\expandafter\ifx\csname BS@#1\endcsname\BitSet@Zero
+\expandafter\BitSet@FirstOfTwo
+\else
+\expandafter\BitSet@SecondOfTwo
+\fi
+}%
}
\def\BitSet@Zero{0}
\def\bitsetQuery#1#2{%
- \ifnum\bitsetGet{#1}{#2}=1 %
- \expandafter\BitSet@FirstOfTwo
- \else
- \expandafter\BitSet@SecondOfTwo
- \fi
+\ifnum\bitsetGet{#1}{#2}=1 %
+\expandafter\BitSet@FirstOfTwo
+\else
+\expandafter\BitSet@SecondOfTwo
+\fi
}
\def\bitsetEquals#1#2{%
- \BitSet@IfUndefined{#1}{%
- \BitSet@IfUndefined{#2}\BitSet@FirstOfTwo\BitSet@SecondOfTwo
- }{%
- \BitSet@IfUndefined{#2}\BitSet@SecondOfTwo{%
- \expandafter\ifx\csname BS@#1\expandafter\endcsname
- \csname BS@#2\endcsname
- \expandafter\BitSet@FirstOfTwo
- \else
- \expandafter\BitSet@SecondOfTwo
- \fi
- }%
- }%
+\BitSet@IfUndefined{#1}{%
+\BitSet@IfUndefined{#2}\BitSet@FirstOfTwo\BitSet@SecondOfTwo
+}{%
+\BitSet@IfUndefined{#2}\BitSet@SecondOfTwo{%
+\expandafter\ifx\csname BS@#1\expandafter\endcsname
+\csname BS@#2\endcsname
+\expandafter\BitSet@FirstOfTwo
+\else
+\expandafter\BitSet@SecondOfTwo
+\fi
+}%
+}%
}
\def\bitsetIntersects#1#2{%
- \bitsetIsEmpty{#1}\BitSet@SecondOfTwo{%
- \bitsetIsEmpty{#2}\BitSet@SecondOfTwo{%
- \expandafter\expandafter\expandafter\BitSet@Intersects
- \csname BS@#1\expandafter\expandafter\expandafter\endcsname
- \expandafter\expandafter\expandafter!%
- \csname BS@#2\endcsname!%
- }%
- }%
+\bitsetIsEmpty{#1}\BitSet@SecondOfTwo{%
+\bitsetIsEmpty{#2}\BitSet@SecondOfTwo{%
+\expandafter\expandafter\expandafter\BitSet@Intersects
+\csname BS@#1\expandafter\expandafter\expandafter\endcsname
+\expandafter\expandafter\expandafter!%
+\csname BS@#2\endcsname!%
+}%
+}%
}
\def\BitSet@Intersects#1#2!#3#4!{%
- \ifnum#1#3=11 %
- \BitSet@AfterFi\BitSet@FirstOfTwo
- \else
- \ifx\\#2\\%
- \BitSet@AfterFiFi\BitSet@SecondOfTwo
- \else
- \ifx\\#4\\%
- \BitSet@AfterFiFiFi\BitSet@SecondOfTwo
- \else
- \BitSet@AfterFiFiFi{%
- \BitSet@Intersects#2!#4!%
- }%
- \fi
- \fi
- \BitSet@Fi
+\ifnum#1#3=11 %
+\BitSet@AfterFi\BitSet@FirstOfTwo
+\else
+\ifx\\#2\\%
+\BitSet@AfterFiFi\BitSet@SecondOfTwo
+\else
+\ifx\\#4\\%
+\BitSet@AfterFiFiFi\BitSet@SecondOfTwo
+\else
+\BitSet@AfterFiFiFi{%
+\BitSet@Intersects#2!#4!%
+}%
+\fi
+\fi
+\BitSet@Fi
}
\BitSet@AtEnd%
- \endinput
+\endinput
<hobsub>
\hobsub@StopPackage
\hobsub@StartPackage{uniquecounter}
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode123=1 % {
- \catcode125=2 % }
- \expandafter\let\expandafter\x\csname ver@uniquecounter.sty\endcsname
- \ifx\x\relax % plain-TeX, first loading
- \else
- \def\empty{}%
- \ifx\x\empty % LaTeX, first loading,
- % variable is initialized, but \ProvidesPackage not yet seen
- \else
- \expandafter\ifx\csname PackageInfo\endcsname\relax
- \def\x#1#2{%
- \immediate\write-1{Package #1 Info: #2.}%
- }%
- \else
- \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
- \fi
- \x{uniquecounter}{The package is already loaded}%
- \aftergroup\endinput
- \fi
- \fi
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\expandafter\let\expandafter\x\csname ver@uniquecounter.sty\endcsname
+\ifx\x\relax % plain-TeX, first loading
+\else
+\def\empty{}%
+\ifx\x\empty % LaTeX, first loading,
+% variable is initialized, but \ProvidesPackage not yet seen
+\else
+\expandafter\ifx\csname PackageInfo\endcsname\relax
+\def\x#1#2{%
+\immediate\write-1{Package #1 Info: #2.}%
+}%
+\else
+\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+\fi
+\x{uniquecounter}{The package is already loaded}%
+\aftergroup\endinput
+\fi
+\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode35=6 % #
- \catcode39=12 % '
- \catcode40=12 % (
- \catcode41=12 % )
- \catcode44=12 % ,
- \catcode45=12 % -
- \catcode46=12 % .
- \catcode47=12 % /
- \catcode58=12 % :
- \catcode64=11 % @
- \catcode91=12 % [
- \catcode93=12 % ]
- \catcode123=1 % {
- \catcode125=2 % }
- \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
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode39=12 % '
+\catcode40=12 % (
+\catcode41=12 % )
+\catcode44=12 % ,
+\catcode45=12 % -
+\catcode46=12 % .
+\catcode47=12 % /
+\catcode58=12 % :
+\catcode64=11 % @
+\catcode91=12 % [
+\catcode93=12 % ]
+\catcode123=1 % {
+\catcode125=2 % }
+\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@uniquecounter.sty\endcsname
\ProvidesPackage{uniquecounter}%
- [2011/01/30 v1.2 Provides unlimited unique counter (HO)]%
+ [2011/01/30 v1.2 Provides unlimited unique counter (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
- \catcode13=5 % ^^M
- \endlinechar=13 %
- \catcode123=1 % {
- \catcode125=2 % }
- \catcode64=11 % @
- \def\x{\endgroup
- \expandafter\edef\csname uqc@AtEnd\endcsname{%
- \endlinechar=\the\endlinechar\relax
- \catcode13=\the\catcode13\relax
- \catcode32=\the\catcode32\relax
- \catcode35=\the\catcode35\relax
- \catcode61=\the\catcode61\relax
- \catcode64=\the\catcode64\relax
- \catcode123=\the\catcode123\relax
- \catcode125=\the\catcode125\relax
- }%
- }%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode123=1 % {
+\catcode125=2 % }
+\catcode64=11 % @
+\def\x{\endgroup
+\expandafter\edef\csname uqc@AtEnd\endcsname{%
+\endlinechar=\the\endlinechar\relax
+\catcode13=\the\catcode13\relax
+\catcode32=\the\catcode32\relax
+\catcode35=\the\catcode35\relax
+\catcode61=\the\catcode61\relax
+\catcode64=\the\catcode64\relax
+\catcode123=\the\catcode123\relax
+\catcode125=\the\catcode125\relax
+}%
+}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
@@ -9142,11 +9141,11 @@ $ \BIC@Temp 9{18\or27\or36\or45\or54\or63\or72\or81}%
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2{%
- \edef\uqc@AtEnd{%
- \uqc@AtEnd
- \catcode#1=\the\catcode#1\relax
- }%
- \catcode#1=#2\relax
+\edef\uqc@AtEnd{%
+\uqc@AtEnd
+\catcode#1=\the\catcode#1\relax
+}%
+\catcode#1=#2\relax
}
\TMP@EnsureCode{33}{12}% !
\TMP@EnsureCode{39}{12}% '
@@ -9160,90 +9159,90 @@ $ \BIC@Temp 9{18\or27\or36\or45\or54\or63\or72\or81}%
\edef\uqc@AtEnd{\uqc@AtEnd\noexpand\endinput}
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname RequirePackage\endcsname\relax
- \def\TMP@RequirePackage#1[#2]{%
- \begingroup\expandafter\expandafter\expandafter\endgroup
- \expandafter\ifx\csname ver@#1.sty\endcsname\relax
- \input #1.sty\relax
- \fi
- }%
- \TMP@RequirePackage{bigintcalc}[2007/11/11]%
- \TMP@RequirePackage{infwarerr}[2007/09/09]%
-\else
- \RequirePackage{bigintcalc}[2007/11/11]%
- \RequirePackage{infwarerr}[2007/09/09]%
+\def\TMP@RequirePackage#1[#2]{%
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname ver@#1.sty\endcsname\relax
+\input #1.sty\relax
+\fi
+}%
+\TMP@RequirePackage{bigintcalc}[2007/11/11]%
+\TMP@RequirePackage{infwarerr}[2007/09/09]%
+\else
+\RequirePackage{bigintcalc}[2007/11/11]%
+\RequirePackage{infwarerr}[2007/09/09]%
\fi
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname numexpr\endcsname\relax
- \def\uqc@IncNum#1{%
- \begingroup
- \count@=\csname uqc@cnt@#1\endcsname\relax
- \advance\count@\@ne
- \expandafter\xdef\csname uqc@cnt@#1\endcsname{%
- \number\count@
- }%
- \ifnum\count@=2147483647 %
- \global\expandafter\let\csname uqc@inc@#1\endcsname
- \uqc@IncBig
- \fi
- \endgroup
- }%
-\else
- \def\uqc@IncNum#1{%
- \expandafter\xdef\csname uqc@cnt@#1\endcsname{%
- \number\numexpr\csname uqc@cnt@#1\endcsname+1%
- }%
- \ifnum\csname uqc@cnt@#1\endcsname=2147483647 %
- \global\expandafter\let\csname uqc@inc@#1\endcsname
- \uqc@IncBig
- \fi
- }%
+\def\uqc@IncNum#1{%
+\begingroup
+\count@=\csname uqc@cnt@#1\endcsname\relax
+\advance\count@\@ne
+\expandafter\xdef\csname uqc@cnt@#1\endcsname{%
+\number\count@
+}%
+\ifnum\count@=2147483647 %
+\global\expandafter\let\csname uqc@inc@#1\endcsname
+\uqc@IncBig
+\fi
+\endgroup
+}%
+\else
+\def\uqc@IncNum#1{%
+\expandafter\xdef\csname uqc@cnt@#1\endcsname{%
+\number\numexpr\csname uqc@cnt@#1\endcsname+1%
+}%
+\ifnum\csname uqc@cnt@#1\endcsname=2147483647 %
+\global\expandafter\let\csname uqc@inc@#1\endcsname
+\uqc@IncBig
+\fi
+}%
\fi
\def\uqc@IncBig#1{%
- \expandafter\xdef\csname uqc@cnt@#1\endcsname{%
- \expandafter\expandafter\expandafter
- \BigIntCalcInc\csname uqc@cnt@#1\endcsname!%
- }%
+\expandafter\xdef\csname uqc@cnt@#1\endcsname{%
+\expandafter\expandafter\expandafter
+\BigIntCalcInc\csname uqc@cnt@#1\endcsname!%
+}%
}
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname newcommand\endcsname\relax
- \def\uqc@Def#1{\def#1##1}%
+\def\uqc@Def#1{\def#1##1}%
\else
- \def\uqc@Def#1{\newcommand*{#1}[1]}%
+\def\uqc@Def#1{\newcommand*{#1}[1]}%
\fi
\uqc@Def\UniqueCounterNew{%
- \expandafter\ifx\csname uqc@cnt@#1\endcsname\relax
- \expandafter\xdef\csname uqc@cnt@#1\endcsname{0}%
- \global\expandafter\let\csname uqc@inc@#1\endcsname\uqc@IncNum
- \@PackageInfo{uniquecounter}{New unique counter `#1'}%
- \else
- \@PackageError{uniquecounter}{Unique counter `#1' is already defined}\@ehc
- \fi
+\expandafter\ifx\csname uqc@cnt@#1\endcsname\relax
+\expandafter\xdef\csname uqc@cnt@#1\endcsname{0}%
+\global\expandafter\let\csname uqc@inc@#1\endcsname\uqc@IncNum
+\@PackageInfo{uniquecounter}{New unique counter `#1'}%
+\else
+\@PackageError{uniquecounter}{Unique counter `#1' is already defined}\@ehc
+\fi
}
\uqc@Def\UniqueCounterIncrement{%
- \expandafter\ifx\csname uqc@cnt@#1\endcsname\relax
- \@PackageError{uniquecounter}{Unique counter `#1' is undefined}\@ehc
- \else
- \csname uqc@inc@#1\endcsname{#1}%
- \fi
+\expandafter\ifx\csname uqc@cnt@#1\endcsname\relax
+\@PackageError{uniquecounter}{Unique counter `#1' is undefined}\@ehc
+\else
+\csname uqc@inc@#1\endcsname{#1}%
+\fi
}
\uqc@Def\UniqueCounterGet{%
- \csname uqc@cnt@#1\endcsname
+\csname uqc@cnt@#1\endcsname
}
\uqc@Def\UniqueCounterCall{%
- \expandafter\ifx\csname uqc@cnt@#1\endcsname\relax
- \@PackageError{uniquecounter}{Unique counter `#1' is undefined}\@ehc
- \expandafter\uqc@Call\expandafter0%
- \else
- \UniqueCounterIncrement{#1}%
- \expandafter\expandafter\expandafter\uqc@Call
- \expandafter\expandafter\expandafter{%
- \csname uqc@cnt@#1\expandafter\endcsname\expandafter
- }%
- \fi
+\expandafter\ifx\csname uqc@cnt@#1\endcsname\relax
+\@PackageError{uniquecounter}{Unique counter `#1' is undefined}\@ehc
+\expandafter\uqc@Call\expandafter0%
+\else
+\UniqueCounterIncrement{#1}%
+\expandafter\expandafter\expandafter\uqc@Call
+\expandafter\expandafter\expandafter{%
+\csname uqc@cnt@#1\expandafter\endcsname\expandafter
+}%
+\fi
}
\long\def\uqc@Call#1#2{#2{#1}}%
\uqc@AtEnd%
- \endinput
+\endinput
<hobsub>
\hobsub@StopPackage
\HOBsub@AtEnd%