projects / platform / upstream / boost.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
Imported Upstream version 1.51.0
[platform/upstream/boost.git] / libs / spirit / example / scheme / example / scheme / factorial.scm
1 ; The hello-world for interpreters ;-)
2 (define (factorial n)
3   (if (<= n 0) 1
4     (* n (factorial (- n 1)))))
Domain: System / Base;