maxima patch: floating point numbers



2002-10-07  Sam Steingold  <sds@gnu.org>

	* clmacs.lisp (*default-float-format*) [CLISP]: set to
	'double-float so that, say, (sqrt 4) will be 2d0 and not 2s0.
	See <http://clisp.cons.org/impnotes/num-dict.html#default-float-format>;.


-- 
Sam Steingold (http://www.podval.org/~sds) running RedHat7.3 GNU/Linux
<http://www.camera.org>; <http://www.iris.org.il>; <http://www.memri.org/>;
<http://www.mideasttruth.com/>; <http://www.palestine-central.com/links.html>;
nobody's life, liberty or property are safe while the legislature is in session


--- clmacs.lisp.~1.5.~	Sun May  6 14:27:49 2001
+++ clmacs.lisp	Mon Oct  7 12:49:07 2002
@@ -495,6 +495,7 @@
 (setf (symbol-function 'atan2) (symbol-function 'lisp::atan))
 
 (setq *READ-DEFAULT-FLOAT-FORMAT* 'double-float)
+#+CLISP (setq *DEFAULT-FLOAT-FORMAT* 'double-float)
 
 (defmacro float (x &optional (y 1.0d0)) `(lisp::float ,x ,y))