Module

HigherUnitLevelMapFixed.lean

Nyll.ClassFieldTheory.LubinTate.EqualCharacteristic.NormSubgroup.HigherUnitLevelMapFixed
14 declarations indexed from sourceView source ↗

LubinTate the explicit norm-subgroup computation: higher-unit Frobenius fixes the standard

level map

Declarations

LubinTate.EqualCharacteristic.ringHom_apply_eq_of_powerBasis

Two ring homomorphisms out of a power-basis extension agree pointwise once they agree on the base field and on the power-basis generator.

Source context 6 commands

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

noncomputable section
open scoped LaurentSeries PowerSeries
namespace LubinTate
namespace EqualCharacteristic
open LocalFieldTheory.DiscreteValuationField
variable {K : Type} [Field K]
theorem ringHom_apply_eq_of_powerBasis
    {B L C : Type*} [Field B] [Field L] [Algebra B L] [Field C]
    (pb : PowerBasis B L) (delta : C →+* C) (f : L →+* C)
    (hgen : delta (f pb.gen) = f pb.gen)
    (hbase : ∀ b : B,
      delta (f (algebraMap B L b)) = f (algebraMap B L b))
    (x : L) :
    delta (f x) = f x
LubinTate.EqualCharacteristic.equalCharacteristicHigherUnitMapBaseAlgebra
Source context 6 commands

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

noncomputable section
open scoped LaurentSeries PowerSeries
namespace LubinTate
namespace EqualCharacteristic
open LocalFieldTheory.DiscreteValuationField
variable {K : Type} [Field K]
instance equalCharacteristicHigherUnitMapBaseAlgebra
    (F : LocalField K) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField)
LubinTate.EqualCharacteristic.equalCharacteristicHigherUnitMapLevelAlgebra
Source context 7 commands

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

noncomputable section
open scoped LaurentSeries PowerSeries
namespace LubinTate
namespace EqualCharacteristic
open LocalFieldTheory.DiscreteValuationField
variable {K : Type} [Field K]
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapBaseAlgebra
    (F : LocalField K) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField) :=
  equalCharacteristicCompletedLevelBaseAlgebra F
instance equalCharacteristicHigherUnitMapLevelAlgebra
    (F : LocalField K) (n : ℕ) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedLevelField F n)
LubinTate.EqualCharacteristic.equalCharacteristicHigherUnitMapScalarTower
Source context 8 commands

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

noncomputable section
open scoped LaurentSeries PowerSeries
namespace LubinTate
namespace EqualCharacteristic
open LocalFieldTheory.DiscreteValuationField
variable {K : Type} [Field K]
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapBaseAlgebra
    (F : LocalField K) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField) :=
  equalCharacteristicCompletedLevelBaseAlgebra F
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapLevelAlgebra
    (F : LocalField K) (n : ℕ) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedLevelField F n) :=
  equalCharacteristicCompletedLevelLaurentAlgebra F n
instance equalCharacteristicHigherUnitMapScalarTower
    (F : LocalField K) (n : ℕ) :
    IsScalarTower F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField)
      (equalCharacteristicCompletedLevelField F n)
LubinTate.EqualCharacteristic.higherUnitLevelMapRingHom
Source context 9 commands

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

noncomputable section
open scoped LaurentSeries PowerSeries
namespace LubinTate
namespace EqualCharacteristic
open LocalFieldTheory.DiscreteValuationField
variable {K : Type} [Field K]
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapBaseAlgebra
    (F : LocalField K) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField) :=
  equalCharacteristicCompletedLevelBaseAlgebra F
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapLevelAlgebra
    (F : LocalField K) (n : ℕ) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedLevelField F n) :=
  equalCharacteristicCompletedLevelLaurentAlgebra F n
local instance equalCharacteristicHigherUnitMapScalarTower
    (F : LocalField K) (n : ℕ) :
    IsScalarTower F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField)
      (equalCharacteristicCompletedLevelField F n) :=
  IsScalarTower.of_algebraMap_eq' rfl
def higherUnitLevelMapRingHom
    (F : LocalField K) [CharP K F.residueCharacteristic] (n : ℕ) :
    equalCharacteristicLubinTateLevelField F n →+*
      equalCharacteristicCompletedLevelField F n
