SCIP习题1.32
(define (accumulate combiner null-value term a next b)
(if (> a b)
null-value
(combiner (term a)
(accumulate combiner null-value term (next a) next b))))
(if (> a b)
null-value
(combiner (term a)
(accumulate combiner null-value term (next a) next b))))