Artifact d9af0adad38545caeae99dc28a56ef7a9cf5a2f684bbfbebed3d88170905a844:

• File r34.1/lib/tri.log — 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: 1030) [annotate] [blame] [check-ins using] [more...]

REDUCE 3.4.1, 15-Jul-92 ...

1: % TeX-REDUCE-Interface 0.50
% set GREEK asserted
% set LOWERCASE asserted
% \tolerance 10
% \hsize=150mm

(TRI)


% load tri;

global '(textest!*);



symbolic procedure texexa(code);
   begin
     prin2 "\TRIexa{"; prin2 textest!*;
     if !*TeXindent then prin2 "}{TeXindent}{" else
     if !*TeXbreak  then prin2 "}{TeXBreak}{" else
     if !*TeX then prin2 "TeX" else prin2 "}{---}{";
     if !*TeXbreak then prin2 tolerance!* else prin2 "---";
     prin2 "}{"; prin2 code; prin2 "}"; terpri()
   end;


TEXEXA


algebraic procedure exa(expression,code);
   begin symbolic texexa code; return expression end;


EXA


% ----------------------------------------------------------------------
% Examples from the Integrator Test File
% ----------------------------------------------------------------------

symbolic(textest!*:="Integration");


"Integration"


texsetbreak(120,1000);

% \tolerance 1000
% \hsize=120mm


on texindent;



off echo;



Time: 3961 ms  plus GC time: 136 ms

Quitting