Artifact 1288a11c72bb5f1552261e58b8eed804c2766064bae43d2bffceb46ed56e4a5c:

• Executable file r38/packages/crack/conlaw.red — 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: 406) [annotate] [blame] [check-ins using] [more...]

module conlaw;  % Conservation laws using CRACK

% This header file by FJW, 28 July 1998

create!-package('(conlaw conlaw0 conlaw1 conlaw2 conlaw3 conlaw4),nil);

% FJW: Load support packages, but not when compiling:
!#if (getd 'packages_to_load)
packages_to_load crack;
!#else                                  % for REDUCE 3.6
apply1('load!-package, 'crack);
!#endif

endmodule;

end;