Quot/Nominal/Abs.thy
changeset 1034 c1af17982f98
parent 1026 278253330b6a
child 1039 0d832c36b1bb
--- a/Quot/Nominal/Abs.thy	Wed Feb 03 10:50:24 2010 +0100
+++ b/Quot/Nominal/Abs.thy	Wed Feb 03 11:21:34 2010 +0100
@@ -138,7 +138,7 @@
   apply(rule_tac x="pi \<bullet> pia" in exI)
   apply(simp add: alpha_gen.simps)
   apply(erule conjE)+
-  apply(rule conjI)+
+  apply(rule conjI)
   apply(rule_tac ?p1="- pi" in permute_eq_iff[THEN iffD1])
   apply(simp add: a[symmetric] atom_eqvt eqvts)
   apply(rule conjI)