From 531e0c1b7e1882ab23f72329bf77e5f0cf5e3f79 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 17 Jul 2017 21:28:18 +0000 Subject: polynom (17jul17) git-svn-id: svn://tug.org/texlive/trunk@44832 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/polynom/polynom.sty | 18 +++++++++++++----- 1 file changed, 13 insertions(+), 5 deletions(-) (limited to 'Master/texmf-dist/tex/latex/polynom') diff --git a/Master/texmf-dist/tex/latex/polynom/polynom.sty b/Master/texmf-dist/tex/latex/polynom/polynom.sty index 95d49465ab0..9493f2d3d4e 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-2006 Carsten Heinz, Hendri Adriaens. +%% This work is copyright 2000-2017 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 @@ -24,7 +24,7 @@ %% The Current Maintainer of this work is Hendri Adriaens. %% \NeedsTeXFormat{LaTeX2e} -\ProvidesPackage{polynom}[2006/04/20 0.17 (CH,HA)] +\ProvidesPackage{polynom}[2017/07/17 0.19 (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}} @@ -96,8 +96,9 @@ \let\polyremainder\pld@remainder \pld@RestoreAftergroup#1\polyremainder\relax \endgroup\ignorespaces}} +\newif\ifpld@InsidePolylongdiv \newcommand*\polylongdiv[1][]{% - \begingroup + \begingroup\pld@InsidePolylongdivtrue \let\pld@stage\maxdimen \polyset{#1}% \pld@GetPoly{\pld@polya\pld@polyb}% {\pld@LongDividePoly\pld@polya\pld@polyb @@ -728,8 +729,12 @@ \pld@NMultiplyPoly\pld@sub\pld@divisor\pld@factor \pld@SubtractPoly\pld@remainder\pld@sub \expandafter\pld@DivPoly@l}% - {}% + {\ifpld@InsidePolylongdiv\expandafter\pld@insert@remainder + \pld@last@remainder+\relax\relax\fi}% \fi} +\def\pld@insert@remainder#1+#2\relax{% + \ifx\relax#1\relax\else\pld@InsertItems\@empty\@empty{#1}\fi + \ifx\relax#2\relax\else\pld@insert@remainder#2\relax\fi} \def\pld@IfNeedsDivision#1#2{% \pld@ExpandTwo\pld@IfND{#1+\@empty}{#2+\@empty}} \def\pld@IfND#1+#2\@empty#3+#4\@empty{% @@ -786,6 +791,7 @@ \pld@SubtractPoly@l#2\@empty} \def\pld@SubtractPoly@l#1+#2\@empty#3+#4\@empty{% \ifx\relax#1\relax + \let\pld@last@remainder\@empty \ifx\relax#3\relax \let\pld@next\@empty \else \pld@AddToPoly\pld@tempoly{#3}% \pld@if \pld@InsertItems{#3}{#3}{}\fi @@ -815,7 +821,9 @@ }% \fi \fi \pld@next} -\def\pld@SubtractPoly@r#1+\relax+\@empty{\pld@AddToPoly\pld@tempoly{#1}} +\def\pld@SubtractPoly@r#1+\relax+\@empty{% + \pld@AddToPoly\pld@tempoly{#1}% + \def\pld@last@remainder{#1}} \def\pld@InsertFake#1{% \let\pld@temp\@empty \expandafter\pld@InsertFake@l#1&\relax&} -- cgit v1.2.3