(defun factorial (n) (cond *1)))))
最終更新:2009年11月30日 05:31

*1 = n 0) 1) (t (* n (factorial (- n 1