Sign in
android
/
platform
/
external
/
boost
/
077d563efdb280a3d144892e2d0ca01e6a49f454
/
.
/
libs
/
spirit
/
example
/
scheme
/
example
/
scheme
/
call_factorial.scm
blob: 62191384481f1a25a6de201af6a36ae946b6cf0c [
file
] [
log
] [
blame
]
; The hello-world for interpreters ;-)
(
define
(
factorial n
)
(
if
(
<=
n
0
)
1
(
*
n
(
factorial
(
-
n
1
)))))
(
define
(
main
)
(
display
(
factorial
10
)))