From 87465a40baf315e32213fbd100fee20d7d97c371 Mon Sep 17 00:00:00 2001 From: Devine Lu Linvega Date: Sat, 27 Sep 2025 17:00:48 -0700 Subject: [PATCH] (ack.tal) Added Ackermann function --- projects/examples/exercises/ack.tal | 6 ++++++ 1 file changed, 6 insertions(+) create mode 100644 projects/examples/exercises/ack.tal diff --git a/projects/examples/exercises/ack.tal b/projects/examples/exercises/ack.tal new file mode 100644 index 0000000..4d288e7 --- /dev/null +++ b/projects/examples/exercises/ack.tal @@ -0,0 +1,6 @@ +#02 #02 ack BRK + +@ack ( m n -- r ) + OVR ?{ NIP INC JMP2r } + DUP ?{ INC SUB #01 !ack } + #0101 SUB2 OVR INC SWP ack !ack