Module

ContractingEquation.lean

Nyll.ClassFieldTheory.LubinTate.EqualCharacteristic.Frobenius.ContractingEquation
8 declarations indexed from sourceView source ↗

LubinTate the contracting Frobenius equation: the contracting Frobenius equation

The coefficient recursion in the proof of the contracting Frobenius equation repeatedly solves

α - γ φ(α) = β

in a complete discrete valuation ring, where γ has positive valuation. For an equal-characteristic power-series ring, positive valuation is exactly the vanishing of the constant coefficient. The equation can therefore be solved algebraically, coefficient by coefficient: the coefficient of degree n on the right only involves coefficients of α of degree strictly less than n.

This file records that source-producing recursion directly. No completeness or external existence assumption is needed.

Declarations

LubinTate.EqualCharacteristic.contractingFrobeniusEquationCoeff

The recursively determined coefficients of the solution of α = β + γ * φ(α) when γ(0)=0.

Source context 5 commands

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

noncomputable section
open scoped PowerSeries
namespace LubinTate
namespace EqualCharacteristic
variable {R : Type*} [CommRing R]
def contractingFrobeniusEquationCoeff
    (φ : R →+* R) (γ β : R⟦X⟧) : ℕ → R
LubinTate.EqualCharacteristic.contractingFrobeniusEquationCoeff_eq

States the theorem contractingFrobeniusEquationCoeff_eq.

Source context 5 commands

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

noncomputable section
open scoped PowerSeries
namespace LubinTate
namespace EqualCharacteristic
variable {R : Type*} [CommRing R]
theorem contractingFrobeniusEquationCoeff_eq
    (φ : R →+* R) (γ β : R⟦X⟧) (n : ℕ) :
    contractingFrobeniusEquationCoeff φ γ β n =
      PowerSeries.coeff n β +
        ∑ k : Fin n,
          PowerSeries.coeff (k.1 + 1) γ *
            φ (contractingFrobeniusEquationCoeff φ γ β (n - 1 - k.1))
LubinTate.EqualCharacteristic.contractingFrobeniusEquationSolution

The power series obtained from the contracting coefficient recursion.

Source context 5 commands

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

noncomputable section
open scoped PowerSeries
namespace LubinTate
namespace EqualCharacteristic
variable {R : Type*} [CommRing R]
def contractingFrobeniusEquationSolution
    (φ : R →+* R) (γ β : R⟦X⟧) : R⟦X⟧
LubinTate.EqualCharacteristic.contractingFrobeniusEquationSolution_coeff

States the theorem contractingFrobeniusEquationSolution_coeff.

Source context 5 commands

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

noncomputable section
open scoped PowerSeries
namespace LubinTate
namespace EqualCharacteristic
variable {R : Type*} [CommRing R]
theorem contractingFrobeniusEquationSolution_coeff
    (φ : R →+* R) (γ β : R⟦X⟧) (n : ℕ) :
    PowerSeries.coeff n
        (contractingFrobeniusEquationSolution φ γ β) =
      contractingFrobeniusEquationCoeff φ γ β n
LubinTate.EqualCharacteristic.sum_range_succ_convolution_of_constantCoeff_eq_zero
Source context 5 commands

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

noncomputable section
open scoped PowerSeries
namespace LubinTate
namespace EqualCharacteristic
variable {R : Type*} [CommRing R]
theorem sum_range_succ_convolution_of_constantCoeff_eq_zero
    (φ : R →+* R) (γ α : R⟦X⟧)
    (hγ : PowerSeries.coeff 0 γ = 0) (n : ℕ) :
    ∑ k ∈ Finset.range (n + 1),
        PowerSeries.coeff k γ * φ (PowerSeries.coeff (n - k) α) =
      ∑ k ∈ Finset.range n,
        PowerSeries.coeff (k + 1) γ *
          φ (PowerSeries.coeff (n - 1 - k) α)
LubinTate.EqualCharacteristic.contractingFrobeniusEquationSolution_spec

The recursively constructed series solves the contracting Frobenius equation from the contracting Frobenius equation.

Source context 5 commands

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

noncomputable section
open scoped PowerSeries
namespace LubinTate
namespace EqualCharacteristic
variable {R : Type*} [CommRing R]
theorem contractingFrobeniusEquationSolution_spec
    (φ : R →+* R) (γ β : R⟦X⟧)
    (hγ : PowerSeries.coeff 0 γ = 0) :
    contractingFrobeniusEquationSolution φ γ β =
      β + γ * PowerSeries.map φ
        (contractingFrobeniusEquationSolution φ γ β)
LubinTate.EqualCharacteristic.contractingFrobeniusEquationSolution_unique

Uniqueness of the contracting Frobenius equation. This is the coefficientwise replacement for a global valuation argument.

Source context 5 commands

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

noncomputable section
open scoped PowerSeries
namespace LubinTate
namespace EqualCharacteristic
variable {R : Type*} [CommRing R]
theorem contractingFrobeniusEquationSolution_unique
    (φ : R →+* R) (γ β α : R⟦X⟧)
    (hγ : PowerSeries.coeff 0 γ = 0)
    (hα : α = β + γ * PowerSeries.map φ α) :
    α = contractingFrobeniusEquationSolution φ γ β
LubinTate.EqualCharacteristic.existsUnique_contractingFrobeniusEquation

traditional notation form: the unique solution of α - γ φ(α) = β.

Source context 5 commands

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

noncomputable section
open scoped PowerSeries
namespace LubinTate
namespace EqualCharacteristic
variable {R : Type*} [CommRing R]
theorem existsUnique_contractingFrobeniusEquation
    (φ : R →+* R) (γ β : R⟦X⟧)
    (hγ : PowerSeries.coeff 0 γ = 0) :
    ∃! α : R⟦X⟧, α - γ * PowerSeries.map φ α = β