RosettaCodeData/Task/Ackermann-function/Luck/ackermann-function.luck
2016-12-05 23:44:36 +01:00

5 lines
144 B
Text

function ackermann(m: int, n: int): int = (
if m==0 then n+1
else if n==0 then ackermann(m-1,1)
else ackermann(m-1,ackermann(m,n-1))
)