From 2b2ae9894f66dba65af62fb08b9d79b2aee2a2a8 Mon Sep 17 00:00:00 2001 From: dos-reis Date: Sun, 2 Jan 2011 10:09:37 +0000 Subject: * interp/nrunfast.boot (evalSlotDomain): Expand to VM forms before value argument evaluation. (lazyMatch): Check for %llength too. * interp/g-opt.boot ($VMsideEffectFreeOperators): Include %2bit and %2bool. * interp/g-util.boot: Expand them. * interp/define.boot (compJoin): Check for %llenght too. * algebra/boolean.spad.pamphlet: Tidy. * algebra/domain.spad.pamphlet: Likewise. * algebra/draw.spad.pamphlet: Likewise. * algebra/files.spad.pamphlet: Likewise. * algebra/list.spad.pamphlet: Likewise. * algebra/outform.spad.pamphlet: Likewise. * algebra/sex.spad.pamphlet: Likewise. * algebra/sf.spad.pamphlet: Likewise. --- src/algebra/sf.spad.pamphlet | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/algebra/sf.spad.pamphlet') diff --git a/src/algebra/sf.spad.pamphlet b/src/algebra/sf.spad.pamphlet index 1585af6a..745dc254 100644 --- a/src/algebra/sf.spad.pamphlet +++ b/src/algebra/sf.spad.pamphlet @@ -315,6 +315,7 @@ DoubleFloat(): Join(FloatingPointSystem, DifferentialRing, OpenMath, import %fsech: % -> % from Foreign Builtin import %fasinh: % -> % from Foreign Builtin import %facsch: % -> % from Foreign Builtin + import %fcstpi: () -> % from Foreign Builtin manexp: % -> MER @@ -374,7 +375,7 @@ DoubleFloat(): Join(FloatingPointSystem, DifferentialRing, OpenMath, 1 == %i2f(1@Integer) -- rational approximation to e accurate to 23 digits exp1() == %i2f(534625820200) / %i2f(196677847971) - pi() == PI$Lisp + pi() == %fcstpi() coerce(x:%):OutputForm == outputForm x convert(x:%):InputForm == convert(x pretend DoubleFloat)$InputForm x < y == %flt(x,y) -- cgit v1.2.3