home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_progs / prog_oth / xlisp16.lzh / XLISP1.6 / FIB.LSP < prev    next >
Encoding:
Lisp/Scheme  |  1991-11-01  |  93 b   |  7 lines
  1. (defun fib (x)
  2.        (if (< x 2)
  3.            x
  4.            (+ (fib (1- x)) (fib (- x 2)))))
  5.  
  6.  
  7.