LubinTate.EqualCharacteristic.higherUnitLevelMapRingHom_apply
Source context 9 commands

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

noncomputable section
open scoped LaurentSeries PowerSeries
namespace LubinTate
namespace EqualCharacteristic
open LocalFieldTheory.DiscreteValuationField
variable {K : Type} [Field K]
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapBaseAlgebra
    (F : LocalField K) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField) :=
  equalCharacteristicCompletedLevelBaseAlgebra F
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapLevelAlgebra
    (F : LocalField K) (n : ℕ) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedLevelField F n) :=
  equalCharacteristicCompletedLevelLaurentAlgebra F n
local instance equalCharacteristicHigherUnitMapScalarTower
    (F : LocalField K) (n : ℕ) :
    IsScalarTower F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField)
      (equalCharacteristicCompletedLevelField F n) :=
  IsScalarTower.of_algebraMap_eq' rfl
theorem higherUnitLevelMapRingHom_apply
    (F : LocalField K) [CharP K F.residueCharacteristic] (n : ℕ)
    (x : equalCharacteristicLubinTateLevelField F n) :
    higherUnitLevelMapRingHom F n x =
      equalCharacteristicLubinTateLevelFieldToCompleted F n x
LubinTate.EqualCharacteristic.equalCharacteristicLubinTateLevelFieldToCompletedRingHom

The canonical finite-level embedding into the completed level, regarded as a ring homomorphism. This is the lightweight interface used by consumers that do not need to reconstruct its concrete algebra structures.

Source context 9 commands

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

noncomputable section
open scoped LaurentSeries PowerSeries
namespace LubinTate
namespace EqualCharacteristic
open LocalFieldTheory.DiscreteValuationField
variable {K : Type} [Field K]
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapBaseAlgebra
    (F : LocalField K) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField) :=
  equalCharacteristicCompletedLevelBaseAlgebra F
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapLevelAlgebra
    (F : LocalField K) (n : ℕ) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedLevelField F n) :=
  equalCharacteristicCompletedLevelLaurentAlgebra F n
local instance equalCharacteristicHigherUnitMapScalarTower
    (F : LocalField K) (n : ℕ) :
    IsScalarTower F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField)
      (equalCharacteristicCompletedLevelField F n) :=
  IsScalarTower.of_algebraMap_eq' rfl
def equalCharacteristicLubinTateLevelFieldToCompletedRingHom
    (F : LocalField K) [CharP K F.residueCharacteristic] (n : ℕ) :
    equalCharacteristicLubinTateLevelField F n →+*
      equalCharacteristicCompletedLevelField F n
LubinTate.EqualCharacteristic.equalCharacteristicLubinTateLevelFieldToCompletedRingHom_algebraMap

States the theorem equalCharacteristicLubinTateLevelFieldToCompletedRingHom_algebraMap.

Source context 9 commands

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

noncomputable section
open scoped LaurentSeries PowerSeries
namespace LubinTate
namespace EqualCharacteristic
open LocalFieldTheory.DiscreteValuationField
variable {K : Type} [Field K]
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapBaseAlgebra
    (F : LocalField K) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField) :=
  equalCharacteristicCompletedLevelBaseAlgebra F
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapLevelAlgebra
    (F : LocalField K) (n : ℕ) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedLevelField F n) :=
  equalCharacteristicCompletedLevelLaurentAlgebra F n
local instance equalCharacteristicHigherUnitMapScalarTower
    (F : LocalField K) (n : ℕ) :
    IsScalarTower F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField)
      (equalCharacteristicCompletedLevelField F n) :=
  IsScalarTower.of_algebraMap_eq' rfl
theorem equalCharacteristicLubinTateLevelFieldToCompletedRingHom_algebraMap
    (F : LocalField K) [CharP K F.residueCharacteristic]
    (n : ℕ) (b : F.residueField⸨X⸩) :
    equalCharacteristicLubinTateLevelFieldToCompletedRingHom F n
        (algebraMap F.residueField⸨X⸩
          (equalCharacteristicLubinTateLevelField F n) b) =
      algebraMap F.residueField⸨X⸩
        (equalCharacteristicCompletedLevelField F n) b
LubinTate.EqualCharacteristic.higherUnitFrobeniusRingHom
Source context 9 commands

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

