RosettaCodeData/Task/Factorial/ATS/factorial-2.ats

6 lines
95 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
fun
factorial
(n:int): int =
if n > 0 then n * factorial(n-1) else 1
// end of [factorial]