[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Axiom-developer] manexp

From: Juergen Weiss
Subject: [Axiom-developer] manexp
Date: 28 Oct 2003 21:56:35 +0100
User-agent: Gnus/5.0808 (Gnus v5.8.8) Emacs/20.7

seems that the following definition for 
manexp gives resonable results on common lisp

#+(or :cmu :akcl)
(defun manexp (u)
  (multiple-value-bind (f e s) (decode-float u)
                       (list (* s f) e)))


Juergen Weiss     | Universitaet Mainz, Zentrum fuer Datenverarbeitung,
address@hidden| 55099 Mainz, Tel: +49(6131)39-26361, FAX: +49(6131)39-26407

reply via email to

[Prev in Thread] Current Thread [Next in Thread]