Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;first snippet
- (define (+ a b)
- (if (= a 0)
- b
- (inc (+ (dec a) b))))
- ;second snippet
- (define (+ a b)
- (if (= a 0)
- b
- (+ (dec a) (inc b))))
- ;recursive process generated by first procedure:
- (+ 4 5)
- (inc (+ 3 5))
- (inc (inc (+ 2 5)))
- (inc (inc (inc (+ 1 5))))
- (inc (inc (inc (inc (+ 0 5)))))
- (inc (inc (inc (inc 5))))
- (inc (inc (inc 6)))
- (inc (inc 7))
- (inc 8)
- 9
- ;iterative process generated by second procedure:
- (+ 4 5)
- (+ 3 6)
- (+ 2 7)
- (+ 1 8)
- (+ 0 9)
- 9
Add Comment
Please, Sign In to add comment