changeset 71252 | c5914bdd896b |
parent 69785 | 9e326f6f8a24 |
child 75963 | 884dbbc8e1b3 |
--- 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)