From 7a75873d73817a30e904cdb9903e94f67bc02490 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 15 Sep 2008 00:42:56 +0000 Subject: lcg update (11sep08) git-svn-id: svn://tug.org/texlive/trunk@10600 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/doc/latex/lcg/lcg.pdf | Bin 0 -> 145476 bytes Master/texmf-dist/source/latex/lcg/lcg.dtx | 36 ++++++++++++++--------------- Master/texmf-dist/source/latex/lcg/lcg.ins | 24 +++++++++---------- Master/texmf-dist/tex/latex/lcg/lcg.sty | 32 ++++++++++++------------- 4 files changed, 46 insertions(+), 46 deletions(-) create mode 100644 Master/texmf-dist/doc/latex/lcg/lcg.pdf (limited to 'Master/texmf-dist') diff --git a/Master/texmf-dist/doc/latex/lcg/lcg.pdf b/Master/texmf-dist/doc/latex/lcg/lcg.pdf new file mode 100644 index 00000000000..2322ad3715f Binary files /dev/null and b/Master/texmf-dist/doc/latex/lcg/lcg.pdf differ diff --git a/Master/texmf-dist/source/latex/lcg/lcg.dtx b/Master/texmf-dist/source/latex/lcg/lcg.dtx index eb44e9041d6..f9f706e4763 100644 --- a/Master/texmf-dist/source/latex/lcg/lcg.dtx +++ b/Master/texmf-dist/source/latex/lcg/lcg.dtx @@ -1,6 +1,6 @@ % \iffalse % File: lcg.dtx -%% Copyright (C) 2001 Erich Janka (janka@utanet.at) +%% Copyright (c) 2001, 2003, 2008 Erich Janka -- Das Vollpreiskind (janka@utanet.at) %% %% This package may be distributed and/or modified under the terms of the %% LaTeX Project Public License, as described in lppl.txt in the base @@ -12,7 +12,7 @@ %% This program consits of the files lcg.dtx and lcg.ins % %\NeedsTeXFormat{LaTeX2e} -%\ProvidesPackage{lcg}[2001/03/03 v1.0 generating random numbers] +%\ProvidesPackage{lcg}[2008/09/10 v1.2 generating random numbers] %\RequirePackage{keyval} % %<*driver> @@ -21,8 +21,8 @@ \begin{document} \GetFileInfo{lcg.sty} \title{The \texttt{lcg} package} - \author{Erich Janka\\ \texttt{janka@utanet.at}} - \date{2001/03/03 (v1.0)} + \author{Erich Janka -- Das Vollpreiskind\\ \texttt{janka@utanet.at}} + \date{2008/09/10 (v1.2)} \maketitle \DocInput{lcg.dtx} \end{document} @@ -405,7 +405,7 @@ % \begin{macrocode} \define@key{Init}{quiet}[y]{ \def\qui@t{\expandafter\firstletterr@nd #1\delimiter} - \if\qui@t y % nothing to do + \if \qui@t y% nothing to do \else\if\qui@t Y \def\qui@t{y} \else\if\qui@t j \def\qui@t{y} \else\if\qui@t J \def\qui@t{y} @@ -479,8 +479,7 @@ % Output to log-file/screen % \begin{macrocode} \def\@utputr@nd{% - \if\qui@t y - % do nothing + \if \qui@t y% do nothing \else \typeout{Smallest possible random number: \the\f@rst}% \typeout{Largest possible random number: \the\l@st}% @@ -513,17 +512,18 @@ % \cntr{@tempcnta} will be less than zero and the right border will be adjusted. % \begin{macrocode} \def\cutr@nger@nd{% - \@tempcntb = -2147483646 % -2^31 + 2 - \@tempcnta = \f@rst - \advance \@tempcntb \l@st - \multiply \@tempcntb \m@ne - \advance \@tempcnta \@tempcntb - \ifnum \@tempcnta < \z@% - \PackageWarning{lcg}{Range contains too many numbers + \ifnum\l@st<\z@\else + \@tempcntb = -2147483646 % -2^31 + 2 + \@tempcnta = \f@rst + \advance \@tempcntb \l@st + \multiply \@tempcntb \m@ne + \advance \@tempcnta \@tempcntb + \ifnum \@tempcnta < \z@% + \PackageWarning{lcg}{Range contains too many numbers -- right border reset to largest possible value}% - \advance \l@st \@tempcnta - \fi% - + \advance \l@st \@tempcnta + \fi% + \fi% }% end of \checkr@ange % \end{macrocode} % \end{macro} @@ -595,7 +595,7 @@ \multiply \cr@nd \the\month \multiply \cr@nd \the\day \advance \cr@nd \inputlineno - \if\qui@t y + \if \qui@t y% \else \typeout{Random number generator initialized to \the\cr@nd}% \fi diff --git a/Master/texmf-dist/source/latex/lcg/lcg.ins b/Master/texmf-dist/source/latex/lcg/lcg.ins index 1f937263a5e..ea003047803 100644 --- a/Master/texmf-dist/source/latex/lcg/lcg.ins +++ b/Master/texmf-dist/source/latex/lcg/lcg.ins @@ -1,12 +1,12 @@ -%% File: lcg.ins Copyright (C) 2000 Erich Janka (janka@utanet.at) -%% -%% Docstrip installation instruction file for `lcg' - -\input docstrip -\keepsilent -\askforoverwritefalse -\preamble -\endpreamble -\generate{\file{lcg.sty}{\from{lcg.dtx}{lcg}}} -\endbatchfile - +%% File: lcg.ins Copyright (C) 2000 Erich Janka (janka@utanet.at) +%% +%% Docstrip installation instruction file for `lcg' + +\input docstrip +\keepsilent +\askforoverwritefalse +\preamble +\endpreamble +\generate{\file{lcg.sty}{\from{lcg.dtx}{lcg}}} +\endbatchfile + diff --git a/Master/texmf-dist/tex/latex/lcg/lcg.sty b/Master/texmf-dist/tex/latex/lcg/lcg.sty index 87edb68f8e1..0a7b330c74d 100644 --- a/Master/texmf-dist/tex/latex/lcg/lcg.sty +++ b/Master/texmf-dist/tex/latex/lcg/lcg.sty @@ -6,7 +6,7 @@ %% %% lcg.dtx (with options: `lcg') %% -%% Copyright (C) 2001 Erich Janka (janka@utanet.at) +%% Copyright (c) 2001, 2003, 2008 Erich Janka -- Das Vollpreiskind (janka@utanet.at) %% %% This package may be distributed and/or modified under the terms of the %% LaTeX Project Public License, as described in lppl.txt in the base @@ -17,7 +17,7 @@ %% %% This program consits of the files lcg.dtx and lcg.ins \NeedsTeXFormat{LaTeX2e} -\ProvidesPackage{lcg}[2001/03/03 v1.0 generating random numbers] +\ProvidesPackage{lcg}[2008/09/10 v1.2 generating random numbers] \RequirePackage{keyval} \@ifundefined{rand}{} {\PackageWarning{lcg}{Command `rand' already defined}} @@ -104,7 +104,7 @@ } \define@key{Init}{quiet}[y]{ \def\qui@t{\expandafter\firstletterr@nd #1\delimiter} - \if\qui@t y % nothing to do + \if \qui@t y% nothing to do \else\if\qui@t Y \def\qui@t{y} \else\if\qui@t j \def\qui@t{y} \else\if\qui@t J \def\qui@t{y} @@ -136,8 +136,7 @@ } % end of \def\p@stkeysr@nd \def\firstletterr@nd#1#2\delimiter{#1} \def\@utputr@nd{% - \if\qui@t y - % do nothing + \if \qui@t y% do nothing \else \typeout{Smallest possible random number: \the\f@rst}% \typeout{Largest possible random number: \the\l@st}% @@ -155,17 +154,18 @@ \fi% }% end of \def\@rderr@nd \def\cutr@nger@nd{% - \@tempcntb = -2147483646 % -2^31 + 2 - \@tempcnta = \f@rst - \advance \@tempcntb \l@st - \multiply \@tempcntb \m@ne - \advance \@tempcnta \@tempcntb - \ifnum \@tempcnta < \z@% - \PackageWarning{lcg}{Range contains too many numbers + \ifnum\l@st<\z@\else + \@tempcntb = -2147483646 % -2^31 + 2 + \@tempcnta = \f@rst + \advance \@tempcntb \l@st + \multiply \@tempcntb \m@ne + \advance \@tempcnta \@tempcntb + \ifnum \@tempcnta < \z@% + \PackageWarning{lcg}{Range contains too many numbers -- right border reset to largest possible value}% - \advance \l@st \@tempcnta - \fi% - + \advance \l@st \@tempcnta + \fi% + \fi% }% end of \checkr@ange \def\rand{% \r@nd% @@ -200,7 +200,7 @@ \multiply \cr@nd \the\month \multiply \cr@nd \the\day \advance \cr@nd \inputlineno - \if\qui@t y + \if \qui@t y% \else \typeout{Random number generator initialized to \the\cr@nd}% \fi -- cgit v1.2.3