From 213d2d966fb5ccc4dd8b18087ed45dca981fcf9b Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 28 Oct 2013 22:43:29 +0000 Subject: pst-ode (28oct13) git-svn-id: svn://tug.org/texlive/trunk@32024 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/generic/pst-ode/pst-ode.tex | 13 ++++++------- 1 file changed, 6 insertions(+), 7 deletions(-) (limited to 'Master/texmf-dist/tex/generic/pst-ode') diff --git a/Master/texmf-dist/tex/generic/pst-ode/pst-ode.tex b/Master/texmf-dist/tex/generic/pst-ode/pst-ode.tex index 44c7eaeffc7..b183a7742d7 100644 --- a/Master/texmf-dist/tex/generic/pst-ode/pst-ode.tex +++ b/Master/texmf-dist/tex/generic/pst-ode/pst-ode.tex @@ -1,7 +1,7 @@ %% %% This is file `pst-ode.tex', %% -%% Alexander Grahn, (C) 2012 +%% Alexander Grahn, (C) 2012, 2013 %% %% This program can be redistributed and/or modified under the terms %% of the LaTeX Project Public License Distributed from CTAN archives @@ -11,8 +11,8 @@ %% ODEs using the Runge-Kutta-Fehlberg (RKF45) method with automatic %% step size adjustment %% -\def\fileversion{0.2} -\def\filedate{2012/09/14} +\def\fileversion{0.3} +\def\filedate{2013/10/28} \csname PSTODELoaded\endcsname \let\PSTODELoaded\endinput @@ -125,7 +125,7 @@ \ifPst@algebraic /ode@rpn (\expandafter\ode@zapspace\ode@arg\@nil) AlgParser cvx bind def /ODESET {%system of ODEs - tx@Dict begin /x exch def /y x def ode@rpn end xlength array astore + /x exch def /y x def tx@Dict begin ode@rpn end xlength array astore } bind def \else /ODESET { @@ -137,9 +137,8 @@ \ifPst@algebraicOutputFormat /ode@fmtrpn (\expandafter\ode@zapspace\ode@fmt\@nil) AlgParser cvx bind def /formatoutput {% - tx@Dict begin - ode@laststate /x exch def /y x def /t tcur def ode@fmtrpn - end + ode@laststate /x exch def /y x def /t tcur def + tx@Dict begin ode@fmtrpn end } bind def \else /formatoutput {[#2] assembleresult} def \fi% %perform ode integration -- cgit v1.2.3