
diff -r 6cfb5d8a5b5b -r add799cf0817 Nominal/Ex/Let.thy
--- a/Nominal/Ex/Let.thy	Wed Nov 10 13:40:46 2010 +0000
+++ b/Nominal/Ex/Let.thy	Wed Nov 10 13:46:21 2010 +0000
@@ -42,7 +42,7 @@
   "permute_bn_raw"
 
 lemma [quot_respect]: "((op =) ===> alpha_assn_raw ===> alpha_assn_raw) permute_bn_raw permute_bn_raw"
-  apply simp
+  apply (simp add: fun_rel_def)
   apply clarify
   apply (erule alpha_trm_raw_alpha_assn_raw_alpha_bn_raw.inducts)
   apply (rule TrueI)+




