mirror of
https://github.com/azur1s/bobbylisp.git
synced 2024-10-16 02:37:40 -05:00
10 lines
181 B
Plaintext
10 lines
181 B
Plaintext
|
fun factorial (n: int): int = do
|
||
|
|
case n of
|
||
|
|
| 0 -> return 1;
|
||
|
|
\ return n * factorial(n - 1);
|
||
|
|
end;
|
||
|
|
end;
|
||
|
|
|
||
|
|
fun main: void = do
|
||
|
|
factorial(5) |> @write(_);
|
||
|
|
end;
|