diff -r d3d2b78b1c19 -r a8cc904a6820 src/HOL/Library/ListVector.thy --- a/src/HOL/Library/ListVector.thy Fri Oct 19 10:46:42 2012 +0200 +++ b/src/HOL/Library/ListVector.thy Fri Oct 19 15:12:52 2012 +0200 @@ -128,7 +128,7 @@ apply simp apply(case_tac zs) apply (simp) -apply(simp add: left_distrib) +apply(simp add: distrib_right) done lemma iprod_left_diff_distrib: "\xs - ys, zs\ = \xs,zs\ - \ys,zs\" @@ -146,7 +146,7 @@ apply simp apply(case_tac ys) apply (simp) -apply (simp add: right_distrib mult_assoc) +apply (simp add: distrib_left mult_assoc) done end