10 lines
170 B
Text
10 lines
170 B
Text
func ackerm m n .
|
|
if m = 0
|
|
return n + 1
|
|
elif n = 0
|
|
return ackerm (m - 1) 1
|
|
else
|
|
return ackerm (m - 1) ackerm m (n - 1)
|
|
.
|
|
.
|
|
print ackerm 3 6
|