RosettaCodeData/Task/Ackermann-function/Klong/ackermann-function.klong

3 lines
60 B
Plaintext

ack::{:[0=x;y+1:|0=y;.f(x-1;1);.f(x-1;.f(x;y-1))]}
ack(2;2)