11 lines
271 B
Text
11 lines
271 B
Text
|
function ackermann m,n
|
||
|
|
switch
|
||
|
|
Case m = 0
|
||
|
|
return n + 1
|
||
|
|
Case (m > 0 And n = 0)
|
||
|
|
return ackermann((m - 1), 1)
|
||
|
|
Case (m > 0 And n > 0)
|
||
|
|
return ackermann((m - 1), ackermann(m, (n - 1)))
|
||
|
|
end switch
|
||
|
|
end ackermann
|