From fdf35536b66499884dd5b4e1740ac67e5cebb1a2 Mon Sep 17 00:00:00 2001
From: tzlil <tzlils@protonmail.com>
Date: Fri, 14 Apr 2023 23:46:53 +0300
Subject: add homework material

---
 tests/examples/bools-or-f-t.lam | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)
 create mode 100644 tests/examples/bools-or-f-t.lam

(limited to 'tests/examples/bools-or-f-t.lam')

diff --git a/tests/examples/bools-or-f-t.lam b/tests/examples/bools-or-f-t.lam
new file mode 100644
index 0000000..5c39cd8
--- /dev/null
+++ b/tests/examples/bools-or-f-t.lam
@@ -0,0 +1,16 @@
+(\ true false and or not .
+
+    or false true
+
+    -- Should reduce to true, i.e., \ x y . x
+)
+-- true
+(\ x y . x)
+-- false
+(\ x y . y)
+-- and
+(\ p q . p q p)
+-- or
+(\ p q . p p q)
+-- not
+(\ p x y . p y x)
-- 
cgit 1.4.1