min

Conformance: R5RS Scheme

Purpose: Find the minimum of a sequence of numbers.

Arguments:
A - number
B... - numbers

Implementation:

(define (min a . b)
  (fold-left (lambda (a b)
               (if (< a b) a b))
             a b))

Example:

(min 25 5 -25 0 -5) 
=> -25

See also:
digits, max, <.