RosettaCodeData/Task/Ackermann-function/K/ackermann-function.k

3 lines
58 B
Text
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
ack:{:[0=x;y+1;0=y;_f[x-1;1];_f[x-1;_f[x;y-1]]]}
ack[2;2]