06_2.lsp

(define a (* 1 2 3 4))

(define b (+ 10 -5 -2 -1))

(print-num (+ a b))