HenselianRing.isAdicComplete_of_pow_eq_bot
Source context 3 commands
Surrounding namespaces, section variables, and local commands at this declaration.
@[expose] public section
universe u
namespace HenselianRingLean source · full declaration
theorem isAdicComplete_of_pow_eq_bot
{R : Type u} [CommRing R] (J : Ideal R) (n : ℕ) (hn : J ^ n = ⊥) :
IsAdicComplete J R where
haus' x hx := by
simpa only [Ideal.smul_eq_mul, Ideal.mul_top, hn, SModEq.bot] using hx n
prec' f hf := by
refine ⟨f n, fun m ↦ ?_⟩
obtain hmn | hnm := le_total m n
· exact hf hmn
· have h : f n = f m := by
simpa only [Ideal.smul_eq_mul, Ideal.mul_top, hn, SModEq.bot] using hf hnm
rw [h]