Lisp Reference

A collection of lisp snippets I’ll be adding to as I learn more.

Factorial (recursive function)

(defun factorial (n)                                
  (if (= n 0)                                       
    1                                             
    (if (> n 0)                                   
      (* n (factorial (- n 1))))))
This entry was posted in Code and tagged , . Bookmark the permalink. Post a comment or leave a trackback: Trackback URL.

Post a Comment

Your email is never published nor shared. Required fields are marked *

*
*

You may use these HTML tags and attributes: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong> <pre lang="" line="" escaped="">