6 lines
98 B
Text
6 lines
98 B
Text
|
fun fact (n) =
|
||
|
|
if n =? 0 then 1 else n * fact (n - 1) fi
|
||
|
|
|
||
|
|
val main =
|
||
|
|
print_int (fact (5))
|