Module

IntermediateFieldNormResidueNaturality.lean

Nyll.ClassFieldTheory.LocalClassFieldTheory.Finite.LocalReciprocity.IntermediateFieldNormResidueNaturality
12 declarations indexed from sourceView source ↗

Restriction naturality for the concrete local norm-residue symbol

The abstract class formation supplies restriction naturality. This file constructs the field-facing restriction map for two finite Galois intermediate fields in the fixed separable closure and transports the naturality identity to the concrete local norm-residue symbol.

The intermediate-field restriction is packaged here so callers do not have to install the auxiliary Algebra E F and scalar-tower instances attached to an inclusion E ≤ F.

Declarations

LocalClassFieldTheory.absoluteGalois
Source context 7 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
namespace LocalClassFieldTheory
open LocalFieldTheory RamificationTheory CyclicCohomology KummerTheory
open ClassFormation LocalClassFieldTheory
open scoped IsMulCommutative
universe u v
variable {K : Type u} {Omega : Type v}
  [Field K] [Field Omega] [Algebra K Omega]
abbrev absoluteGalois (K : Type) [Field K]
LocalClassFieldTheory.absoluteUnits
Source context 7 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
namespace LocalClassFieldTheory
open LocalFieldTheory RamificationTheory CyclicCohomology KummerTheory
open ClassFormation LocalClassFieldTheory
open scoped IsMulCommutative
universe u v
variable {K : Type u} {Omega : Type v}
  [Field K] [Field Omega] [Algebra K Omega]
abbrev absoluteUnits (K : Type) [Field K] :
    Rep ℤ (absoluteGalois K)
LocalClassFieldTheory.abstractBase
Source context 7 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
namespace LocalClassFieldTheory
open LocalFieldTheory RamificationTheory CyclicCohomology KummerTheory
open ClassFormation LocalClassFieldTheory
open scoped IsMulCommutative
universe u v
variable {K : Type u} {Omega : Type v}
  [Field K] [Field Omega] [Algebra K Omega]
abbrev abstractBase (K : Type) [Field K] :
    ClosedSubgroup (absoluteGalois K)
LocalClassFieldTheory.embeddedBaseNormClass

The finite abstract norm class represented by a base-field unit in an explicit separable-closure realization.

Source context 9 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
namespace LocalClassFieldTheory
open LocalFieldTheory RamificationTheory CyclicCohomology KummerTheory
open ClassFormation LocalClassFieldTheory
open scoped IsMulCommutative
universe u v
variable {K : Type u} {Omega : Type v}
  [Field K] [Field Omega] [Algebra K Omega]
section AbstractToConcrete
variable (K L : Type) [Field K] [Field L] [Algebra K L]
  [FiniteDimensional K L] [IsGalois K L]
def embeddedBaseNormClass
    (i : L →ₐ[K] SeparableClosure K) (a : Kˣ) :
    FiniteNormQuotient (absoluteUnits K) (abstractBase K)
      (finiteGaloisAbstractExtensionOfEmbedding K L i).field
      (finiteGaloisAbstractExtensionOfEmbedding K L i).below
LocalClassFieldTheory.concreteNormResidueSymbolOfEmbedding_eq_abstract

Before specializing the local datum, the concrete norm-residue symbol is the abstract norm-residue class transported through the canonical quotient equivalence. This pointwise transport formula expresses abstract restriction naturality as a statement about actual field automorphisms.

Source context 9 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
namespace LocalClassFieldTheory
open LocalFieldTheory RamificationTheory CyclicCohomology KummerTheory
open ClassFormation LocalClassFieldTheory
open scoped IsMulCommutative
universe u v
variable {K : Type u} {Omega : Type v}
  [Field K] [Field Omega] [Algebra K Omega]
section AbstractToConcrete
variable (K L : Type) [Field K] [Field L] [Algebra K L]
  [FiniteDimensional K L] [IsGalois K L]
theorem concreteNormResidueSymbolOfEmbedding_eq_abstract
    (i : L →ₐ[K] SeparableClosure K)
    (D : DegreeData (absoluteGalois K))
    (v : ValuationData D (absoluteUnits K))
    (hcf : SatisfiesClassFieldAxiom (absoluteUnits K)) (a : Kˣ) :
    concreteNormResidueSymbolOfEmbedding K L i D v hcf a =
      (finiteGaloisAbstractQuotientEquivGaloisGroupOfEmbedding
        K L i).abelianizationCongr
        (Additive.toMul
          (D.normResidueSymbol (absoluteUnits K) v hcf (intrinsicFiniteAbstractBase K)
            (finiteGaloisAbstractExtensionOfEmbedding K L i)
            (embeddedBaseNormClass K L i a)))
LocalClassFieldTheory.commGroup_abelianizationCongr_of
Source context 9 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
namespace LocalClassFieldTheory
open LocalFieldTheory RamificationTheory CyclicCohomology KummerTheory
open ClassFormation LocalClassFieldTheory
open scoped IsMulCommutative
universe u v
variable {K : Type u} {Omega : Type v}
  [Field K] [Field Omega] [Algebra K Omega]
