diff man/lispref/numbers.texi @ 280:7df0dd720c89 r21-0b38

Import from CVS: tag r21-0b38
author cvs
date Mon, 13 Aug 2007 10:32:22 +0200
parents 65c19d2020f7
children
line wrap: on
line diff
--- a/man/lispref/numbers.texi	Mon Aug 13 10:31:30 2007 +0200
+++ b/man/lispref/numbers.texi	Mon Aug 13 10:32:22 2007 +0200
@@ -240,7 +240,7 @@
 Here's a function to do this:
 
 @example
-(defvar fuzz-factor 1.0e-6)
+(defconst fuzz-factor 1.0e-6)
 (defun approx-equal (x y)
   (or (and (= x 0) (= y 0))
       (< (/ (abs (- x y))
@@ -257,40 +257,79 @@
 limited range of integer values.
 @end quotation
 
-@defun = number-or-marker1 number-or-marker2
-This function tests whether its arguments are numerically equal, and
-returns @code{t} if so, @code{nil} otherwise.
+In addition to numbers, all of the following functions also accept
+characters and markers as arguments, and treat them as their number
+equivalents.
+
+@defun =  number &rest more-numbers
+This function returns @code{t} if all of its arguments are numerically
+equal, @code{nil} otherwise.
+
+@example
+(= 5)
+     @result{} t
+(= 5 6)
+     @result{} nil
+(= 5 5.0)
+     @result{} t
+(= 5 5 6)
+     @result{} nil
+@end example
 @end defun
 
-@defun /= number-or-marker1 number-or-marker2
-This function tests whether its arguments are numerically not equal.  It
-returns @code{t} if so, and @code{nil} otherwise.
-@end defun
+@defun /=  number &rest more-numbers
+This function returns @code{t} if no two arguments are numerically
+equal, @code{nil} otherwise.
 
-@defun <  number-or-marker1 number-or-marker2
-This function tests whether its first argument is strictly less than
-its second argument.  It returns @code{t} if so, @code{nil} otherwise.
+@example
+(/= 5 6)
+     @result{} t
+(/= 5 5 6)
+     @result{} nil
+(/= 5 6 1)
+     @result{} t
+@end example
 @end defun
 
-@defun <=  number-or-marker1 number-or-marker2
-This function tests whether its first argument is less than or equal
-to its second argument.  It returns @code{t} if so, @code{nil}
-otherwise.
+@defun <  number &rest more-numbers
+This function returns @code{t} if the sequence of its arguments is
+monotonically increasing, @code{nil} otherwise.
+
+@example
+(< 5 6)
+     @result{} t
+(< 5 6 6)
+     @result{} nil
+(< 5 6 7)
+     @result{} t
+@end example
 @end defun
 
-@defun >  number-or-marker1 number-or-marker2
-This function tests whether its first argument is strictly greater
-than its second argument.  It returns @code{t} if so, @code{nil}
-otherwise.
+@defun <=  number &rest more-numbers
+This function returns @code{t} if the sequence of its arguments is
+monotonically nondecreasing, @code{nil} otherwise.
+
+@example
+(<= 5 6)
+     @result{} t
+(<= 5 6 6)
+     @result{} t
+(<= 5 6 5)
+     @result{} nil
+@end example
 @end defun
 
-@defun >=  number-or-marker1 number-or-marker2
-This function tests whether its first argument is greater than or
-equal to its second argument.  It returns @code{t} if so, @code{nil}
-otherwise.
+@defun >  number &rest more-numbers
+This function returns @code{t} if the sequence of its arguments is
+monotonically decreasing, @code{nil} otherwise.
 @end defun
 
-@defun max number-or-marker &rest numbers-or-markers
+@defun >=  number &rest more-numbers
+This function returns @code{t} if the sequence of its arguments is
+monotonically nonincreasing, @code{nil} otherwise.
+@end defun
+
+@defun max number &rest more-numbers
 This function returns the largest of its arguments.
 
 @example
@@ -303,7 +342,7 @@
 @end example
 @end defun
 
-@defun min number-or-marker &rest numbers-or-markers
+@defun min number &rest more-numbers
 This function returns the smallest of its arguments.
 
 @example