fix: unbound substitutions, explanation tag

2025-12-25 01:55:46 -05:00
parent a56ec808ec
commit 99703c2587
6 changed files with 82 additions and 23 deletions
--- a/samples/simple.txt
+++ b/samples/simple.txt
@@ -1 +1,16 @@
-(\add.(add (add (add \f.\x.x))) \n.\f.\x.(f ((n f) x)))
+(\0.
+  (\inc.
+    (\add.
+      (\mult.
+        (\exp.
+          (exp (inc (inc (inc (inc (inc 0))))) (inc (inc (inc (inc (inc 0))))))
+          \n m.(m n)
+        )
+        \m n f.(m (n f))
+      )
+      \n m.(m inc n)
+    )
+    \n f x.(f (n f x))
+  )
+  \f x.x
+)