| changeset 40786 | 0a54cfc9add3 |
| parent 38159 | e9b4835a54ee |
| child 44766 | d4d33a4d7548 |
--- a/src/HOL/Old_Number_Theory/EulerFermat.thy Sat Nov 27 17:44:36 2010 -0800 +++ b/src/HOL/Old_Number_Theory/EulerFermat.thy Sun Nov 28 15:20:51 2010 +0100 @@ -257,8 +257,7 @@ apply (subst setprod_insert) apply (rule_tac [2] Bnor_prod_power_aux) apply (unfold inj_on_def) - apply (simp_all add: zmult_ac Bnor_fin finite_imageI - Bnor_mem_zle_swap) + apply (simp_all add: zmult_ac Bnor_fin Bnor_mem_zle_swap) done