Documentation

GQ2.DeepPart.Q0locLayer

The Q⁰_loc quadratic structure (§6.3, eq. (93)) #

Q⁰_loc is a quadratic map on H¹(G_ℚ₂, V) whose polar form is the cup product of the polar pairing (through ι_F): at the cochain level, gp(b₁+b₂) − gp(b₁) − gp(b₂) − (b₂ ∪_B b₁) = δ¹(g ↦ f(b₁ g, b₂ g)), by four instances of the factor-set cocycle identity and f_polar — no bilinearity of f needed. Class level via RepIndependence.repIndep (Lemma 6.4). This layer also proves the nonsingularity of Q⁰_loc, that the deep half X₊ is an additive subgroup, and the dim clause feeding Prop 6.18 (ramified).

This file is part of the GQ2.DeepPart split (the deep-part proof); see GQ2/DeepPart.lean for the overview.

theorem GQ2.DeepPart.graphPullback_add_sub_mem_B2 {C : Type} [Group C] [TopologicalSpace C] {V : Type} [AddCommGroup V] [TopologicalSpace V] [DiscreteTopology V] [DistribMulAction AbsGalQ2 V] [DistribMulAction C V] (q : VZMod 2) (hq : QuadraticFp2.IsQuadraticFp2 q) (dat : FactorSet C V) (hdat : IsEquivariantFactorSet q dat) (ρ : AbsGalQ2 →ₜ* C) ( : ∀ (g : AbsGalQ2) (v : V), g v = ρ g v) (b₁ b₂ : (ContCoh.Z1 AbsGalQ2 V)) :
graphPullback dat ρ (b₁ + b₂) - (graphPullback dat ρ b₁ + graphPullback dat ρ b₂ + ContCoh.cup11Fun (QuadraticFp2.polarBihom q hq) b₂ b₁) ContCoh.B2 AbsGalQ2 (ZMod 2)

The (93) cochain identity: the graph pullback is quadratic in the cocycle, with the cup cocycle of the polar pairing (swapped slots) as cross-term, up to the explicit coboundary δ¹(g ↦ f(b₁ g, b₂ g)).

theorem GQ2.DeepPart.Q0loc_apply {C : Type} [Group C] [TopologicalSpace C] {V : Type} [AddCommGroup V] [TopologicalSpace V] [DiscreteTopology V] [DistribMulAction AbsGalQ2 V] [DistribMulAction C V] (D : TateDuality 2) (dat : FactorSet C V) (ρ : AbsGalQ2 →ₜ* C) (x : ContCoh.H1 AbsGalQ2 V) :
SectionSix.Q0loc D dat ρ x = (SectionSix.iotaF D) (H2ofFun AbsGalQ2 (graphPullback dat ρ (Quotient.out x)))

Q⁰_loc unfolded (definitional).

theorem GQ2.DeepPart.polarBihom_equivariant {V : Type} [AddCommGroup V] [DistribMulAction AbsGalQ2 V] (q : VZMod 2) (hq : QuadraticFp2.IsQuadraticFp2 q) (hqG : ∀ (g : AbsGalQ2) (v : V), q (g v) = q v) (g : AbsGalQ2) (v w : V) :
((QuadraticFp2.polarBihom q hq) (g v)) (g w) = g ((QuadraticFp2.polarBihom q hq) v) w

The polar pairing is G_ℚ₂-equivariant for a Galois-invariant q (𝔽₂ acts trivially).

theorem GQ2.DeepPart.Q0loc_add {C : Type} [Group C] [TopologicalSpace C] [DiscreteTopology C] {V : Type} [AddCommGroup V] [TopologicalSpace V] [DiscreteTopology V] [DistribMulAction AbsGalQ2 V] [ContinuousSMul AbsGalQ2 V] [DistribMulAction C V] (D : TateDuality 2) (q : VZMod 2) (hq : QuadraticFp2.IsQuadraticFp2 q) (dat : FactorSet C V) (hdat : IsEquivariantFactorSet q dat) (ρ : AbsGalQ2 →ₜ* C) ( : ∀ (g : AbsGalQ2) (v : V), g v = ρ g v) (hqG : ∀ (g : AbsGalQ2) (v : V), q (g v) = q v) (x y : ContCoh.H1 AbsGalQ2 V) :
SectionSix.Q0loc D dat ρ (x + y) = SectionSix.Q0loc D dat ρ x + SectionSix.Q0loc D dat ρ y + (SectionSix.iotaF D) (((ContCoh.cup11 (QuadraticFp2.polarBihom q hq) ) y) x)

Eq. (93), class level: Q⁰_loc(x+y) = Q⁰_loc(x) + Q⁰_loc(y) + ι_F(y ∪_B x).

