branch | Nominal2-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