Artifact 40e3cd3997ff3ba038facc2dc4ca9a8d06140439225f1083ef0b6f2573e4aa12:

• Executable file r38/packages/odesolve/test.dat — part of check-in [f2fda60abd] at 2011-09-02 18:13:33 on branch master — Some historical releases purely for archival purposes

  git-svn-id: https://svn.code.sf.net/p/reduce-algebra/code/trunk/historical@1375 2bfe0521-f11c-4a00-b80e-6202646ff360 (user: arthurcnorman@users.sourceforge.net, size: 722) [annotate] [blame] [check-ins using] [more...]

% Author: Anthony C. Hearn.
% Modified by FJW for testing odesolve entirely within current directory.

on errcont;   % So that computation continues after an error.

symbolic <<!*_xxx_!* := time(); !*_yyy_!* := gctime()>>$

linelength 80$   % So that logs match Unix versions better.

symbolic load!-package 'odesolve;

algebraic ODESolve_version;

in "$testfile.tst";

% The +- construct in the following is required to finesse Orthovec's
% renaming of -.

symbolic <<terpri(); terpri(); prin2 "Time for test: ";
	   prin2 (time()+-!*_xxx_!*); prin2 " ms";
	   if (!*_yyy_!* := gctime()+-!*_yyy_!*)>0
	     then <<prin2 ", plus GC time: "; prin2 !*_yyy_!*;
		    prin2 " ms"; terpri()>>>>$

bye;