RosettaCodeData/Task/Ackermann-function/Clay/ackermann-function.clay
Ingy döt Net 764da6cbbb CDE
2013-04-10 16:57:12 -07:00

8 lines
155 B
Text

ackermann(m, n) {
if(m == 0)
return n + 1;
if(n == 0)
return ackermann(m - 1, 1);
return ackermann(m - 1, ackermann(m, n - 1));
}