Building Standard Lists into Scheme

 left top right 
(define (add . numbers)
  (add-up numbers))

(define (list . elements) elements)

(define list (lambda elements elements))

(define (add-up numbers)
  (apply + numbers))

(define (point.to-origin pt)
  (sqrt (apply + (map square pt))))
Jim Miller W3C