src/HOL/Algebra/UnivPoly.thy
changeset 15481 fc075ae929e4
parent 15095 63f5f4c265dd
child 15596 8665d08085df
     1.1 --- a/src/HOL/Algebra/UnivPoly.thy	Sun Jan 30 20:48:50 2005 +0100
     1.2 +++ b/src/HOL/Algebra/UnivPoly.thy	Tue Feb 01 18:01:57 2005 +0100
     1.3 @@ -357,7 +357,7 @@
     1.4        case 0 then show ?case by (simp add: Pi_def)
     1.5      next
     1.6        case (Suc k) then show ?case
     1.7 -        by (subst finsum_Suc2) (simp add: Pi_def a_comm)+
     1.8 +        by (simplesubst finsum_Suc2) (simp add: Pi_def a_comm)+
     1.9      qed
    1.10    }
    1.11    note l = this