Name: Anonymous 2012-10-16 1:27
Because he preferred to fold.
(define (map1 fn lis)
(reverse (fold (lambda (acc x)
(cons (fn x) acc))
'()
lis)))