summaryrefslogtreecommitdiff
path: root/rust/sample/test_nat.txt
diff options
context:
space:
mode:
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)))