author | wenzelm |
Fri, 06 Dec 2019 16:22:15 +0100 | |
changeset 71252 | c5914bdd896b |
parent 71251 | 297d24fb262c |
child 71253 | a62431901140 |
--- a/src/HOL/Number_Theory/Residues.thy Fri Dec 06 16:13:36 2019 +0100 +++ b/src/HOL/Number_Theory/Residues.thy Fri Dec 06 16:22:15 2019 +0100 @@ -465,7 +465,6 @@ shows "card A \<le> n" proof - define R where "R = residue_ring (int p)" - term monom from assms(1) interpret residues_prime p R by unfold_locales (simp_all add: R_def) interpret R: UP_domain R "UP R" by (unfold_locales)