lisp条件调用函数

Question

如何编写宏＆＃34; MAXF＆＃34; ：在参数列表中找到最大值，然后调用特定函数？ e.g。

(defun func (x y z) (format t "~A ~A ~A~%" x y z))


(let ((a 1) (b 1))
  (maxf ((+ a b 1) (func a b 1))   ((+ a b 2) (func a b 2))... ((+ a b 100) 
(func a b 100)) )

结果应为：＆＃34; 1 1 100＆＃34;