Diff for "Factorial.lisp"

Differences between revisions 1 and 3 (spanning 2 versions)


(defun fac (number)
    (cond
        ((= number 1)
            number)
        (t
            (* number (fac (- number 1))))

Factorial.lisp (last edited 2011-08-03 11:00:38 by localhost)

⇤ ← Revision 1 as of 2006-09-02 10:13:01 → Size: 149 Editor: 211 Comment:	← Revision 3 as of 2007-02-06 16:48:42 → ⇥ Size: 149 Editor: 211 Comment:
No differences found!