Initial commit - fix problems & refactor code

2025-12-22 19:10:46 +03:00
commit ff36917cb5
39 changed files with 1499 additions and 0 deletions
@@ -0,0 +1,9 @@
+(defmacro fact (n)
+  ; (prints 'n \n)
+  (if (< n 3) n
+    (* n (fact (- n 1)))))
+
+(defmacro facc (n acc)
+  ; (prints 'acc \n)
+  (if (< n 2) acc
+    (facc (- n 1) (* n acc))))