(defun logical-functions (a b) (print `(a and b = ,(and a b))) (print `(a or b = ,(or a b))) (print `(not a = ,(not a))) )