Unique valuation ring over a totally ramified layer
ProvedexistsUnique_valuationSubring_of_pow_eq_mulLet be a discrete valuation ring (a commutative domain that is a discrete valuation ring in the Mathlib sense) with fraction field , and let be a finite separable extension of , regarded as an -algebra compatibly with (a scalar tower ). Let be a natural number with and , let be irreducible, let satisfy with both and integral over , and let satisfy (the image of under times ). The conclusion is twofold: first, ; second, there is a valuation subring whose elements include all images of elements of , such that the image of every element of the maximal ideal of lies in the maximal ideal of , is a discrete valuation ring, and the maximal ideal of is the principal ideal generated by , every is congruent modulo the maximal ideal of to the image of some element of , an element has its image in precisely when lies in the image of , and any valuation subring of containing the image of and carrying the maximal ideal of into its own maximal ideal equals .
This is the statement that a layer generated by an -th root of a uniformiser, up to a unit of the integral closure, is totally ramified of degree exactly over , with a unique valuation ring of lying over the valuation ring , residue field unchanged and as uniformiser. It is used in the analysis of valuation subrings of function fields, in particular to identify the constants subring in a tower and to compare valuation subrings attached to the ends of an annulus.
import Mathlib set_option maxHeartbeats 4000000 set_option synthInstance.maxHeartbeats 400000 set_option backward.isDefEq.respectTransparency.types false set_option autoImplicit false open IsLocalRing Module
theorem existsUnique_valuationSubring_of_pow_eq_mul
(R : Type*) [CommRing R] [IsDomain R] [IsDiscreteValuationRing R]
(K : Type*) [Field K] [Algebra R K] [IsFractionRing R K]
(L : Type*) [Field L] [Algebra K L] [FiniteDimensional K L] [Algebra.IsSeparable K L]
[Algebra R L] [IsScalarTower R K L]
(n : ℕ) (hn0 : 0 < n) (hn : finrank K L ≤ n)
(π : R) (hπ : Irreducible π) (u v : L) (huv : u * v = 1) (hu : IsIntegral R u) (hv : IsIntegral R v)
(ϖ : L) (hϖ : ϖ ^ n = algebraMap R L π * u) :
finrank K L = n ∧
∃ (W : ValuationSubring L) (hRW : ∀ r : R, algebraMap R L r ∈ W),
(∀ r ∈ maximalIdeal R, (⟨algebraMap R L r, hRW r⟩ : ↥W) ∈ maximalIdeal ↥W) ∧
IsDiscreteValuationRing ↥W ∧
(∃ hϖW : ϖ ∈ W, maximalIdeal ↥W = Ideal.span {(⟨ϖ, hϖW⟩ : ↥W)}) ∧
(∀ w : ↥W, ∃ r : R, w - ⟨algebraMap R L r, hRW r⟩ ∈ maximalIdeal ↥W) ∧
(∀ k : K, algebraMap K L k ∈ W ↔ ∃ r : R, algebraMap R K r = k) ∧
(∀ (W' : ValuationSubring L) (hRW' : ∀ r : R, algebraMap R L r ∈ W'),
(∀ r ∈ maximalIdeal R, (⟨algebraMap R L r, hRW' r⟩ : ↥W') ∈ maximalIdeal ↥W') → W' = W) := by sorry