diff -r 0440bc1a2438 -r 14c7d7e29c44 Nominal/Ex/Let.thy --- a/Nominal/Ex/Let.thy Thu Jul 12 10:11:32 2012 +0100 +++ b/Nominal/Ex/Let.thy Sun Jul 15 13:03:47 2012 +0100 @@ -122,6 +122,7 @@ apply (drule_tac x="assn" in meta_spec) apply (drule_tac x="trm" in meta_spec) apply (simp add: alpha_bn_refl) + using [[simproc del: alpha_lst]] apply(simp_all) apply (erule_tac c="()" in Abs_lst1_fcb2) apply (simp_all add: pure_fresh fresh_star_def eqvt_at_def)[4] @@ -179,6 +180,7 @@ apply simp_all[7] prefer 2 apply(simp) + using [[simproc del: alpha_lst]] apply(simp) apply(erule conjE)+ apply (erule_tac c="(sa, ta)" in Abs_lst1_fcb2)