polynom 0.17 update

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

6 files changed, 74 insertions, 90 deletions

diff --git a/Master/texmf-dist/doc/latex/polynom/README b/Master/texmf-dist/doc/latex/polynom/README
index 2003812cc89..088d00097c5 100644
--- a/Master/texmf-dist/doc/latex/polynom/README
+++ b/Master/texmf-dist/doc/latex/polynom/README
@@ -1,5 +1,5 @@
 Polynom package
-Copyright 2000-2004 Carsten Heinz
+Copyright 2000-2006 Carsten Heinz, Hendri Adriaens
 Released under the LaTeX Project Public License 1.3 or later
 
 The polynom package implements macros for manipulating
diff --git a/Master/texmf-dist/doc/latex/polynom/polynom.pdf b/Master/texmf-dist/doc/latex/polynom/polynom.pdf
index 458ccc8ff8e..2bcffb9bf0c 100644
--- a/Master/texmf-dist/doc/latex/polynom/polynom.pdf
+++ b/Master/texmf-dist/doc/latex/polynom/polynom.pdf
diff --git a/Master/texmf-dist/source/latex/polynom/polynom.dtx b/Master/texmf-dist/source/latex/polynom/polynom.dtx
index 20475eeb59c..e87ca6f918f 100644
--- a/Master/texmf-dist/source/latex/polynom/polynom.dtx
+++ b/Master/texmf-dist/source/latex/polynom/polynom.dtx
@@ -3,7 +3,7 @@
 % The files  polynom.dtx  and  polynom.ins  and all files generated
 % from these two files are referred to as `this work'.
 %
-% This work is copyright 2000-2004 Carsten Heinz.
+% This work is copyright 2000-2006 Carsten Heinz, Hendri Adriaens.
 %
 % This work may be distributed and/or modified under the conditions
 % of the LaTeX Project Public License, either version 1.3 of this
@@ -15,7 +15,7 @@
 %
 % This work has the LPPL maintenance status "maintained".
 %
-% The Current Maintainer of this work is Carsten Heinz <cheinz@gmx.de>.
+% The Current Maintainer of this work is Hendri Adriaens.
 %
 %<*driver>
 \documentclass{ltxdoc}
@@ -46,7 +46,7 @@
 %
 %\newbox\abstractbox
 %\setbox\abstractbox=\vbox{
-%	\begin{abstract}
+%   \begin{abstract}
 %   The \packagename{polynom} package implements macros for manipulating
 %   polynomials. For example, it can typeset polynomial long divisions and
 %   synthetic divisions (Horner's scheme), which can be shown step by step.
@@ -54,13 +54,23 @@
 %   with rational coefficients.
 %   \emph{Please note that this is work in progress. Multivariate polynomials
 %   are \emph{currently} not supported.}
-%	\end{abstract}}
+%   \end{abstract}}
 %
 % \title{The \packagename{Polynom} Package}
-% \author{Copyright 2000--2004\\ Carsten Heinz \texttt{<\,cheinz@gmx.de\,>}}
-% \date{2004/08/12\enspace Version 0.16\\ \box\abstractbox}
+% \author{Copyright 2000--2006\\ Carsten Heinz \texttt{<\,cheinz@gmx.de\,>}, Hendri Adriaens}
+% \date{2006/04/20\enspace Version 0.17\\ \box\abstractbox}
 % \maketitle
 %
+% \section{Preface}
+%
+%Because Carsten Heinz could not be reached anymore for a long time,
+%this package has been taken over according to the LPPL for
+%maintenance by Hendri Adriaens 2006/04/20. This package was using and
+%redefining internals of the \packagename{keyval} package and hence
+%it was incompatible with \packagename{xkeyval}. This problem has
+%been solved and the processing of the \texttt{vars} key has been
+%simplified. All following text is the original by Carsten Heinz.
+%\hfill\emph{Hendri Adriaens, 2006/04/20}
 %
 % \section{Introduction}
 %
@@ -320,7 +330,7 @@
 % the role of verbatim polynomials. This is also the case for \meta{\(a\)} and
 % \meta{\(b\)} in table~\ref{low}, but each \meta{cs$_{\ldots}$} must be a
 % control sequence, in which the result is saved.
-% 
+%
 % The command in table~\ref{low} can be used for low level calculations, and in
 % particular to store polynomials for later use with the high-level commands.
 % For example one could write the following.
@@ -392,7 +402,7 @@
 %\end{thebibliography}}
 %
 %
-% \CheckSum{4559}
+% \CheckSum{4500}
 %
 %
 % \section{Preliminaries}
@@ -401,7 +411,7 @@
 %    \begin{macrocode}
 %<*package>
 \NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{polynom}[2004/08/12 0.16 (Carsten Heinz)]
+\ProvidesPackage{polynom}[2006/04/20 0.17 (CH,HA)]
 %    \end{macrocode}
 % Now follow two frequently used definitions.
 %
@@ -448,7 +458,7 @@
 % \packagename{keyval} package.
 %    \begin{macrocode}
 \RequirePackage{keyval}[1997/11/10]
-\newcommand\polyset[1]{\ifx\@empty#1\@empty\else \setkeys{pld}{#1}\fi}
+\def\polyset{\setkeys{pld}}
 %    \end{macrocode}
 % \end{macro}
 %
@@ -463,12 +473,30 @@
                         \else \expandafter\@firstoftwo \fi}%
     \expandafter\pld@temp\pld@variables,#1,\@empty\relax}
 %    \end{macrocode}
-% The key iterates down the tokens and expand the list.
+% \end{macro}
+% The key iterates down the tokens and expands the list, making a new
+% key for every variable.
 %    \begin{macrocode}
-\define@key{pld}{vars}
-    {\let\pld@variables\@empty
-     \@tfor\pld@temp:=#1\do
-         {\pld@Extend\pld@variables{\expandafter,\pld@temp}}}
+\define@key{pld}{vars}{%
+  \let\pld@variables\@empty
+  \@tfor\pld@temp:=#1\do{%
+    \pld@Extend\pld@variables{\expandafter,\pld@temp}%
+    \edef\pld@temp{%
+      \noexpand\define@key{pld}{\pld@temp}%
+      {\noexpand\pld@GetValue{\pld@temp}{####1}}%
+    }%
+    \pld@temp
+  }%
+}
+%    \end{macrocode}
+% \begin{macro}{\pld@GetValue}
+% Helper macro to retrieve the value of a variable.
+%    \begin{macrocode}
+\def\pld@GetValue#1#2{%
+  \pld@GetPoly{\pld@polya}{}{#2}%
+  \ifx\pld@polya\@empty\def\pld@polya{\pld@R 01}\fi
+  \expandafter\let\csname pld@value@#1\endcsname\pld@polya
+}
 %    \end{macrocode}
 %    \begin{macrocode}
 \polyset{vars=Xx}
@@ -703,7 +731,7 @@
 % \caption{Mathematical notation versus internal representation}\label{mvi}
 % \end{table}
 % Table \ref{mvi} shows examples of the internal data format. As you can see,
-% sometimes there are various ways to represent the same polynomial. The 
+% sometimes there are various ways to represent the same polynomial. The
 % exact internal data depends on how you enter the factors and which state has
 % been reached in the division algorithm, for example.
 %
@@ -2125,7 +2153,7 @@
             \let\pld@firstcol\maxdimen \let\pld@lastcol\z@
         \fi
 %    \end{macrocode}
-% The submacro does the subtraction and defines appropriate data 
+% The submacro does the subtraction and defines appropriate data
 % |\pld@lastline|, |\pld@subline|, \ldots\space.
 %    \begin{macrocode}
         \let\pld@tempoly\@empty
@@ -2451,7 +2479,7 @@
 %    \begin{macrocode}
 \def\pld@InsertItems@find#1&{%
     \ifx\relax#1\relax
-	    \expandafter\pld@InsertItems@find@fill\pld@recentmonom\pld@V{}0\@empty
+        \expandafter\pld@InsertItems@find@fill\pld@recentmonom\pld@V{}0\@empty
     \else
 %    \end{macrocode}
 % Otherwise we either drop the rest of the pattern since we've found the
@@ -3379,35 +3407,6 @@
 % The following code lines come without comments. Good luck!
 %
 %    \begin{macrocode}
-\renewcommand\polyset[1]{%
-    \ifx\@empty#1\@empty\else
-        \let\pld@KVsplit@saved\KV@split
-        \let\KV@split\pld@KVsplit
-        \setkeys{pld}{#1}%
-        \let\KV@split\pld@KVsplit@saved
-    \fi}
-\def\pld@KVsplit#1=#2=#3\relax{%
-  \KV@@sp@def\@tempa{#1}%
-  \ifx\@tempa\@empty\else
-    \expandafter\let\expandafter\@tempc
-      \csname\KV@prefix\@tempa\endcsname
-    \ifx\@tempc\relax
-      \expandafter\pld@IfVar\expandafter{\@tempa}%
-        {\pld@GetPoly{\pld@polya}{}{#2}%
-         \ifx\pld@polya\@empty \def\pld@polya{\pld@R 01}\fi
-         \expandafter\let\csname pld@value@\@tempa\endcsname\pld@polya}%
-        {\KV@errx{\@tempa\space undefined}}%
-    \else
-      \ifx\@empty#3\@empty
-        \KV@default
-      \else
-        \KV@@sp@def\@tempb{#2}%
-        \expandafter\@tempc\expandafter{\@tempb}\relax
-      \fi
-    \fi
-  \fi}
-%    \end{macrocode}
-%    \begin{macrocode}
 \def\pld@KVCases#1#2#3{%
     \@ifundefined{pld@#1@#2}%
     {\PackageError{Polynom}{Unknown value #2}{Try #3.}}%
diff --git a/Master/texmf-dist/source/latex/polynom/polynom.ins b/Master/texmf-dist/source/latex/polynom/polynom.ins
index da45a326ca0..cec1404da2d 100644
--- a/Master/texmf-dist/source/latex/polynom/polynom.ins
+++ b/Master/texmf-dist/source/latex/polynom/polynom.ins
@@ -10,7 +10,7 @@
 The files  polynom.dtx  and  polynom.ins  and all files generated
 from these two files are referred to as `this work'.
 