theorem GQ2.DeepPart.polar_Q0loc {C : Type} [Group C] [TopologicalSpace C] [DiscreteTopology C] {V : Type} [AddCommGroup V] [TopologicalSpace V] [DiscreteTopology V] [DistribMulAction AbsGalQ2 V] [ContinuousSMul AbsGalQ2 V] [DistribMulAction C V] (D : TateDuality 2) (q : VZMod 2) (hq : QuadraticFp2.IsQuadraticFp2 q) (dat : FactorSet C V) (hdat : IsEquivariantFactorSet q dat) (ρ : AbsGalQ2 →ₜ* C) ( : ∀ (g : AbsGalQ2) (v : V), g v = ρ g v) (hqG : ∀ (g : AbsGalQ2) (v : V), q (g v) = q v) (x y : ContCoh.H1 AbsGalQ2 V) :

The polar form of Q⁰_loc is the (swapped) polar-pairing cup through ι_F — eq. (93) in polar form.

theorem GQ2.DeepPart.isQuadraticFp2_Q0loc {C : Type} [Group C] [TopologicalSpace C] [DiscreteTopology C] {V : Type} [AddCommGroup V] [TopologicalSpace V] [DiscreteTopology V] [DistribMulAction AbsGalQ2 V] [ContinuousSMul AbsGalQ2 V] [DistribMulAction C V] (D : TateDuality 2) (q : VZMod 2) (hq : QuadraticFp2.IsQuadraticFp2 q) (dat : FactorSet C V) (hdat : IsEquivariantFactorSet q dat) (ρ : AbsGalQ2 →ₜ* C) ( : ∀ (g : AbsGalQ2) (v : V), g v = ρ g v) (hqG : ∀ (g : AbsGalQ2) (v : V), q (g v) = q v) :

Q⁰_loc is a quadratic map on H¹(G_ℚ₂, V) (eq. (93)): normalized with biadditive polar form.

Nonsingularity of Q⁰_loc (B6 perfect11 via the polar μ₂-dual) #

SectionSix's 𝔽₂ → μ₂ bridge is (definitionally) the DeepPart one.

noncomputable def GQ2.DeepPart.polarMuDual {V : Type} [AddCommGroup V] (q : VZMod 2) (hq : QuadraticFp2.IsQuadraticFp2 q) :
V →+ MuDual 2 V

The μ₂-valued polar self-duality v ↦ (w ↦ bridge(B(v,w))) — definitionally postPairing of the polar pairing with the bridge, viewed into the μ₂-dual.

