iris

small scheme interpreter
git clone git://git.2f30.org/iris
Log | Files | Refs | LICENSE

fib.scm (105B)

      1 (define fib
      2   (lambda (n)
      3     (if (lt n 2)
      4 	n
      5 	(plus
      6 	 (fib (diff n 1))
      7 	 (fib (diff n 2))))))
      8 
      9 (fib 20)