diff options
author | tzlil <tzlils@protonmail.com> | 2023-04-14 23:46:53 +0300 |
---|---|---|
committer | tzlil <tzlils@protonmail.com> | 2023-04-14 23:46:53 +0300 |
commit | fdf35536b66499884dd5b4e1740ac67e5cebb1a2 (patch) | |
tree | b907edf782ebb58780d7fbfed084560626b94c74 /tests/examples/pairs-fst.lam |
add homework material
Diffstat (limited to 'tests/examples/pairs-fst.lam')
-rw-r--r-- | tests/examples/pairs-fst.lam | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/tests/examples/pairs-fst.lam b/tests/examples/pairs-fst.lam new file mode 100644 index 0000000..5ee215a --- /dev/null +++ b/tests/examples/pairs-fst.lam @@ -0,0 +1,15 @@ +(\ pair fst snd . + + fst (pair a b) + + -- Should reduce to a +) + +-- pair +(\ x y f . f x y) + +-- fst +(\ p . p (\ x y . x)) + +-- snd +(\ p . p (\ x y . y)) |