(letrec ((fac (λ (n)
                (if (zero? n)
                    1
                    (* n (fac (- n 1)))))))
  (fac 6))