Sync up with README.en.

[elisp/apel.git] / poe-18.el

diff --git a/poe-18.el b/poe-18.el
index f8c62ee..9c44895 100644 (file)
--- a/poe-18.el
+++ b/poe-18.el
@@ -378,6 +378,15 @@ resolution finer than a second."
            ct2 (- ct2 65536)))
     (list ct1 ct2 0)))
 
+;;; @@ Floating point numbers.
+;;;
+
+(defalias 'numberp 'integerp)
+
+(defun abs (arg)
+  "Return the absolute value of ARG."
+  (if (< arg 0) (- arg) arg))
+
 
 ;;; @ Basic lisp subroutines.
 ;;;