Artifact bd23f9a35243258d69d9c0bf0a11ec7259d92b02d6a71e4ed39c7bb80139e201:

• Executable file r36/cslbase/fp-eval.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: 424) [annotate] [blame] [check-ins using] [more...]

deflist('(
    (RETURN        32)
    (PLUS          33)
    (DIFFERENCE    34)
    (TIMES         35)
    (QUOTIENT      36)
    (MINUS         37)
    (SQUARE        38)
    (CUBE          39)
    (SIN           40)
    (COS           41)
    (TAN           42)
    (EXP           43)
    (LOG           44)
    (SQRT          45)), 'fp!-eval);

symbolic procedure make!-fp!-eval(exprn, vars);
  if numberp exprn then