changeset 58834 | 773b378d9313 |
parent 58645 | 94bef115c08f |
child 58889 | 5b7a9633cfa8 |
--- a/src/HOL/Number_Theory/Gauss.thy Thu Oct 30 16:36:44 2014 +0000 +++ b/src/HOL/Number_Theory/Gauss.thy Thu Oct 30 21:02:01 2014 +0100 @@ -53,7 +53,7 @@ lemma p_eq2: "int p = (2 * ((int p - 1) div 2)) + 1" using odd_p p_ge_2 div_mult_self1_is_id [of 2 "p - 1"] - by auto presburger + by simp lemma p_odd_int: obtains z::int where "int p = 2*z+1" "0<z" using odd_p p_ge_2