Using Procedural Abstraction

• Defining summation function for lists

(define sum (tail-recur 0 +))

• This is equivalent to:

(define sum

(lambda (l)

(if (null? l) 0

(+ (car l) (sum (cdr l)))))))

Previous slide

Next slide

Back to first slide

View graphic version