RosettaCodeData/Task/Ackermann-function/GML/ackermann-function.gml
2015-02-20 00:35:01 -05:00

16 lines
221 B
Text

///ackermann(m,n)
var m, n;
m = argument0;
n = argument1;
if(m=0)
{
return (n+1)
}
else if(n == 0)
{
return (ackermann(m-1,1,1))
}
else
{
return (ackermann(m-1,ackermann(m,n-1,2),1))
}