src/HOL/Algebra/UnivPoly.thy
changeset 15944 9b00875e21f7
parent 15763 b901a127ac73
child 16417 9bc16273c2d4
     1.1 --- a/src/HOL/Algebra/UnivPoly.thy	Mon May 09 16:02:45 2005 +0200
     1.2 +++ b/src/HOL/Algebra/UnivPoly.thy	Mon May 09 16:38:56 2005 +0200
     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 (simplesubst finsum_Suc2) (simp add: Pi_def a_comm)+
     1.8 +        by (subst (2) finsum_Suc2) (simp add: Pi_def a_comm)+
     1.9      qed
    1.10    }
    1.11    note l = this