;;; @@ Floating point numbers.
;;;
-(defalias-maybe 'numberp 'integerp)
-
(defun abs (arg)
"Return the absolute value of ARG."
(if (< arg 0) (- arg) arg))
(- (/ (- divisor 1 arg) divisor))
(/ arg divisor)))
-(defalias-maybe 'mod '%)
-
;;; @ Basic lisp subroutines.
;;;