summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/polexpr/polexpr.sty
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/generic/polexpr/polexpr.sty')
-rw-r--r--Master/texmf-dist/tex/generic/polexpr/polexpr.sty29
1 files changed, 15 insertions, 14 deletions
diff --git a/Master/texmf-dist/tex/generic/polexpr/polexpr.sty b/Master/texmf-dist/tex/generic/polexpr/polexpr.sty
index c94a4e8d61d..420f469cf12 100644
--- a/Master/texmf-dist/tex/generic/polexpr/polexpr.sty
+++ b/Master/texmf-dist/tex/generic/polexpr/polexpr.sty
@@ -2,7 +2,7 @@
% License: LPPL 1.3c (author-maintained)
% Usage: \input polexpr.sty (Plain or other macro formats)
% or \usepackage{polexpr} (LaTeX macro format)
-% polexpr.sty (this file) inputs:
+% Release 0.8.1 (2021/04/12) of polexpr.sty. This file inputs
% polexprcore.tex
% polexprexpr.tex
% polexprsturm.tex
@@ -43,7 +43,7 @@
% variable is initialized, but \ProvidesPackage not yet seen
\ifx\w\relax % xintexpr.sty not yet loaded.
\expandafter\def\expandafter\z\expandafter
- {\z\RequirePackage{xintexpr}[2021/02/20]}%
+ {\z\RequirePackage{xintexpr}[2021/03/29]}%
\fi
\else
\aftergroup\endinput % polexpr already loaded.
@@ -51,14 +51,14 @@
\fi
\fi
\z%
-\XINTsetupcatcodes%
+\XINTsetupcatcodes% (does \endlinechar13 in particular)
\XINT_providespackage
\ProvidesPackage{polexpr}%
- [2021/03/29 v0.8 Polynomial expressions with rational coefficients (JFB)]%
+ [2021/04/12 v0.8.1 Polynomial expressions with rational coefficients (JFB)]%
\begingroup
\def\x#1/#2/#3 #4\xint:{#1#2#3}%
\ifnum\expandafter\x\expanded{\csname ver@xintexpr.sty\endcsname}\xint:
- <20210220 % actually 20200131 (xint 1.4) is presumably ok
+ <20210329 %
\immediate\write128{! Package polexpr error: xintexpr too old, aborting input}%
\else\expandafter\xint_gobble_i
\fi
@@ -88,7 +88,7 @@
\def\next{\expandafter\endgroup\@tempb}\fi\fi\next
}%
% \polexprsetup added at 0.7
-\catcode`! 3
+\catcode`! 3 %
\def\polexprsetup#1{\POL@setup_parsekeys #1,=!,\xint_bye}%
\def\POL@setup_parsekeys #1=#2#3,{%
\ifx!#2\expandafter\xint_bye\fi
@@ -100,7 +100,7 @@
}%
\def\POL@setup_setkey_norr #1#2{\edef\POL@norr}%
\def\POL@setup_setkey_sqfnorr #1#2{\edef\POL@sqfnorr}%
-\polexprsetup{norr=_norr, sqfnorr=_sqf_norr}
+\polexprsetup{norr=_norr, sqfnorr=_sqf_norr}%
\catcode`! 11 % special catcode for ! as used in xintexpr.sty
%
\newif\ifxintveryverbose
@@ -332,7 +332,7 @@
\POL@defpolfunc{#1}{expr}%
\ifpolnewpolverbose\POL@info{#1}\fi
}%
-\def\PolGlobalLet#1#2{\begingroup\xintglobaldefstrue\PolLet{#1}{#2}\endgroup}
+\def\PolGlobalLet#1#2{\begingroup\xintglobaldefstrue\PolLet{#1}{#2}\endgroup}%
%
\def\PolAssign#1{\def\POL@polname{#1}\POL@assign}% zap spaces in #1?
\def\POL@assign#1\toarray#2{%
@@ -771,7 +771,7 @@
\else
\def\PolTypesetOne{\xintSignedFwOver}%
\fi
-\catcode`^ 7
+\catcode`^ 7 %
\def\PolTypesetMonomialCmd{%
\ifcase\PolIndex\space
%
@@ -906,11 +906,12 @@
\def\PolToCSV#1{\romannumeral0\xintlistwithsep{, }{\PolToList{#1}}}%
%
% \PolIContent (0.5)
-% Why did I call this IContent and not Content? Ah, I see Maple terminology
-% But I realize now I misread the Maple doc, its icontent() is the gcd of
-% all coeffs of a multivariate polynomial. Whereas content(,) second argument
-% specifies which variable to consider expression as being univariate in it
-%
+% Why did I call this IContent and not Content? Ah, I see, Maple terminology!
+% But I realize now I misread in 2018 the Maple doc, its icontent() is the gcd
+% of all coeffs of a multivariate polynomial. Whereas content(,) second argument
+% specifies which variable to consider expression as being univariate in it.
+% Refactored at 0.8 as xint 1.4 has a backported fractional gcd
+% (itself refactored at 1.4d)
\def\POL@icontent#1{\romannumeral0\expandafter\XINT_fgcd_out
\romannumeral0\expandafter\XINT_fgcdof\romannumeral`&&@#1^}%
% Since xintexpr 1.4d, \xintGCDof always outputs an irreducible fraction A/B.