1 (define (new-if predicate then-clause else-clause)
2   (cond (predicate then-clause)
3 	(else else-clause)))