屑俺日記

☆ なんとか、なにかが

"Good-bye, World\n"みたいだけど、

(define allsum
  (lambda (n lnt)
    (cond
     ((null? lnt) n)
     (else (allsum (+ n (car lnt))
                  (cdr lnt))))))

gosh>(allsum  1 '(2 3 4 5 6 7 8 9 10))
55

閉じ括弧の位置をいくつか間違えていて、 想定通りに動くようになるまでしばらくかかった。