Nominal/Abs.thy
changeset 1845 b7423c6b5564
parent 1841 fcc660ece040
child 1857 591cc76da570
--- a/Nominal/Abs.thy	Wed Apr 14 20:21:11 2010 +0200
+++ b/Nominal/Abs.thy	Wed Apr 14 22:23:52 2010 +0200
@@ -762,7 +762,7 @@
   by (simp_all add: fresh_plus_perm)
 
 
-lemma alpha_gen_eqvt[eqvt]:
+lemma alpha_gen_eqvt(*[eqvt]*):
   shows "(bs, x) \<approx>gen R f q (cs, y) \<Longrightarrow> (p \<bullet> bs, p \<bullet> x) \<approx>gen (p \<bullet> R) (p \<bullet> f) (p \<bullet> q) (p \<bullet> cs, p \<bullet> y)"
   and   "(bs, x) \<approx>res R f q (cs, y) \<Longrightarrow> (p \<bullet> bs, p \<bullet> x) \<approx>res (p \<bullet> R) (p \<bullet> f) (p \<bullet> q) (p \<bullet> cs, p \<bullet> y)"
   and   "(ds, x) \<approx>lst R f q (es, y) \<Longrightarrow> (p \<bullet> ds, p \<bullet> x) \<approx>lst (p \<bullet> R) (p \<bullet> f) (p \<bullet> q) (p \<bullet> es, p \<bullet> y)"