diff options
Diffstat (limited to 'Master/texmf-dist/tex/generic/polexpr/polexpr.sty')
-rw-r--r-- | Master/texmf-dist/tex/generic/polexpr/polexpr.sty | 29 |
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. |