diff -r 2230b7047376 -r 9a5f43dac883 src/HOL/Number_Theory/Factorial_Ring.thy --- a/src/HOL/Number_Theory/Factorial_Ring.thy Wed Feb 17 21:51:57 2016 +0100 +++ b/src/HOL/Number_Theory/Factorial_Ring.thy Wed Feb 17 21:51:57 2016 +0100 @@ -344,13 +344,13 @@ then have *: "is_prime (nat \p\)" by simp assume "p dvd k * l" then have "nat \p\ dvd nat \k * l\" - by (simp add: dvd_int_iff) + by (simp add: dvd_int_unfold_dvd_nat) then have "nat \p\ dvd nat \k\ * nat \l\" by (simp add: abs_mult nat_mult_distrib) with * have "nat \p\ dvd nat \k\ \ nat \p\ dvd nat \l\" using is_primeD [of "nat \p\"] by auto then show "p dvd k \ p dvd l" - by (simp add: dvd_int_iff) + by (simp add: dvd_int_unfold_dvd_nat) next fix k :: int assume P: "\l. l dvd k \ \ is_prime l"