こんな感じのsum-accを書きたかったんだけど，なかなか綺麗に書けない． (sum-acc '(1 2 3 4)) ; => (1 3 6 10) 累積和のリストっていうのかな． 累積ってことでgauche.collectionのmap-accumを使ってみる． (use gauche.collection) (define (sum-acc lis) …