Equations
Instances For
    theorem GQ2.DeepPart.polarMuDual_equivariant {V : Type} [AddCommGroup V] [DistribMulAction AbsGalQ2 V] (q : VZMod 2) (hq : QuadraticFp2.IsQuadraticFp2 q) (hqG : ∀ (g : AbsGalQ2) (v : V), q (g v) = q v) (g : AbsGalQ2) (v : V) :
    (polarMuDual q hq) (g v) = g (polarMuDual q hq) v

    Equivariance of the polar μ₂-dual map.

    theorem GQ2.DeepPart.card_muDual {V : Type} [AddCommGroup V] [Finite V] (h2 : ∀ (v : V), v + v = 0) :
    Nat.card (MuDual 2 V) = Nat.card V

    #Hom(V, μ₂) = #V for exp-2 V.

    theorem GQ2.DeepPart.polarMuDual_bijective {V : Type} [AddCommGroup V] [Finite V] (q : VZMod 2) (hq : QuadraticFp2.IsQuadraticFp2 q) (hns : QuadraticFp2.Nonsingular q) (h2 : ∀ (v : V), v + v = 0) :
    Function.Bijective (polarMuDual q hq)

    The polar μ₂-dual map is bijective (nonsingularity + counting).

    theorem GQ2.DeepPart.mapCoeff1_injective {A B : Type} [AddCommGroup A] [AddCommGroup B] [TopologicalSpace A] [TopologicalSpace B] [DiscreteTopology A] [DiscreteTopology B] [DistribMulAction AbsGalQ2 A] [ContinuousSMul AbsGalQ2 A] [DistribMulAction AbsGalQ2 B] [ContinuousSMul AbsGalQ2 B] (f : A →+ B) (hf : Continuous f) (hcompat : ∀ (g : AbsGalQ2) (a : A), f (g a) = g f a) (hinj : Function.Injective f) (hsurj : Function.Surjective f) :
    Function.Injective (ContCoh.mapCoeff1 f hf hcompat)

    mapCoeff1 of an equivariant additive bijection is injective (coboundaries pull back along the inverse).

    theorem GQ2.DeepPart.mapCoeff2_muTwo_cup {V : Type} [AddCommGroup V] [TopologicalSpace V] [DiscreteTopology V] [DistribMulAction AbsGalQ2 V] [ContinuousSMul AbsGalQ2 V] (q : VZMod 2) (hq : QuadraticFp2.IsQuadraticFp2 q) (hqG : ∀ (g : AbsGalQ2) (v : V), q (g v) = q v) (y x : ContCoh.H1 AbsGalQ2 V) :

    Cup coefficient naturality at the polar pairing: pushing the 𝔽₂-valued polar cup along the μ₂-bridge is the μ₂-evaluation cup against the polar μ₂-dual class (definitional at representatives).

    theorem GQ2.DeepPart.nonsingular_Q0loc {C : Type} [Group C] [TopologicalSpace C] [DiscreteTopology C] {V : Type} [AddCommGroup V] [TopologicalSpace V] [DiscreteTopology V] [Finite V] [DistribMulAction AbsGalQ2 V] [ContinuousSMul AbsGalQ2 V] [DistribMulAction C V] (D : TateDuality 2) (q : VZMod 2) (hq : QuadraticFp2.IsQuadraticFp2 q) (hns : QuadraticFp2.Nonsingular q) (h2 : ∀ (v : V), v + v = 0) (dat : FactorSet C V) (hdat : IsEquivariantFactorSet q dat) (ρ : AbsGalQ2 →ₜ* C) ( : ∀ (g : AbsGalQ2) (v : V), g v = ρ g v) (hqG : ∀ (g : AbsGalQ2) (v : V), q (g v) = q v) :

    Q⁰_loc is nonsingular (§6.3): its polar form is a perfect pairing on H¹(G_ℚ₂, V), via B6's perfect11 clause through the polar μ₂-self-duality.

    The deep half X₊ is a subgroup #

    0 ∈ X₊ (witness A = β = 1; the zero class restricts to 0 on ker ρ since coboundaries die there) and X₊ + X₊ ⊆ X₊ (witness products: deep units are closed under multiplication, Kummer cocycles are multiplicative on ker ρ-fixed squares, and out(x+y) = out x + out y up to a coboundary that dies on ker ρ).

    theorem GQ2.DeepPart.h1_add_self {V : Type} [AddCommGroup V] [TopologicalSpace V] [DiscreteTopology V] [DistribMulAction AbsGalQ2 V] (hV2 : ∀ (v : V), v + v = 0) (x : ContCoh.H1 AbsGalQ2 V) :
    x + x = 0

    of an exponent-2 module has exponent 2.

    theorem GQ2.DeepPart.vanish_on_ker_of_H1mk_eq_zero {C : Type} [Group C] [TopologicalSpace C] {V : Type} [AddCommGroup V] [TopologicalSpace V] [DiscreteTopology V] [DistribMulAction AbsGalQ2 V] [DistribMulAction C V] (ρ : AbsGalQ2 →ₜ* C) ( : ∀ (g : AbsGalQ2) (v : V), g v = ρ g v) {d : (ContCoh.Z1 AbsGalQ2 V)} (hd : (ContCoh.H1mk AbsGalQ2 V) d = 0) (n : ρ.ker) :
    d n = 0

    A -cocycle whose class vanishes dies pointwise on ker ρ (the coboundary g ↦ g•w₀ − w₀ is trivial there since the action factors through ρ).

    theorem GQ2.DeepPart.kummerRestrict_hom {N : Subgroup (Kummer.GaloisGroup ℚ_[2])} {A β : AlgebraicClosure ℚ_[2]} (hsq : β ^ 2 = A) (hβ0 : β 0) (hAfix : gN, g A = A) (n m : N) :

    The restricted Kummer cocycle of an N-fixed square is a hom on N (sign bookkeeping via two_values_of_fixed).

    theorem GQ2.DeepPart.kummerRestrict_mem_Z1 {N : Subgroup (Kummer.GaloisGroup ℚ_[2])} {A β : AlgebraicClosure ℚ_[2]} (hsq : β ^ 2 = A) (hβ0 : β 0) (hAfix : gN, g A = A) :
    (fun (n : N) => Kummer.kummerCocycleFun β n) ContCoh.Z1 (↥N) (ZMod 2)

    The restricted Kummer cocycle of an N-fixed square lies in Z¹(N, 𝔽₂).

    theorem GQ2.DeepPart.phiRestrict_mem_Z1 {C : Type} [Group C] [TopologicalSpace C] {V : Type} [AddCommGroup V] [TopologicalSpace V] [DiscreteTopology V] [DistribMulAction AbsGalQ2 V] [DistribMulAction C V] (ρ : AbsGalQ2 →ₜ* C) ( : ∀ (g : AbsGalQ2) (v : V), g v = ρ g v) (b : (ContCoh.Z1 AbsGalQ2 V)) (φ : V →+ ZMod 2) :
    (fun (n : ρ.ker) => φ (b n)) ContCoh.Z1 (↥ρ.ker) (ZMod 2)

    The φ-coordinate of a cocycle restricted to ker ρ lies in Z¹(ker ρ, 𝔽₂) (the action is trivial there).

    theorem GQ2.DeepPart.H1ofFun_add {G : Type u_1} [Group G] [TopologicalSpace G] [IsTopologicalGroup G] [DistribMulAction G (ZMod 2)] [ContinuousSMul G (ZMod 2)] {f g : GZMod 2} (hf : f ContCoh.Z1 G (ZMod 2)) (hg : g ContCoh.Z1 G (ZMod 2)) :
    H1ofFun G (f + g) = H1ofFun G f + H1ofFun G g

    H1ofFun is additive on actual cocycles.

    noncomputable def GQ2.DeepPart.deepPartSubgroup {C : Type} [Group C] [TopologicalSpace C] {V : Type} [AddCommGroup V] [TopologicalSpace V] [DiscreteTopology V] [DistribMulAction AbsGalQ2 V] [ContinuousSMul AbsGalQ2 V] [DistribMulAction C V] (ρ : AbsGalQ2 →ₜ* C) ( : ∀ (g : AbsGalQ2) (v : V), g v = ρ g v) (hV2 : ∀ (v : V), v + v = 0) :
    AddSubgroup (ContCoh.H1 AbsGalQ2 V)

    The deep half X₊ is an additive subgroup of H¹(G_ℚ₂, V).

    Equations
    Instances For

      The dim clause and Prop 6.18 (ramified), reduced to the two Kummer cores #

      theorem GQ2.DeepPart.card_Q0loc_zero_eq_of_dim_of_vanish {C : Type} [Group C] [TopologicalSpace C] [DiscreteTopology C] {V : Type} [AddCommGroup V] [TopologicalSpace V] [DiscreteTopology V] [Finite V] [DistribMulAction AbsGalQ2 V] [ContinuousSMul AbsGalQ2 V] [DistribMulAction C V] (D : TateDuality 2) (q : VZMod 2) (hq : QuadraticFp2.IsQuadraticFp2 q) (hns : QuadraticFp2.Nonsingular q) (dat : FactorSet C V) (hdat : IsEquivariantFactorSet q dat) (ρ : AbsGalQ2 →ₜ* C) ( : ∀ (g : AbsGalQ2) (v : V), g v = ρ g v) (hρsurj : Function.Surjective ρ) (hsimple : ∀ (W : AddSubgroup V), (∀ (h : C), wW, h w W)W = W = ) (h₀ : C) (hmoves : ∃ (v : V), h₀ v v) (hinv : ∀ (c : C) (v : V), q (c v) = q v) (hV2 : ∀ (v : V), v + v = 0) (hdim : Nat.card (SectionSix.deepPart ρ) ^ 2 = Nat.card (ContCoh.H1 AbsGalQ2 V)) (hvanish : xSectionSix.deepPart ρ, SectionSix.Q0loc D dat ρ x = 0) (m : ) (hm : 1 m) (hcard : Nat.card V = 2 ^ (2 * m)) :
      Nat.card { x : ContCoh.H1 AbsGalQ2 V // SectionSix.Q0loc D dat ρ x = 0 } = 2 ^ (2 * m - 1) + 2 ^ (m - 1)

      Prop 6.18 (eq. (115), ramified) from Lemma 6.17: given the dim clause (hdim, #X₊² = #H¹) and the vanishing clause (hvanish, Q⁰_loc|X₊ = 0), the zero-count of Q⁰_loc is 2^{2m−1} + 2^{m−1} — the positive Gauss sign, via the Lagrangian Arf package (arf_zero_of_card_sq) and the Euler-characteristic count. Ax: B6 (via D), B7.

      theorem GQ2.DeepPart.exp_two_of_simple_of_card {V : Type} [AddCommGroup V] [Finite V] {C : Type u_1} [Group C] [DistribMulAction C V] (hsimple : ∀ (W : AddSubgroup V), (∀ (h : C), wW, h w W)W = W = ) (m : ) (hm : 1 m) (hcard : Nat.card V = 2 ^ (2 * m)) (v : V) :
      v + v = 0

      The two-torsion subgroup of a 2^{2m}-order simple module is everything: V has exponent 2 (additive Cauchy + simplicity).