Initial data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · f23f22d71c
commit f23f22d71c
parent 72d218235f
199087 changed files with 3378941 additions and 0 deletions
--- a/Task/Ackermann-function/Klingphix/ackermann-function.klingphix
+++ b/Task/Ackermann-function/Klingphix/ackermann-function.klingphix
@ -0,0 +1,17 @@
+:ack
+    %n !n %m !m
+
+    $m 0 ==
+    ( [$n 1 +]
+      [$n 0 ==
+        ( [$m 1 - 1 ack]
+          [$m 1 - $m $n 1 - ack ack]
+        ) if
+      ]
+    ) if
+;
+
+3 6 ack print nl
+msec print
+
+" " input