(defun max(x y)
(if(> x y)x y)
)
(defun c:work()
(setq a (getreal "input the first number:"))
(setq b (getreal "input the second number:"))
(setq c (max a b))
(print (list "the max number is:" c))
)
(if(> x y)x y)
)
(defun c:work()
(setq a (getreal "input the first number:"))
(setq b (getreal "input the second number:"))
(setq c (max a b))
(print (list "the max number is:" c))
)