Nominal-General/Nominal2_Atoms.thy
changeset 2129 f38adea0591c
parent 1972 40db835442a0
--- a/Nominal-General/Nominal2_Atoms.thy	Thu May 13 17:41:28 2010 +0100
+++ b/Nominal-General/Nominal2_Atoms.thy	Thu May 13 18:19:48 2010 +0100
@@ -37,7 +37,7 @@
 lemma permute_flip_cancel2 [simp]: "(a \<leftrightarrow> b) \<bullet> (b \<leftrightarrow> a) \<bullet> x = x"
   by (simp add: flip_commute)
 
-lemma flip_eqvt: 
+lemma flip_eqvt[eqvt]: 
   fixes a b c::"'a::at_base"
   shows "p \<bullet> (a \<leftrightarrow> b) = (p \<bullet> a \<leftrightarrow> p \<bullet> b)"
   unfolding flip_def