Chapter 1, Building Abstractions with Procedures

Section - The Elements of Programming

Exercise 1.4


1
2
(define (a-plus-abs-b a b)
  ((if (> b 0) + -) a b))

Clearly the procedure returns: $a + \vert \; b \; \vert$.