I try this LISP snippet from the Structure and Interpretation book(define (a-plus-abs-b a b)((if (>