mirror of
https://github.com/azur1s/bobbylisp.git
synced 2024-09-28 07:27:35 +00:00
8 lines
133 B
Plaintext
8 lines
133 B
Plaintext
(fun factorial [x]
|
|
(if (<= x 1)
|
|
1
|
|
(* x (factorial (- x 1)))))
|
|
|
|
(def amount 7)
|
|
(do
|
|
(print (factorial amount))) |