fac-ok-1.scm - A definition of fac with letrec.
Lecture 2 - slide 10 : 35
Program 3
(
letrec
((fac (lambda (n) (if (= n 0) 1 (* n (fac (- n 1))))))) (fac 5)) ; OK: 120