diff -r b9d9c4540265 -r 6b51117b8955 Nominal/Ex/SingleLet.thy
--- a/Nominal/Ex/SingleLet.thy	Sun Aug 29 00:09:45 2010 +0800
+++ b/Nominal/Ex/SingleLet.thy	Sun Aug 29 00:36:47 2010 +0800
@@ -39,7 +39,7 @@
 apply(rule single_let.induct)
 apply(rule supports_finite)
 apply(rule single_let.supports)
-apply(simp only: finite_supp supp_Pair finite_Un)
+apply(simp only: finite_supp supp_Pair finite_Un, simp)
 apply(rule supports_finite)
 apply(rule single_let.supports)
 apply(simp only: finite_supp supp_Pair finite_Un, simp)