section IntermediateRestriction
variable (K : Type) [Field K]
  [ValuativeRel K] [TopologicalSpace K]
  [IsNonarchimedeanLocalField K]
theorem commGroup_abelianizationCongr_of
    {G H : Type*} [Group G] [CommGroup H]
    (q : G ≃* H) (x : G) :
    (Abelianization.equivOfComm (H := H)).symm
        (q.abelianizationCongr (Abelianization.of x)) =
      q x
LocalClassFieldTheory.intermediateFieldRestrict_abstractQuotient_mk
Source context 10 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
namespace LocalClassFieldTheory
open LocalFieldTheory RamificationTheory CyclicCohomology KummerTheory
open ClassFormation LocalClassFieldTheory
open scoped IsMulCommutative
universe u v
variable {K : Type u} {Omega : Type v}
  [Field K] [Field Omega] [Algebra K Omega]
section IntermediateRestriction
variable (K : Type) [Field K]
  [ValuativeRel K] [TopologicalSpace K]
  [IsNonarchimedeanLocalField K]
omit [ValuativeRel K] [TopologicalSpace K] [IsNonarchimedeanLocalField K] in
theorem intermediateFieldRestrict_abstractQuotient_mk
    (E F : IntermediateField K (SeparableClosure K)) (hEF : E ≤ F)
    [FiniteDimensional K E] [FiniteDimensional K F]
    [IsGalois K E] [IsGalois K F]
    (sigma : (abstractBase K).toSubgroup) :
    intermediateFieldRestrictNormalHom E F hEF
        (finiteGaloisAbstractQuotientEquivGaloisGroupOfEmbedding K F F.val
          (QuotientGroup.mk sigma)) =
      finiteGaloisAbstractQuotientEquivGaloisGroupOfEmbedding K E E.val
        (QuotientGroup.mk (Subgroup.inclusion le_rfl sigma))
LocalClassFieldTheory.embeddedAbstractExtension_field_le
Source context 10 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
namespace LocalClassFieldTheory
open LocalFieldTheory RamificationTheory CyclicCohomology KummerTheory
open ClassFormation LocalClassFieldTheory
open scoped IsMulCommutative
universe u v
variable {K : Type u} {Omega : Type v}
  [Field K] [Field Omega] [Algebra K Omega]
section IntermediateRestriction
variable (K : Type) [Field K]
  [ValuativeRel K] [TopologicalSpace K]
  [IsNonarchimedeanLocalField K]
omit [ValuativeRel K] [TopologicalSpace K] [IsNonarchimedeanLocalField K] in
theorem embeddedAbstractExtension_field_le
    (E F : IntermediateField K (SeparableClosure K)) (hEF : E ≤ F)
    [FiniteDimensional K E] [FiniteDimensional K F]
    [IsGalois K E] [IsGalois K F] :
    (finiteGaloisAbstractExtensionOfEmbedding K F F.val).field.toSubgroup ≤
      (finiteGaloisAbstractExtensionOfEmbedding K E E.val).field.toSubgroup
LocalClassFieldTheory.intermediateFieldRestrict_abstractAbelianization_of_mk
Source context 10 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
namespace LocalClassFieldTheory
open LocalFieldTheory RamificationTheory CyclicCohomology KummerTheory
open ClassFormation LocalClassFieldTheory
open scoped IsMulCommutative
universe u v
variable {K : Type u} {Omega : Type v}
  [Field K] [Field Omega] [Algebra K Omega]
section IntermediateRestriction
variable (K : Type) [Field K]
  [ValuativeRel K] [TopologicalSpace K]
  [IsNonarchimedeanLocalField K]
omit [ValuativeRel K] [TopologicalSpace K] [IsNonarchimedeanLocalField K] in
theorem intermediateFieldRestrict_abstractAbelianization_of_mk
    (E F : IntermediateField K (SeparableClosure K)) (hEF : E ≤ F)
    [FiniteDimensional K E] [FiniteDimensional K F]
    [IsAbelianGalois K E] [IsAbelianGalois K F]
    (sigma : (abstractBase K).toSubgroup) :
    intermediateFieldRestrictNormalHom E F hEF
        ((Abelianization.equivOfComm (H := Gal(F / K))).symm
          ((finiteGaloisAbstractQuotientEquivGaloisGroupOfEmbedding
            K F F.val).abelianizationCongr
              (Abelianization.of (QuotientGroup.mk sigma)))) =
      (Abelianization.equivOfComm (H := Gal(E / K))).symm
        ((finiteGaloisAbstractQuotientEquivGaloisGroupOfEmbedding
          K E E.val).abelianizationCongr
            (normResidueNaturalityAbelianizedRestriction
              (abstractBase K) (abstractBase K)
              (finiteGaloisAbstractExtensionOfEmbedding K E E.val).field
              (finiteGaloisAbstractExtensionOfEmbedding K F F.val).field
              (finiteGaloisAbstractExtensionOfEmbedding K E E.val).below
              (finiteGaloisAbstractExtensionOfEmbedding K F F.val).below
              le_rfl (embeddedAbstractExtension_field_le K E F hEF)
              (Abelianization.of (QuotientGroup.mk sigma))))
