You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
318 lines
8.4 KiB
318 lines
8.4 KiB
%%
|
|
%% This is file `fibnum.sty',
|
|
%% generated with the docstrip utility.
|
|
%%
|
|
%% The original source files were:
|
|
%%
|
|
%% fibnum.dtx (with options: `package')
|
|
%%
|
|
%% This is a generated file.
|
|
%%
|
|
%% Project: fibnum
|
|
%% Version: 2016/05/16 v1.1
|
|
%%
|
|
%% Copyright (C)
|
|
%% 2012 Heiko Oberdiek
|
|
%% 2016-2019 Oberdiek Package Support Group
|
|
%%
|
|
%% This work may be distributed and/or modified under the
|
|
%% conditions of the LaTeX Project Public License, either
|
|
%% version 1.3c of this license or (at your option) any later
|
|
%% version. This version of this license is in
|
|
%% https://www.latex-project.org/lppl/lppl-1-3c.txt
|
|
%% and the latest version of this license is in
|
|
%% https://www.latex-project.org/lppl.txt
|
|
%% and version 1.3 or later is part of all distributions of
|
|
%% LaTeX version 2005/12/01 or later.
|
|
%%
|
|
%% This work has the LPPL maintenance status "maintained".
|
|
%%
|
|
%% The Current Maintainers of this work are
|
|
%% Heiko Oberdiek and the Oberdiek Package Support Group
|
|
%% https://github.com/ho-tex/oberdiek/issues
|
|
%%
|
|
%%
|
|
%% The Base Interpreter refers to any `TeX-Format',
|
|
%% because some files are installed in TDS:tex/generic//.
|
|
%%
|
|
%% This work consists of the main source file fibnum.dtx
|
|
%% and the derived files
|
|
%% fibnum.sty, fibnum.pdf, fibnum.ins, fibnum.drv, fibnum.bib,
|
|
%% fibnum-test1.tex, fibnum-test-calc.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@fibnum.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{fibnum}{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
|
|
\expandafter\x\csname ver@fibnum.sty\endcsname
|
|
\ProvidesPackage{fibnum}%
|
|
[2016/05/16 v1.1 Fibonacci numbers (HO)]%
|
|
\begingroup\catcode61\catcode48\catcode32=10\relax%
|
|
\catcode13=5 % ^^M
|
|
\endlinechar=13 %
|
|
\catcode123=1 % {
|
|
\catcode125=2 % }
|
|
\catcode64=11 % @
|
|
\def\x{\endgroup
|
|
\expandafter\edef\csname FibNum@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 %
|
|
\catcode35=6 % #
|
|
\catcode64=11 % @
|
|
\catcode123=1 % {
|
|
\catcode125=2 % }
|
|
\def\TMP@EnsureCode#1#2{%
|
|
\edef\FibNum@AtEnd{%
|
|
\FibNum@AtEnd
|
|
\catcode#1=\the\catcode#1\relax
|
|
}%
|
|
\catcode#1=#2\relax
|
|
}
|
|
\TMP@EnsureCode{33}{12}% !
|
|
\TMP@EnsureCode{40}{12}% (
|
|
\TMP@EnsureCode{41}{12}% )
|
|
\TMP@EnsureCode{45}{12}% -
|
|
\TMP@EnsureCode{46}{12}% .
|
|
\TMP@EnsureCode{47}{12}% /
|
|
\TMP@EnsureCode{58}{12}% :
|
|
\TMP@EnsureCode{60}{12}% <
|
|
\TMP@EnsureCode{62}{12}% >
|
|
\TMP@EnsureCode{91}{12}% [
|
|
\TMP@EnsureCode{93}{12}% ]
|
|
\edef\FibNum@AtEnd{\FibNum@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}[2011/04/18]%
|
|
\TMP@RequirePackage{intcalc}[2007/09/27]%
|
|
\TMP@RequirePackage{bigintcalc}[2007/11/11]%
|
|
\else
|
|
\RequirePackage{ltxcmds}[2011/04/18]%
|
|
\RequirePackage{intcalc}[2007/09/27]%
|
|
\RequirePackage{bigintcalc}[2007/11/11]%
|
|
\fi
|
|
\def\FibNum@temp#1{%
|
|
\expandafter\def\csname FibNum@#1\endcsname
|
|
}
|
|
\catcode46=9 % dots are ignored
|
|
\FibNum@temp{0}{0}
|
|
\FibNum@temp{1}{1}
|
|
\FibNum@temp{2}{1}
|
|
\FibNum@temp{3}{2}
|
|
\FibNum@temp{4}{3}
|
|
\FibNum@temp{5}{5}
|
|
\FibNum@temp{6}{8}
|
|
\FibNum@temp{7}{13}
|
|
\FibNum@temp{8}{21}
|
|
\FibNum@temp{9}{34}
|
|
\FibNum@temp{10}{55}
|
|
\FibNum@temp{11}{89}
|
|
\FibNum@temp{12}{144}
|
|
\FibNum@temp{13}{233}
|
|
\FibNum@temp{14}{377}
|
|
\FibNum@temp{15}{610}
|
|
\FibNum@temp{16}{987}
|
|
\FibNum@temp{17}{1.597}
|
|
\FibNum@temp{18}{2.584}
|
|
\FibNum@temp{19}{4.181}
|
|
\FibNum@temp{20}{6.765}
|
|
\FibNum@temp{21}{10.946}
|
|
\FibNum@temp{22}{17.711}
|
|
\FibNum@temp{23}{28.657}
|
|
\FibNum@temp{24}{46.368}
|
|
\FibNum@temp{25}{75.025}
|
|
\FibNum@temp{26}{121.393}
|
|
\FibNum@temp{27}{196.418}
|
|
\FibNum@temp{28}{317.811}
|
|
\FibNum@temp{29}{514.229}
|
|
\FibNum@temp{30}{832.040}
|
|
\FibNum@temp{31}{1.346.269}
|
|
\FibNum@temp{32}{2.178.309}
|
|
\FibNum@temp{33}{3.524.578}
|
|
\FibNum@temp{34}{5.702.887}
|
|
\FibNum@temp{35}{9.227.465}
|
|
\FibNum@temp{36}{14.930.352}
|
|
\FibNum@temp{37}{24.157.817}
|
|
\FibNum@temp{38}{39.088.169}
|
|
\FibNum@temp{39}{63.245.986}
|
|
\FibNum@temp{40}{102.334.155}
|
|
\FibNum@temp{41}{165.580.141}
|
|
\FibNum@temp{42}{267.914.296}
|
|
\FibNum@temp{43}{433.494.437}
|
|
\FibNum@temp{44}{701.408.733}
|
|
\FibNum@temp{45}{1.134.903.170}
|
|
\FibNum@temp{46}{1.836.311.903}
|
|
\def\FibNum@max{46}
|
|
\def\fibnumPreCalc#1{%
|
|
\expandafter\expandafter\expandafter
|
|
\FibNum@PreCalc\intcalcNum{#1}/%
|
|
}
|
|
\def\FibNum@PreCalc#1/{%
|
|
\ifnum#1<\ltx@zero
|
|
\expandafter\FibNum@PreCalc\ltx@gobble#1/%
|
|
\else
|
|
\ifnum#1>\FibNum@max
|
|
\begingroup
|
|
\ltx@LocDimenA=#1sp\relax
|
|
\countdef\FibNum@i=255\relax
|
|
\FibNum@i=\FibNum@max\relax
|
|
\edef\FibNum@temp{%
|
|
\csname FibNum@\the\FibNum@i\endcsname/%
|
|
}%
|
|
\advance\FibNum@i by -1\relax
|
|
\edef\FibNum@temp{%
|
|
\FibNum@temp
|
|
\csname FibNum@\the\FibNum@i\endcsname
|
|
}%
|
|
\advance\FibNum@i\ltx@two
|
|
\iftrue
|
|
\expandafter\FibNum@PreCalcAux\FibNum@temp
|
|
\fi
|
|
\endgroup
|
|
\fi
|
|
\fi
|
|
}
|
|
\def\FibNum@PreCalcAux#1/#2\fi{%
|
|
\fi
|
|
\edef\FibNum@temp{\BigIntCalcAdd#1!#2!}%
|
|
\global\expandafter
|
|
\let\csname FibNum@\the\FibNum@i\endcsname\FibNum@temp
|
|
\ifnum\FibNum@i=\ltx@LocDimenA
|
|
\xdef\FibNum@max{\the\FibNum@i}%
|
|
\else
|
|
\advance\FibNum@i\ltx@one
|
|
\expandafter\FibNum@PreCalcAux\FibNum@temp/#1%
|
|
\fi
|
|
}
|
|
\def\fibnum#1{%
|
|
\romannumeral
|
|
\expandafter\expandafter\expandafter\FibNum@Do\intcalcNum{#1}/%
|
|
}
|
|
\def\FibNum@Do#1/{%
|
|
\ifnum#1<\ltx@zero
|
|
\FibNum@ReturnAfterElseFiFi{%
|
|
\ifodd#1 %
|
|
\expandafter\expandafter\expandafter\ltx@zero
|
|
\else
|
|
\expandafter\expandafter\expandafter\ltx@zero
|
|
\expandafter\expandafter\expandafter-%
|
|
\fi
|
|
\romannumeral
|
|
\expandafter\FibNum@Do\ltx@gobble#1/%
|
|
}%
|
|
\else
|
|
\ifnum\FibNum@max<#1 %
|
|
\ltx@ReturnAfterElseFi{%
|
|
\expandafter
|
|
\FibNum@ExpCalc\number\expandafter\IntCalcInc\FibNum@max!%
|
|
\expandafter\expandafter\expandafter/%
|
|
\csname FibNum@\FibNum@max
|
|
\expandafter\expandafter\expandafter\endcsname
|
|
\expandafter\expandafter\expandafter/%
|
|
\csname FibNum@\expandafter\IntCalcDec\FibNum@max!%
|
|
\endcsname/%
|
|
#1%
|
|
}%
|
|
\else
|
|
\expandafter\expandafter\expandafter\ltx@zero
|
|
\csname FibNum@#1\expandafter\expandafter\expandafter\endcsname
|
|
\fi
|
|
\fi
|
|
}
|
|
\def\FibNum@ReturnAfterElseFiFi#1\else#2\fi\fi{\fi#1}
|
|
\def\FibNum@ExpCalc#1/#2/#3/#4\fi{%
|
|
\fi
|
|
\ifnum#1=#4 %
|
|
\ltx@ReturnAfterElseFi{%
|
|
\expandafter\expandafter\expandafter\ltx@zero
|
|
\BigIntCalcAdd#2!#3!%
|
|
}%
|
|
\else
|
|
\expandafter\FibNum@ExpCalc
|
|
\number\IntCalcInc#1!%
|
|
\expandafter\expandafter\expandafter/%
|
|
\BigIntCalcAdd#2!#3!/%
|
|
#2/#4%
|
|
\fi
|
|
}
|
|
\FibNum@AtEnd%
|
|
%% \section{Installation}
|
|
\endinput
|
|
%%
|
|
%% End of file `fibnum.sty'.
|
|
|