author | blanchet |
Tue, 09 Sep 2014 22:28:49 +0200 | |
changeset 58288 | 87b59745dd6d |
parent 58287 | 10105897bc22 |
child 58289 | eb93bc67d361 |
--- a/src/HOL/Number_Theory/Gauss.thy Tue Sep 09 22:25:14 2014 +0200 +++ b/src/HOL/Number_Theory/Gauss.thy Tue Sep 09 22:28:49 2014 +0200 @@ -206,7 +206,7 @@ by (simp add: cong_altdef_int) (metis gcd_int.commute prime_imp_coprime_int) lemma A_prod_relprime: "gcd (setprod id A) p = 1" - by (metis DEADID.map_id all_A_relprime setprod_coprime_int) + by (metis id_def all_A_relprime setprod_coprime_int) subsection {* Relationships Between Gauss Sets *}