Artifact be25d8e4a1d108780fcd7c3e12a0bfcc85e582a9402a083b6869d5682e82f351:

• Executable file r38/packages/odesolve/odesolve.in — 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: 1315) [annotate] [blame] [check-ins using] [more...]

% Input the whole package of ODESolve 1+ source files  -*- REDUCE -*-

% F.J.Wright@Maths.QMW.ac.uk, Time-stamp: <14 September 2000>

% To input the full ODESolve file set, start REDUCE in the ODESolve
% source directory (or change to it) and do

% in "odesolve.in"$


% To compile ODESolve without using the development system utilities,
% start REDUCE in the ODESolve source directory (or change to it) and
% do

% in "odesolve.red"$
% faslout odesolve;
% in "odesolve.in"$
% faslend;

% If using PSL, you will then need to move odesolve.b to a directory
% in your PSL load path, such as the main fasl directory.


in "odesolve.red"$

% See `reduce/packages/rlisp/tok.red' for details of conditional parsing.

!#if (memq 'csl lispsystem!*)           % CSL
symbolic eval!-when((eval compile),
   in_non_empty_list
      for each p in ODESolve!-subpackages!* collect concat(p, ".red"))$
!#else                                  % Assume PSL
symbolic compiletime
   in_non_empty_list
      for each p in ODESolve!-subpackages!* collect
         compress('!" . append(explode2 p, '(!. !r !e !d !")))$ % "
!#endif

end$

% eval!-when is a CSL fexpr like progn but its first argument must be
% a list of "situations" that can be one or more of the atoms eval,
% compile, load.