Compare the two DVR normalizations at the strict exact-root stage.
The returned equivalence is over the literal valuation subring of base. The field equivalence Omega ≃ P is built internally from the exact-root degree sandwich. This theorem is a local coordinate junction, not the height-two boundary-Away terminal.
Source context 6 commands
Surrounding namespaces, section variables, and local commands at this declaration.
noncomputable section
namespace EtaleFundamentalGroups.Kummer
open Polynomial
open ValuationTheory.DiscreteValuationField
open ValuationTheory.DiscreteValuationField.ValuedExtension
universe uK uV uOmega uW uFroot uT uD uPdef
selectedExactRamificationRoot_DVRNormalizations_algEquiv
{K : Type uK} {Omega : Type uOmega} {Froot : Type uFroot}
{T : Type uT} {D : Type uD} {P : Type uP}
[Field K] [Field Omega] [Field Froot]
[CommRing T] [CommRing D] [Field P]
[Algebra K Omega]
(base : DVF.{uK, uV} K) (target : DVF.{uOmega, uW} Omega)
[base.valuation.HasExtension target.valuation]
[Module.Finite base.valuationSubring target.valuationSubring]
(varpi : base.valuationSubring)
(hvarpi : base.valuation.IsUniformizer (varpi : K))
[Algebra base.valuationSubring T]
[Algebra T Omega]
[IsScalarTower base.valuationSubring T Omega]
[IsIntegralClosure T base.valuationSubring Omega]
[Algebra K Froot]
[Algebra
(AdjoinRoot
(X ^ ramificationIndex base target - C varpi)) Froot]
[IsFractionRing
(AdjoinRoot
(X ^ ramificationIndex base target - C varpi)) Froot]
[Algebra base.valuationSubring Froot]
[IsScalarTower base.valuationSubring
(AdjoinRoot
(X ^ ramificationIndex base target - C varpi)) Froot]
[IsScalarTower base.valuationSubring K Froot]
[HenselianLocalRing
(AdjoinRoot
(X ^ ramificationIndex base target - C varpi))]
[IsSepClosed
(IsLocalRing.ResidueField
(AdjoinRoot
(X ^ ramificationIndex base target - C varpi)))]
[Algebra
(AdjoinRoot
(X ^ ramificationIndex base target - C varpi)) D]
[Module.Finite
(AdjoinRoot
(X ^ ramificationIndex base target - C varpi)) D]
[Algebra.Etale
(AdjoinRoot
(X ^ ramificationIndex base target - C varpi)) D]
[Algebra base.valuationSubring D]
[IsScalarTower base.valuationSubring
(AdjoinRoot
(X ^ ramificationIndex base target - C varpi)) D]
(q : Ideal D) [q.IsPrime]
[q.LiesOver
(IsLocalRing.maximalIdeal
(AdjoinRoot
(X ^ ramificationIndex base target - C varpi)))]
(hunique : ∀ Q : Ideal D, Q.IsPrime →
Q.LiesOver
(IsLocalRing.maximalIdeal
(AdjoinRoot
(X ^ ramificationIndex base target - C varpi))) →
Q = q)
[Algebra D P] [IsFractionRing D P]
[Algebra
(AdjoinRoot
(X ^ ramificationIndex base target - C varpi)) P]
[IsScalarTower
(AdjoinRoot
(X ^ ramificationIndex base target - C varpi)) D P]
[IsIntegralClosure D
(AdjoinRoot
(X ^ ramificationIndex base target - C varpi)) P]
[Algebra Froot P]
[IsScalarTower
(AdjoinRoot
(X ^ ramificationIndex base target - C varpi)) Froot P]
[Algebra K P] [Algebra Omega P]
[IsScalarTower K Froot P] [IsScalarTower K Omega P]
[Algebra base.valuationSubring P]
[IsScalarTower base.valuationSubring
(AdjoinRoot
(X ^ ramificationIndex base target - C varpi)) P]
[IsScalarTower base.valuationSubring D P]
[IsScalarTower base.valuationSubring Omega P] :
T ≃ₐ[base.valuationSubring] D