LocalClassFieldTheory.intermediateFieldRestrict_abstractAbelianization
Source context 10 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
namespace LocalClassFieldTheory
open LocalFieldTheory RamificationTheory CyclicCohomology KummerTheory
open ClassFormation LocalClassFieldTheory
open scoped IsMulCommutative
universe u v
variable {K : Type u} {Omega : Type v}
  [Field K] [Field Omega] [Algebra K Omega]
section IntermediateRestriction
variable (K : Type) [Field K]
  [ValuativeRel K] [TopologicalSpace K]
  [IsNonarchimedeanLocalField K]
omit [ValuativeRel K] [TopologicalSpace K] [IsNonarchimedeanLocalField K] in
theorem intermediateFieldRestrict_abstractAbelianization
    (E F : IntermediateField K (SeparableClosure K)) (hEF : E ≤ F)
    [FiniteDimensional K E] [FiniteDimensional K F]
    [IsAbelianGalois K E] [IsAbelianGalois K F]
    (z : Abelianization
      (finiteGaloisAbstractExtensionOfEmbedding K F F.val).extensionQuotient) :
    intermediateFieldRestrictNormalHom E F hEF
        ((Abelianization.equivOfComm (H := Gal(F / K))).symm
          ((finiteGaloisAbstractQuotientEquivGaloisGroupOfEmbedding K F F.val).abelianizationCongr
            z)) =
      (Abelianization.equivOfComm (H := Gal(E / K))).symm
        ((finiteGaloisAbstractQuotientEquivGaloisGroupOfEmbedding K E E.val).abelianizationCongr
          (normResidueNaturalityAbelianizedRestriction
            (abstractBase K) (abstractBase K)
            (finiteGaloisAbstractExtensionOfEmbedding K E E.val).field
            (finiteGaloisAbstractExtensionOfEmbedding K F F.val).field
            (finiteGaloisAbstractExtensionOfEmbedding K E E.val).below
            (finiteGaloisAbstractExtensionOfEmbedding K F F.val).below
            le_rfl (embeddedAbstractExtension_field_le K E F hEF) z))
LocalClassFieldTheory.concreteNormResidueAutomorphism_restrict

Restriction naturality for the concrete norm-residue symbol, before specializing the three structures of the local class formation. Both extensions are literal intermediate fields of the fixed separable closure, so the vertical Galois map is the actual restriction map above.

Source context 10 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
namespace LocalClassFieldTheory
open LocalFieldTheory RamificationTheory CyclicCohomology KummerTheory
open ClassFormation LocalClassFieldTheory
open scoped IsMulCommutative
universe u v
variable {K : Type u} {Omega : Type v}
  [Field K] [Field Omega] [Algebra K Omega]
section IntermediateRestriction
variable (K : Type) [Field K]
  [ValuativeRel K] [TopologicalSpace K]
  [IsNonarchimedeanLocalField K]
omit [ValuativeRel K] [TopologicalSpace K] [IsNonarchimedeanLocalField K] in
theorem concreteNormResidueAutomorphism_restrict
    (E F : IntermediateField K (SeparableClosure K)) (hEF : E ≤ F)
    [FiniteDimensional K E] [FiniteDimensional K F]
    [IsAbelianGalois K E] [IsAbelianGalois K F]
    (D : DegreeData (absoluteGalois K))
    (v : ValuationData D (absoluteUnits K))
    (hcf : SatisfiesClassFieldAxiom (absoluteUnits K)) (a : Kˣ) :
    intermediateFieldRestrictNormalHom E F hEF
        ((Abelianization.equivOfComm (H := Gal(F / K))).symm
          (concreteNormResidueSymbolOfEmbedding
            K F F.val D v hcf a)) =
      (Abelianization.equivOfComm (H := Gal(E / K))).symm
        (concreteNormResidueSymbolOfEmbedding
          K E E.val D v hcf a)
LocalClassFieldTheory.localArtinAutomorphism_restrict

Restriction naturality for the canonical local norm-residue symbol, expressed through automorphisms of finite abelian intermediate fields.

Source context 9 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
namespace LocalClassFieldTheory
open LocalFieldTheory RamificationTheory CyclicCohomology KummerTheory
open ClassFormation LocalClassFieldTheory
open scoped IsMulCommutative
universe u v
variable {K : Type u} {Omega : Type v}
  [Field K] [Field Omega] [Algebra K Omega]
section IntermediateRestriction
variable (K : Type) [Field K]
  [ValuativeRel K] [TopologicalSpace K]
  [IsNonarchimedeanLocalField K]
theorem localArtinAutomorphism_restrict
    (E F : IntermediateField K (SeparableClosure K)) (hEF : E ≤ F)
    [FiniteDimensional K E] [FiniteDimensional K F]
    [IsAbelianGalois K E] [IsAbelianGalois K F] (a : Kˣ) :
    intermediateFieldRestrictNormalHom E F hEF
        ((Abelianization.equivOfComm (H := Gal(F / K))).symm
          (localArtinMonoidHom K F a)) =
      (Abelianization.equivOfComm (H := Gal(E / K))).symm
        (localArtinMonoidHom K E a)