summaryrefslogtreecommitdiff
path: root/lambda-calcul/rust/sample/test02/input
diff options
context:
space:
mode:
Diffstat (limited to 'lambda-calcul/rust/sample/test02/input')
-rw-r--r--lambda-calcul/rust/sample/test02/input6
1 files changed, 6 insertions, 0 deletions
diff --git a/lambda-calcul/rust/sample/test02/input b/lambda-calcul/rust/sample/test02/input
new file mode 100644
index 0000000..81a0443
--- /dev/null
+++ b/lambda-calcul/rust/sample/test02/input
@@ -0,0 +1,6 @@
+(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))))
+
+(fst (snd (pair 1 (pair 2 0))))