自分用メモのつづき。(d:id:Nobuhisa:20080114:1200338245) ようやく4章のコードひと通り復習でけたー。（掲載するのは一部） 4.5 マッピング （ま！ピングー！） CL-USER 1 > (defun map-> (fn start test-fn succ-fn) (do ((i start (funcall succ-fn i)) …