# HG changeset patch # User Cezary Kaliszyk # Date 1273509027 -7200 # Node ID 41c2445fdee4614c0cf52f85a98470defa13b620 # Parent ae94bae5bb9358876bcc6e9691eef731d05ff545# Parent 56b849d348aebbbcb6377692eb7fc4f19e941e76 merge diff -r ae94bae5bb93 -r 41c2445fdee4 Nominal/Ex/Ex1rec.thy --- a/Nominal/Ex/Ex1rec.thy Mon May 10 18:29:45 2010 +0200 +++ b/Nominal/Ex/Ex1rec.thy Mon May 10 18:30:27 2010 +0200 @@ -5,6 +5,7 @@ atom_decl name ML {* val _ = cheat_supp_eq := true *} +ML {* val _ = cheat_equivp := true *} nominal_datatype lam = Var "name" diff -r ae94bae5bb93 -r 41c2445fdee4 Nominal/Ex/ExLetRec.thy --- a/Nominal/Ex/ExLetRec.thy Mon May 10 18:29:45 2010 +0200 +++ b/Nominal/Ex/ExLetRec.thy Mon May 10 18:30:27 2010 +0200 @@ -7,7 +7,6 @@ atom_decl name -ML {* val _ = cheat_alpha_eqvt := true *} ML {* val _ = cheat_equivp := true *} nominal_datatype trm = @@ -83,12 +82,6 @@ apply (simp add: atom_eqvt fresh_star_def) done -(* -declare permute_trm_raw_permute_lts_raw.simps[eqvt] -declare alpha_gen_eqvt[eqvt] -equivariance alpha_trm_raw -*) - end