AnabelianGeometry.WeightFiltration.h1Character_properKummer
The comparison character of the proper Kummer class is the original root-scaling monodromy character.
Source context 5 commands
Surrounding namespaces, section variables, and local commands at this declaration.
noncomputable section
open AlgebraicGeometry CategoryTheory AlgebraicCurve
open EtaleFundamentalGroups.Cohomology
namespace AnabelianGeometry.WeightFiltration
variable {K F : Type} [Field K] [IsSepClosed K] [Field F] [Algebra K F]
(M : CurveModel K F) (n : ℕ+) (hn : IsUnit ((n : ℕ) : K))
{Ω : Type} [Field Ω] [IsSepClosed Ω]Lean source · full declaration
theorem h1Character_properKummer (u : Pic0.kummerUnits K F n)
(ξ : Spec (.of Ω) ⟶ M.C) :
let : TopologicalSpace (rootsOfUnity (n : ℕ) K) := ⊥
h1Character (AddCommGrpCat.of (Additive (rootsOfUnity (n : ℕ) K))) ξ
(M.kummerEtaleClass n u hn ξ) = M.kummerMonodromyCharacter n u hn ξ := by
intro htop
have : NeZero (n : ℕ) := ⟨n.ne_zero⟩
have : NeZero ((n : ℕ) : K) := ⟨hn.ne_zero⟩
let A := AddCommGrpCat.of (Additive (rootsOfUnity (n : ℕ) K))
let : TopologicalSpace (Multiplicative A) := ⊥
have : DiscreteTopology (Multiplicative A) := ⟨rfl⟩
change ((finiteH1CharacterEquiv A ξ)
((finiteH1CharacterEquiv A ξ).symm
(Additive.ofMul (M.kummerMonodromyCharacter n u hn ξ)))).toMul = _
rw [AddEquiv.apply_symm_apply]
rfl