2010-09-21から1日間の記事一覧
こんな感じかな? http://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q1347295398 http://d.hatena.ne.jp/yad-EL/20100921/p1 (define (mysum xs) (fold (lambda (x acc) (+ (if (list? x) (mysum x) x) acc)) 0 xs)) ;; (mysum 20) ;; (mysum '()) …