Tutorial/Minimal.thy
branchNominal2-Isabelle2011-1
changeset 3070 4b4742aa43f2
parent 3069 78d828f43cdf
child 3071 11f6a561eb4b
--- a/Tutorial/Minimal.thy	Sat Dec 17 16:58:11 2011 +0000
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,18 +0,0 @@
-theory Minimal
-imports "Nominal2"
-begin
-
-atom_decl name
-
-nominal_datatype lam =
-  Var "name"
-| App "lam" "lam"
-| Lam x::"name" l::"lam"  bind x in l ("Lam [_]. _" [100, 100] 100)
-
-
-
-lemma alpha_test:
-  shows "Lam [x]. (Var x) = Lam [y]. (Var y)"
-  by (simp add: lam.eq_iff Abs1_eq_iff lam.fresh fresh_at_base)
-
-end
\ No newline at end of file