-This work is copyright 2000-2004 Carsten Heinz.
+This work is copyright 2000-2006 Carsten Heinz, Hendri Adriaens.
 
 This work may be distributed and/or modified under the conditions
 of the LaTeX Project Public License, either version 1.3 of this
@@ -22,7 +22,7 @@ version 2003/12/01 or later.
 
 This work has the LPPL maintenance status "maintained".
 
-The Current Maintainer of this work is Carsten Heinz <cheinz@gmx.de>.
+The Current Maintainer of this work is Hendri Adriaens.
 
 \endpreamble
 
diff --git a/Master/texmf-dist/tex/latex/polynom/polynom.sty b/Master/texmf-dist/tex/latex/polynom/polynom.sty
index 2d58d7a601c..ca61d9eb5bf 100644
--- a/Master/texmf-dist/tex/latex/polynom/polynom.sty
+++ b/Master/texmf-dist/tex/latex/polynom/polynom.sty
@@ -9,7 +9,7 @@
 %% The files  polynom.dtx  and  polynom.ins  and all files generated
 %% from these two files are referred to as `this work'.
 %% 
-%% This work is copyright 2000-2004 Carsten Heinz.
+%% This work is copyright 2000-2006 Carsten Heinz, Hendri Adriaens.
 %% 
 %% This work may be distributed and/or modified under the conditions
 %% of the LaTeX Project Public License, either version 1.3 of this
@@ -21,10 +21,10 @@
 %% 
 %% This work has the LPPL maintenance status "maintained".
 %% 
-%% The Current Maintainer of this work is Carsten Heinz <cheinz@gmx.de>.
+%% The Current Maintainer of this work is Hendri Adriaens.
 %% 
 \NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{polynom}[2004/08/12 0.16 (Carsten Heinz)]
+\ProvidesPackage{polynom}[2006/04/20 0.17 (CH,HA)]
 \def\pld@AddTo#1#2{\expandafter\def\expandafter#1\expandafter{#1#2}}
 \def\pld@Extend#1#2{%
     \expandafter\pld@AddTo\expandafter#1\expandafter{#2}}
@@ -36,16 +36,28 @@
 \def\pld@false{\let\pld@if\iffalse}
 \pld@false
 \RequirePackage{keyval}[1997/11/10]
-\newcommand\polyset[1]{\ifx\@empty#1\@empty\else \setkeys{pld}{#1}\fi}
+\def\polyset{\setkeys{pld}}
 \def\pld@IfVar#1{%
     \def\pld@temp##1,#1,##2##3\relax{%
         \ifx\@empty##3\@empty \expandafter\@secondoftwo
                         \else \expandafter\@firstoftwo \fi}%
     \expandafter\pld@temp\pld@variables,#1,\@empty\relax}
-\define@key{pld}{vars}
-    {\let\pld@variables\@empty
-     \@tfor\pld@temp:=#1\do
-         {\pld@Extend\pld@variables{\expandafter,\pld@temp}}}
+\define@key{pld}{vars}{%
+  \let\pld@variables\@empty
+  \@tfor\pld@temp:=#1\do{%
+    \pld@Extend\pld@variables{\expandafter,\pld@temp}%
+    \edef\pld@temp{%
+      \noexpand\define@key{pld}{\pld@temp}%
+      {\noexpand\pld@GetValue{\pld@temp}{####1}}%
+    }%
+    \pld@temp
+  }%
+}
+\def\pld@GetValue#1#2{%
+  \pld@GetPoly{\pld@polya}{}{#2}%
+  \ifx\pld@polya\@empty\def\pld@polya{\pld@R 01}\fi
+  \expandafter\let\csname pld@value@#1\endcsname\pld@polya
+}
 \polyset{vars=Xx}
 \define@key{pld}{style}
     {\@ifundefined{pld@style#1}%
@@ -912,7 +924,7 @@
 \def\pld@InsertItems@do@b#1{\pld@AddTo\pld@temp{#1}}
 \def\pld@InsertItems@find#1&{%
     \ifx\relax#1\relax
-    \expandafter\pld@InsertItems@find@fill\pld@recentmonom\pld@V{}0\@empty
+        \expandafter\pld@InsertItems@find@fill\pld@recentmonom\pld@V{}0\@empty
     \else
         \def\pld@recentmonom{#1}%
         \expandafter\pld@IfMonomE\expandafter{\pld@monom}{#1}%
@@ -1388,33 +1400,6 @@
     \expandafter\pld@Euclidean\expandafter\pld@accu\expandafter
         {\the\@tempcnta}{#7}%
     \pld@AccuMul{#3}{#5}}
-\renewcommand\polyset[1]{%
-    \ifx\@empty#1\@empty\else
-        \let\pld@KVsplit@saved\KV@split
-        \let\KV@split\pld@KVsplit
-        \setkeys{pld}{#1}%
-        \let\KV@split\pld@KVsplit@saved
-    \fi}
-\def\pld@KVsplit#1=#2=#3\relax{%
-  \KV@@sp@def\@tempa{#1}%
-  \ifx\@tempa\@empty\else
-    \expandafter\let\expandafter\@tempc
-      \csname\KV@prefix\@tempa\endcsname
-    \ifx\@tempc\relax
-      \expandafter\pld@IfVar\expandafter{\@tempa}%
-        {\pld@GetPoly{\pld@polya}{}{#2}%
-         \ifx\pld@polya\@empty \def\pld@polya{\pld@R 01}\fi
-         \expandafter\let\csname pld@value@\@tempa\endcsname\pld@polya}%
-        {\KV@errx{\@tempa\space undefined}}%
-    \else
-      \ifx\@empty#3\@empty
-        \KV@default
-      \else
-        \KV@@sp@def\@tempb{#2}%
-        \expandafter\@tempc\expandafter{\@tempb}\relax
-      \fi
-    \fi
-  \fi}
 \def\pld@KVCases#1#2#3{%
     \@ifundefined{pld@#1@#2}%
     {\PackageError{Polynom}{Unknown value #2}{Try #3.}}%
diff --git a/Master/texmf-dist/tpm/polynom.tpm b/Master/texmf-dist/tpm/polynom.tpm
index 1a708bdebb6..b8643e85d33 100644
--- a/Master/texmf-dist/tpm/polynom.tpm
+++ b/Master/texmf-dist/tpm/polynom.tpm
@@ -3,7 +3,7 @@
   <rdf:Description about="http://texlive.dante.de/texlive/Package/polynom.zip">
     <TPM:Name>polynom</TPM:Name>
     <TPM:Type>Package</TPM:Type>
-    <TPM:Date>2006/01/11 23:56:16</TPM:Date>
+    <TPM:Date>2006/04/20 11:16:00</TPM:Date>
     <TPM:Version></TPM:Version>
     <TPM:Creator>rahtz</TPM:Creator>
     <TPM:Title>Macros for manipulating polynomials.</TPM:Title>
@@ -17,17 +17,17 @@ ring in one variable with rational coefficients.
     <TPM:Author>Carsten Heinz</TPM:Author>
     <TPM:Size>404826</TPM:Size>
     <TPM:Build/>
-    <TPM:RunFiles size="63776">
+    <TPM:RunFiles size="63191">
 texmf-dist/tex/latex/polynom/polynom.sty
 texmf-dist/tpm/polynom.tpm
     </TPM:RunFiles>
-    <TPM:DocFiles size="202514">
+    <TPM:DocFiles size="276717">
 texmf-dist/doc/latex/polynom/README
 texmf-dist/doc/latex/polynom/polydemo.pdf
 texmf-dist/doc/latex/polynom/polydemo.tex
 texmf-dist/doc/latex/polynom/polynom.pdf
     </TPM:DocFiles>
-    <TPM:SourceFiles size="138536">
+    <TPM:SourceFiles size="138638">
 texmf-dist/source/latex/polynom/polynom.dtx
 texmf-dist/source/latex/polynom/polynom.ins
     </TPM:SourceFiles>