そして上のfactの定義は忘れるんだ。

(defun fact (n)
(if (= n 0)
1
(* n (fact (- n 1)))))

こっちで。

0! = 1とか素で知らなかったんだよ! 中学生以来の衝撃だよ!
何でみんな0まで回してんのwwwとか思ってたよ!