カッコ悪い

あまりにも多いカッコ。

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