CL-USER> 10
10
CL-USER> (+ 5 34)
39
CL-USER> (- 9 1)
8
CL-USER> (/ 6 2)
3
CL-USER> (+ (* 2 4) (- 4 6))
6
CL-USER> (defvar a 3)
A
CL-USER> a
3
CL-USER> (defvar b (+ a 1))
B
CL-USER> b
4
CL-USER> (+ a b (* a b))
19
CL-USER> (= a b)
NIL
CL-USER> (if (and (> b a) (< b (* a b)))
          b
          a)
4
CL-USER> (cond ( (= a 4) 6)
           ( (= b 4) (+ 6 7 a))
           (else 25))
16
CL-USER> (+ 2 (if (> b a) b a))
6
CL-USER> (+ (cond ((> a b) a)
          ((< a b) b)
          (else -1))
        (+ a 1))
8
CL-USER>