changeset 2559 | add799cf0817 |
parent 2524 | 693562f03eee |
child 2560 | 82e37a4595c7 |
--- a/Nominal/Ex/SingleLet.thy Wed Nov 10 13:40:46 2010 +0000 +++ b/Nominal/Ex/SingleLet.thy Wed Nov 10 13:46:21 2010 +0000 @@ -48,7 +48,7 @@ lemma [quot_respect]: shows "((op =) ===> alpha_assg_raw ===> alpha_assg_raw) permute_bn_raw permute_bn_raw" - apply simp + apply (simp add: fun_rel_def) apply clarify apply (erule alpha_trm_raw_alpha_assg_raw_alpha_bn_raw.inducts) apply (rule TrueI)+