6 lines
122 B
APL
6 lines
122 B
APL
|
ackermann←{
|
||
|
|
0=1⊃⍵:1+2⊃⍵
|
||
|
|
0=2⊃⍵:∇(¯1+1⊃⍵)1
|
||
|
|
∇(¯1+1⊃⍵),∇(1⊃⍵),¯1+2⊃⍵
|
||
|
|
}
|