aboutsummaryrefslogtreecommitdiff
path: root/src/interp/g-opt.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-02-05 16:12:41 +0000
committerdos-reis <gdr@axiomatics.org>2011-02-05 16:12:41 +0000
commite007c1c9b02538f76a17eb630f5b6db8ef131c6d (patch)
treedc7fde5f2c35cff5ee78f9693fde725f300f2cf9 /src/interp/g-opt.boot
parent5eebd42bedc639efb11826fcc56520afbb4637ca (diff)
downloadopen-axiom-e007c1c9b02538f76a17eb630f5b6db8ef131c6d.tar.gz
* interp/g-opt.boot ($VMsideEffectFreeOperators): Include inverse
hyperbolic functions. * interp/lisp-backend.boot: Expand them. * algebra/sf.spad.pamphlet: Use them.
Diffstat (limited to 'src/interp/g-opt.boot')
-rw-r--r--src/interp/g-opt.boot9
1 files changed, 6 insertions, 3 deletions
diff --git a/src/interp/g-opt.boot b/src/interp/g-opt.boot
index 58700b52..a3ef3050 100644
--- a/src/interp/g-opt.boot
+++ b/src/interp/g-opt.boot
@@ -406,9 +406,12 @@ $VMsideEffectFreeOperators ==
%imul %iadd %isub %igcd %ilcm %ipow %imin %imax %ieven? %iodd? %iinc
%irem %iquo %idivide %idec
%feq %flt %fle %fgt %fge %fmul %fadd %fsub %fexp %fmin %fmax %float?
- %fpow %fdiv %fneg %i2f %fminval %fmaxval %fbase %fprec %ftrunc
- %fsin %fcos %ftan %fcot %fsec %fcsc %fatan %facot
- %fsinh %fcosh %ftanh %fcsch %fcoth %fsech %fasinh %facsch
+ %fpowi %fdiv %fneg %i2f %fminval %fmaxval %fbase %fprec %ftrunc
+ %fsqrt %fpowf %flog %flog2 %flog10
+ %fsin %fcos %ftan %fcot %fsec %fcsc
+ %fasin %facos %fatan %facot %fasec %facsc
+ %fsinh %fcosh %ftanh %fcsch %fcoth %fsech
+ %fasinh %facosh %fatanh %facsch %facoth %fasech
%val2z %z2val %zlit %zreal %zimag
%zexp %zlog %zsin %zcos %ztan %zasin %zacos %zatan
%zsinh %zcosh %ztanh %zasinh %zacosh %zatanh