| changeset 57512 | cc97b347b301 |
| parent 55926 | 3ef14caf5637 |
| child 57865 | dcfb33c26f50 |
--- a/src/HOL/Algebra/UnivPoly.thy Fri Jul 04 20:07:08 2014 +0200 +++ b/src/HOL/Algebra/UnivPoly.thy Fri Jul 04 20:18:47 2014 +0200 @@ -1353,7 +1353,7 @@ case 0 from R show ?case by simp next case Suc with R show ?case - by (simp del: monom_mult add: monom_mult [THEN sym] add_commute) + by (simp del: monom_mult add: monom_mult [THEN sym] add.commute) qed lemma (in ring_hom_cring) hom_pow [simp]: