fact « smoke « tests - guile.git - Unnamed repository; edit this file 'description' to name the repository.

summary refs log tree commit diff stats

path: root/tests/smoke/fact

blob: 245737e7466312cdcb8bd817bd4b31e2bc7c9890 (plain)

(define (fact n)
    (if (zero? n) 1
         (* n (fact (- n 1)))))

(display (fact 12))
(newline)