RosettaCodeData/Task/Ackermann-function/BQN/ackermann-function-1.bqn

6 lines
85 B
BQN

A {
A 0n: n+1;
A m0: A (m-1)1;
A mn: A (m-1)(A m(n-1))
}