> (test-1)

'(let ((x 1) (y 2)) (let ((z (+ x y))) (if (< x y) (list "x smaller") (list "y smaller"))))
'("x smaller")

'(let ((x 1) (y 2)) (let ((z (+ x y))) (cond ((< x y) (list "x smaller")) (else (list "y smaller")))))
'("x smaller")

'((lambda (x y) ((lambda (z) (if (< x y) (list "x smaller") (list "y smaller"))) (+ x y))) 1 2)
'("x smaller")

'((lambda (x y) ((lambda (z) (cond ((< x y) (list "x smaller")) (else (list "y smaller")))) (+ x y))) 1 2)
'("x smaller")

'((lambda (x y) ((lambda (z) (cond ((< x y) (list "x smaller")) (else (list "y smaller")))) (+ x y))) 1 2)
'("x smaller")