noncomputable section
open scoped LaurentSeries PowerSeries
namespace LubinTate
namespace EqualCharacteristic
open LocalFieldTheory.DiscreteValuationField
variable {K : Type} [Field K]
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapBaseAlgebra
    (F : LocalField K) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField) :=
  equalCharacteristicCompletedLevelBaseAlgebra F
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapLevelAlgebra
    (F : LocalField K) (n : ℕ) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedLevelField F n) :=
  equalCharacteristicCompletedLevelLaurentAlgebra F n
local instance equalCharacteristicHigherUnitMapScalarTower
    (F : LocalField K) (n : ℕ) :
    IsScalarTower F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField)
      (equalCharacteristicCompletedLevelField F n) :=
  IsScalarTower.of_algebraMap_eq' rfl
def higherUnitFrobeniusRingHom
    (F : LocalField K) [CharP K F.residueCharacteristic]
    (a : F.residueField⟦X⟧ˣ) (n : ℕ) :
    equalCharacteristicCompletedLevelField F n →+*
      equalCharacteristicCompletedLevelField F n
LubinTate.EqualCharacteristic.higherUnitFrobeniusRingHom_apply
Source context 9 commands

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

noncomputable section
open scoped LaurentSeries PowerSeries
namespace LubinTate
namespace EqualCharacteristic
open LocalFieldTheory.DiscreteValuationField
variable {K : Type} [Field K]
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapBaseAlgebra
    (F : LocalField K) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField) :=
  equalCharacteristicCompletedLevelBaseAlgebra F
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapLevelAlgebra
    (F : LocalField K) (n : ℕ) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedLevelField F n) :=
  equalCharacteristicCompletedLevelLaurentAlgebra F n
local instance equalCharacteristicHigherUnitMapScalarTower
    (F : LocalField K) (n : ℕ) :
    IsScalarTower F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField)
      (equalCharacteristicCompletedLevelField F n) :=
  IsScalarTower.of_algebraMap_eq' rfl
theorem higherUnitFrobeniusRingHom_apply
    (F : LocalField K) [CharP K F.residueCharacteristic]
    (a : F.residueField⟦X⟧ˣ) (n : ℕ)
    (x : equalCharacteristicCompletedLevelField F n) :
    higherUnitFrobeniusRingHom F a n x =
      equalCharacteristicCompletedFrobeniusAlgEquiv F a n x
LubinTate.EqualCharacteristic.higherUnitLevelMapRingHom_gen
Source context 9 commands

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

noncomputable section
open scoped LaurentSeries PowerSeries
namespace LubinTate
namespace EqualCharacteristic
open LocalFieldTheory.DiscreteValuationField
variable {K : Type} [Field K]
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapBaseAlgebra
    (F : LocalField K) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField) :=
  equalCharacteristicCompletedLevelBaseAlgebra F
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapLevelAlgebra
    (F : LocalField K) (n : ℕ) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedLevelField F n) :=
  equalCharacteristicCompletedLevelLaurentAlgebra F n
local instance equalCharacteristicHigherUnitMapScalarTower
    (F : LocalField K) (n : ℕ) :
    IsScalarTower F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField)
      (equalCharacteristicCompletedLevelField F n) :=
  IsScalarTower.of_algebraMap_eq' rfl
theorem higherUnitLevelMapRingHom_gen
    (F : LocalField K) [CharP K F.residueCharacteristic] (n : ℕ) :
    higherUnitLevelMapRingHom F n
        (equalCharacteristicLubinTateLevelPowerBasis F n).gen =
      equalCharacteristicCompletedPrimitiveRoot F n
LubinTate.EqualCharacteristic.higherUnitFrobeniusRingHom_levelMap_algebraMap
Source context 9 commands

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

noncomputable section
open scoped LaurentSeries PowerSeries
namespace LubinTate
namespace EqualCharacteristic
open LocalFieldTheory.DiscreteValuationField
variable {K : Type} [Field K]
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapBaseAlgebra
    (F : LocalField K) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField) :=
  equalCharacteristicCompletedLevelBaseAlgebra F
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapLevelAlgebra
    (F : LocalField K) (n : ℕ) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedLevelField F n) :=
  equalCharacteristicCompletedLevelLaurentAlgebra F n
