diff -r d3d2b78b1c19 -r a8cc904a6820 src/HOL/Algebra/IntRing.thy --- a/src/HOL/Algebra/IntRing.thy Fri Oct 19 10:46:42 2012 +0200 +++ b/src/HOL/Algebra/IntRing.thy Fri Oct 19 15:12:52 2012 +0200 @@ -35,7 +35,7 @@ apply (rule abelian_groupI, simp_all) defer 1 apply (rule comm_monoidI, simp_all) - apply (rule left_distrib) + apply (rule distrib_right) apply (fast intro: left_minus) done @@ -165,7 +165,7 @@ and "a_inv \ x = - x" and "a_minus \ x y = x - y" proof - - show "domain \" by unfold_locales (auto simp: left_distrib right_distrib) + show "domain \" by unfold_locales (auto simp: distrib_right distrib_left) qed (simp add: int_carrier_eq int_zero_eq int_add_eq int_finsum_eq int_a_inv_eq int_a_minus_eq)+