"(defun factorial (n)\n  (if (< n 1)\n      1\n      (* n (factorial (- n 1)))))\n\n(factorial 5)"