local instance equalCharacteristicHigherUnitMapScalarTower
    (F : LocalField K) (n : ℕ) :
    IsScalarTower F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField)
      (equalCharacteristicCompletedLevelField F n) :=
  IsScalarTower.of_algebraMap_eq' rfl
theorem higherUnitFrobeniusRingHom_levelMap_algebraMap
    (F : LocalField K) [CharP K F.residueCharacteristic]
    (a : F.residueField⟦X⟧ˣ) (n : ℕ) (b : F.residueField⸨X⸩) :
    higherUnitFrobeniusRingHom F a n
        (higherUnitLevelMapRingHom F n
          (algebraMap F.residueField⸨X⸩
            (equalCharacteristicLubinTateLevelField F n) b)) =
      higherUnitLevelMapRingHom F n
        (algebraMap F.residueField⸨X⸩
          (equalCharacteristicLubinTateLevelField F n) b)
LubinTate.EqualCharacteristic.higherUnitLevelMap_fixed_core
Source context 9 commands

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

noncomputable section
open scoped LaurentSeries PowerSeries
namespace LubinTate
namespace EqualCharacteristic
open LocalFieldTheory.DiscreteValuationField
variable {K : Type} [Field K]
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapBaseAlgebra
    (F : LocalField K) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField) :=
  equalCharacteristicCompletedLevelBaseAlgebra F
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapLevelAlgebra
    (F : LocalField K) (n : ℕ) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedLevelField F n) :=
  equalCharacteristicCompletedLevelLaurentAlgebra F n
local instance equalCharacteristicHigherUnitMapScalarTower
    (F : LocalField K) (n : ℕ) :
    IsScalarTower F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField)
      (equalCharacteristicCompletedLevelField F n) :=
  IsScalarTower.of_algebraMap_eq' rfl
theorem higherUnitLevelMap_fixed_core
    (F : LocalField K) [CharP K F.residueCharacteristic]
    (a : F.residueField⟦X⟧ˣ) (n : ℕ)
    (ha : a ∈ equalCharacteristicLubinTateHigherUnitSubgroup F n)
    (x : equalCharacteristicLubinTateLevelField F n) :
    higherUnitFrobeniusRingHom F a n (higherUnitLevelMapRingHom F n x) =
      higherUnitLevelMapRingHom F n x
LubinTate.EqualCharacteristic.equalCharacteristicCompletedFrobeniusAlgEquiv_comp_levelFieldToCompleted_of_mem_higherUnit

States the theorem equalCharacteristicCompletedFrobeniusAlgEquiv_comp_levelFieldToCompleted_of_mem_higherUnit.

Source context 9 commands

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

noncomputable section
open scoped LaurentSeries PowerSeries
namespace LubinTate
namespace EqualCharacteristic
open LocalFieldTheory.DiscreteValuationField
variable {K : Type} [Field K]
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapBaseAlgebra
    (F : LocalField K) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField) :=
  equalCharacteristicCompletedLevelBaseAlgebra F
@[reducible] noncomputable local instance equalCharacteristicHigherUnitMapLevelAlgebra
    (F : LocalField K) (n : ℕ) :
    Algebra F.residueField⸨X⸩
      (equalCharacteristicCompletedLevelField F n) :=
  equalCharacteristicCompletedLevelLaurentAlgebra F n
local instance equalCharacteristicHigherUnitMapScalarTower
    (F : LocalField K) (n : ℕ) :
    IsScalarTower F.residueField⸨X⸩
      (equalCharacteristicCompletedUnramifiedField F.residueField)
      (equalCharacteristicCompletedLevelField F n) :=
  IsScalarTower.of_algebraMap_eq' rfl
theorem
    equalCharacteristicCompletedFrobeniusAlgEquiv_comp_levelFieldToCompleted_of_mem_higherUnit
    (F : LocalField K)
    [CharP K F.residueCharacteristic]
    (a : F.residueField⟦X⟧ˣ) (n : ℕ)
    (ha : a ∈ equalCharacteristicLubinTateHigherUnitSubgroup F n)
    (x : equalCharacteristicLubinTateLevelField F n) :
    equalCharacteristicCompletedFrobeniusAlgEquiv F a n
        (equalCharacteristicLubinTateLevelFieldToCompleted F n x) =
      equalCharacteristicLubinTateLevelFieldToCompleted F n x