>>553
http://codepad.org/DC96M7wC
(define zip
　(lambda x (map list x)))

この式を以下のように変更する。
http://codepad.org/a2st1Q1E
(define zip
　(lambda (list1 . more-lists)
　　(apply map list list1 more-lists)))