Sign in
nest-open-source
/
nest-learning-thermostat
/
5.1.3
/
boost
/
refs/heads/master
/
.
/
boost_1_45_0
/
libs
/
spirit
/
example
/
scheme
/
example
/
scheme
/
factorial.scm
blob: f87b2dcd16cab2ec2c164541a68752a1484472c7 [
file
] [
log
] [
blame
]
; The hello-world for interpreters ;-)
(
define
(
factorial n
)
(
if
(
<=
n
0
)
1
(
*
n
(
factorial
(
-
n
1
)))))