Untitled

(defun foo (x)
  (let ((x 3)
        (y (+ x 3)))
    (* x y)))

(format t "~d~%" (foo 2))

(defun bar (x)
  (+
   (let ((x 3)) (+ x (* x 10)))
   x))

(format t "~d~%" (bar 5))