changeset 28967 | 3bdb1eae352c |
parent 28402 | 09e4aa3ddc25 |
child 29667 | 53103fc8ffa3 |
--- a/src/HOL/Presburger.thy Wed Dec 03 21:00:39 2008 -0800 +++ b/src/HOL/Presburger.thy Wed Dec 03 21:50:36 2008 -0800 @@ -411,7 +411,7 @@ by (simp cong: conj_cong) lemma int_eq_number_of_eq: "(((number_of v)::int) = (number_of w)) = iszero ((number_of (v + (uminus w)))::int)" - by simp + by (rule eq_number_of_eq) lemma mod_eq0_dvd_iff[presburger]: "(m::nat) mod n = 0 \<longleftrightarrow> n dvd m" unfolding dvd_eq_mod_eq_0[symmetric] ..