LISP Program to Find Greatest of Three Numbers

(defun max3(a b c)
(cond((>a b) (cond((>a c)
(format t "Max ~a"
(t(format t "Max ~a"
((>b c> (format t "Max ~a"
(t format t "MAX ~a" c))))