summaryrefslogtreecommitdiff
path: root/rust/sample/test_nat.txt
diff options
context:
space:
mode:
authorArnaud Bailly <arnaud.bailly@iohk.io>2025-01-25 10:45:41 +0100
committerArnaud Bailly <arnaud.bailly@iohk.io>2025-01-25 10:45:41 +0100
commit7752d73216578d5961751b5d0535088d384b4aa6 (patch)
tree786e46fe1276e93ade0a48398cd4c9ac13081707 /rust/sample/test_nat.txt
parentd6f68e919db51d366c8ca3c1509bea12aa81d692 (diff)
downloadlambda-nantes-7752d73216578d5961751b5d0535088d384b4aa6.tar.gz
Move λ-calcul workshop code to subdirectory
Diffstat (limited to 'rust/sample/test_nat.txt')
-rw-r--r--rust/sample/test_nat.txt9
1 files changed, 0 insertions, 9 deletions
diff --git a/rust/sample/test_nat.txt b/rust/sample/test_nat.txt
deleted file mode 100644
index 81a6e9d..0000000
--- a/rust/sample/test_nat.txt
+++ /dev/null
@@ -1,9 +0,0 @@
-(def pair (lam (a b f) (f a b)))
-(def fst (lam p (p (lam (a b) a))))
-(def snd (lam p (p (lam (a b) b))))
-
-(def zero (lam (f s) s))
-(def succ (lam (n f s) (f (n f s))))
-
-(def is-zero (lam n
- (n (lam x False) true)))