RosettaCodeData/Task/Ackermann-function/TI-89-BASIC/ackermann-function.basic

2 lines
71 B
Plaintext

Define A(m,n) = when(m=0, n+1, when(n=0, A(m-1,1), A(m-1, A(m, n-1))))