
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)




