Fold

http://www.haskell.org/haskellwiki/Fold
Haskell has map in terms of 'foldr ((:) . f) []'

How would you implementd foldr, and then map with foldr in scheme/lisp?

>>5-7

(define (compose . l)
  (lambda (x)
    (define (compose-iter l x)
       (if (null? l) x
           (compose-iter (cdr l) ((car l) x))))
     (compose-iter l x)))