FLT/DedekindDomain/FiniteAdeleRing/TensorProduct.lean

GitHub source file

Explanation legend Lean4 Domain Explanation Language (L4DEL)

L4DEL explanations are a separate layer. They do not change the Lean source. Intuition is explanatory prose; numbered items are a reading path; sources link the wording back to evidence.

L4DEL
Lean4 Domain Explanation Language

Credit: The upstream authors and contributors retain credit for the project and mathematics. lean4-explainer only renders their pinned source and adds the separately disclosed explanation layer.

Project sources: Pinned project documentation, Pinned FLT blueprint introduction

5 declarations, 0 contain sorry, 0 declared as axioms

Tensor product compatibilities for the finite adele ring

Compatibilities between tensor products and the local components of the finite adele ring of a Dedekind domain.

Imports (5)
Imported by 2 files
  1. def IsDedekindDomain.FiniteAdeleRing.TensorProduct.localcomponent Documented declaration: localcomponent line 54 source

    Source documentation

    If Ο† : 𝔸_K^f βŠ—[K] V β†’ 𝔸_K^f βŠ—[K] V is 𝔸_K^f-linear and p : HeightOneSpectrum (π“ž K) then localcomponent R K V p Ο† : Kβ‚š βŠ—[K] V β†’[K] Kβ‚š βŠ—[K] V is the associated map Ο†β‚š defined as Kβ‚š βŠ—[K] V --(single)--> 𝔸_K^f βŠ— V --(Ο†)--> 𝔸_K^f βŠ— V --(eval)--> Kβ‚š βŠ— V. This map morally satisfies Ο† = Ξ β‚š Ο†β‚š but because source of Ο† isn't literally a restricted product we cannot make this assertion.

    standard axioms: Classical.choice, Quot.sound, propext what this means

    Statement uses: CommRing, IsDedekindDomain, DecidableEq, IsDedekindDomain.HeightOneSpectrum, Field, Algebra, IsFractionRing, AddCommGroup, Module, FiniteDimensional, TopologicalSpace, TensorProduct, IsDedekindDomain.FiniteAdeleRing, IsTopologicalAddGroup, IsModuleTopology, IsDedekindDomain.HeightOneSpectrum.adicCompletion, ContinuousLinearMap, RingHom.id

    Proof uses: ContinuousLinearMap.comp, ContinuousLinearMap.rTensor', ContinuousAlgHom.toContinuousLinearMap, IsDedekindDomain.FiniteAdeleRing.evalContinuousAlgebraMap, LinearMap, ContinuousLinearMap.mk, IsDedekindDomain.FiniteAdeleRing.singleContinuousLinearMap

    73 instances, coercions and auxiliary constants left out.

    noncomputable def TensorProduct.localcomponent (p : HeightOneSpectrum R)
        (Ο† : FiniteAdeleRing R K βŠ—[K] V β†’L[FiniteAdeleRing R K]
          FiniteAdeleRing R K βŠ—[K] V) :
        p.adicCompletion K βŠ—[K] V β†’L[K] p.adicCompletion K βŠ—[K] V :=
    …
  2. lemma IsDedekindDomain.FiniteAdeleRing.TensorProduct.localcomponent_id_apply line 71 source

    standard axioms: Classical.choice, Quot.sound, propext what this means

    Statement uses: CommRing, IsDedekindDomain, DecidableEq, IsDedekindDomain.HeightOneSpectrum, Field, Algebra, IsFractionRing, AddCommGroup, Module, FiniteDimensional, TopologicalSpace, TensorProduct, IsDedekindDomain.FiniteAdeleRing, IsTopologicalAddGroup, IsModuleTopology, IsDedekindDomain.HeightOneSpectrum.adicCompletion, Eq, ContinuousLinearMap, RingHom.id, IsDedekindDomain.FiniteAdeleRing.TensorProduct.localcomponent and 1 more

    Proof uses: LinearMap, LinearMap.comp, ContinuousAlgHom.toContinuousLinearMap, IsDedekindDomain.FiniteAdeleRing.evalContinuousAlgebraMap, IsDedekindDomain.FiniteAdeleRing.singleContinuousLinearMap, LinearMap.id, LinearMap.ext, IsDedekindDomain.FiniteAdeleRing.evalContinuousAlgebraMap_singleContinuousLinearMap, of_eq_true, Eq.trans, True, congrFun', congrArg, ContinuousLinearMap.comp, ContinuousLinearMap.mk, LinearMap.rTensor, ContinuousLinearMap.comp.congr_simp, ContinuousLinearMap.rTensor', id, Eq.refl and 3 more

    81 instances, coercions and auxiliary constants left out.

    Tactic trace: 4 steps

    Open to load the checked before-and-after goal states.

  3. lemma IsDedekindDomain.FiniteAdeleRing.TensorProduct.localcomponent_comp_apply line 83 source

    standard axioms: Classical.choice, Quot.sound, propext what this means

    Statement uses: CommRing, IsDedekindDomain, DecidableEq, IsDedekindDomain.HeightOneSpectrum, Field, Algebra, IsFractionRing, AddCommGroup, Module, FiniteDimensional, TopologicalSpace, TensorProduct, IsDedekindDomain.FiniteAdeleRing, IsTopologicalAddGroup, IsModuleTopology, IsDedekindDomain.HeightOneSpectrum.adicCompletion, ContinuousLinearMap, RingHom.id, Eq, IsDedekindDomain.FiniteAdeleRing.TensorProduct.localcomponent and 1 more

    Proof uses: LinearMap, LinearMap.rTensor, LinearMap.comp, IsDedekindDomain.FiniteAdeleRing.singleContinuousLinearMap, ContinuousAlgHom.toContinuousLinearMap, IsDedekindDomain.FiniteAdeleRing.evalContinuousAlgebraMap, HSMul.hSMul, IsDedekindDomain.FiniteAdeleRing.localIdempotent, LinearMap.lsmul, congr_arg, IsDedekindDomain.FiniteAdeleRing.singleContinuousAlgebraMap_comp_evalContinuousLinearMap, TensorProduct.inductionOn, of_eq_true, TensorProduct.tmul, HMul.hMul, Eq.trans, True, congrFun', congrArg, id and 16 more

    121 instances, coercions and auxiliary constants left out.

    Tactic trace: 7 steps

    Open to load the checked before-and-after goal states.

  4. lemma IsDedekindDomain.FiniteAdeleRing.TensorProduct.localcomponent_apply Documented declaration: localcomponent_apply line 117 source

    Source documentation

    If Ο† : 𝔸_K^f βŠ— V β†’ 𝔸_K^f βŠ— V is 𝔸_K^f-linear and Ο†β‚š is its local component at a place p then for all x : 𝔸_K^f βŠ— V we have (evalβ‚š βŠ— id_V) (Ο† x) = Ο†β‚š ((evalβ‚š βŠ— id_V) x), or, more colloquiually, (Ο† x)β‚š = Ο†β‚š (xβ‚š).

    standard axioms: Classical.choice, Quot.sound, propext what this means

    Statement uses: CommRing, IsDedekindDomain, DecidableEq, IsDedekindDomain.HeightOneSpectrum, Field, Algebra, IsFractionRing, AddCommGroup, Module, FiniteDimensional, TopologicalSpace, TensorProduct, IsDedekindDomain.FiniteAdeleRing, IsTopologicalAddGroup, IsModuleTopology, IsDedekindDomain.HeightOneSpectrum.adicCompletion, ContinuousLinearMap, RingHom.id, Eq, ContinuousLinearMap.rTensor' and 6 more

    Proof uses: id, Eq.mpr, IsDedekindDomain.FiniteAdeleRing.singleContinuousLinearMap, ContinuousLinearMap.comp, congrArg, Eq.symm, ContinuousLinearMap.rTensor'_comp_apply, LinearMap, LinearMap.rTensor, LinearMap.lsmul, IsDedekindDomain.FiniteAdeleRing.localIdempotent, IsDedekindDomain.FiniteAdeleRing.singleContinuousAlgebraMap_comp_evalContinuousLinearMap, HSMul.hSMul, TensorProduct.inductionOn, LinearMap.rTensor_tmul, of_eq_true, HAdd.hAdd, Eq.trans, True, congr and 13 more

    145 instances, coercions and auxiliary constants left out.

    Tactic trace: 12 steps

    Open to load the checked before-and-after goal states.

    lemma TensorProduct.localcomponent_apply
        (Ο† : FiniteAdeleRing R K βŠ—[K] V β†’L[FiniteAdeleRing R K] FiniteAdeleRing R K βŠ—[K] V)
        (x : FiniteAdeleRing R K βŠ—[K] V) (p : HeightOneSpectrum R) :
        (ContinuousLinearMap.rTensor' V
          (evalContinuousAlgebraMap R K p).toContinuousLinearMap) (Ο† x) =
        TensorProduct.localcomponent R K V p Ο† ((ContinuousLinearMap.rTensor' V
          (evalContinuousAlgebraMap R K p).toContinuousLinearMap) x) := by
    …

    Mentions: ContinuousLinearMap.rTensor', IsDedekindDomain.FiniteAdeleRing.evalContinuousAlgebraMap, IsDedekindDomain.FiniteAdeleRing.TensorProduct.localcomponent

  5. def IsDedekindDomain.FiniteAdeleRing.TensorProduct.localcomponentEquiv Documented declaration: localcomponentEquiv line 146 source

    Source documentation

    If Ο† : 𝔸_K^f βŠ—[K] V β†’ 𝔸_K^f βŠ—[K] V is 𝔸_K^f-linear and p : HeightOneSpectrum (π“ž K) then localcomponent R K V p Ο† : Kβ‚š βŠ—[K] V β†’[K] Kβ‚š βŠ—[K] V is the associated map Ο†β‚š defined as Kβ‚š βŠ—[K] V --(single)--> 𝔸_K^f βŠ— V --(Ο†)--> 𝔸_K^f βŠ— V --(eval)--> Kβ‚š βŠ— V. This map morally satisfies Ο† = Ξ β‚š Ο†β‚š but because source of Ο† isn't literally a restricted product we cannot make this assertion.

    standard axioms: Classical.choice, Quot.sound, propext what this means

    Statement uses: CommRing, IsDedekindDomain, DecidableEq, IsDedekindDomain.HeightOneSpectrum, Field, Algebra, IsFractionRing, AddCommGroup, Module, FiniteDimensional, TopologicalSpace, TensorProduct, IsDedekindDomain.FiniteAdeleRing, IsTopologicalAddGroup, IsModuleTopology, IsDedekindDomain.HeightOneSpectrum.adicCompletion, ContinuousLinearEquiv, RingHom.id

    Proof uses: ContinuousLinearMap, IsDedekindDomain.FiniteAdeleRing.TensorProduct.localcomponent, ContinuousLinearEquiv.mk, LinearEquiv.mk, ContinuousLinearEquiv.symm

    74 instances, coercions and auxiliary constants left out.

    Tactic trace: 6 steps

    Open to load the checked before-and-after goal states.

    noncomputable def TensorProduct.localcomponentEquiv (p : HeightOneSpectrum R)
        (Ο† : FiniteAdeleRing R K βŠ—[K] V ≃L[FiniteAdeleRing R K]
          FiniteAdeleRing R K βŠ—[K] V) :
        p.adicCompletion K βŠ—[K] V ≃L[K] p.adicCompletion K βŠ—[K] V where
    …