Cup product against connecting cochains is a level coboundary
ProvedgroupCohomology.cup_deltaCochain0_add_cup02_deltaCochain1_mem_levelCoboundaries2Fix a commutative ring , a group and a homomorphism (the automorphism group of AlgebraicClosure ℚ over ), used only to speak of levels. Let be -linear representations of , with morphisms and such that is surjective on underlying modules and such that for every one has if and only if lies in the image of , and morphisms and with surjective and if and only if lies in the image of (injectivity of and of is not assumed). Let , , be -bilinear maps, with equivariant in the sense that for all , and compatible with the maps: and . Let be -invariant and let be a -cocycle of satisfying the level-constancy predicate IsLevelConstant₁ r. Then the -cochain , where deltaCochain₀ i π hπ c and deltaCochain₁ πD iD hiD y are the connecting cochains attached to the two sequences, belongs to levelCoboundaries₂ r N.
This is the cochain-level form of one of the two anticommutativity squares relating a cup-product pairing of a dual pair of extensions to the connecting homomorphisms of the associated long exact sequences: up to sign, in the relevant degree- cohomology. It is used in the proof of groupCohomology.bijective_theta_of_shortExact.
import Mathlib import Definitions.Def_GroupCohomology_ContinuousH2 import Definitions.Def_GroupCohomology_ContinuousH1 import Definitions.Def_GroupCohomology_CupProduct set_option maxHeartbeats 4000000 set_option synthInstance.maxHeartbeats 400000 set_option backward.isDefEq.respectTransparency.types false set_option autoImplicit false universe u open CategoryTheory open groupCohomology
theorem groupCohomology.cup_deltaCochain0_add_cup02_deltaCochain1_mem_levelCoboundaries2
{k G : Type u} [CommRing k] [Group G]
(r : G →* (AlgebraicClosure ℚ ≃ₐ[ℚ] AlgebraicClosure ℚ))
{M' M M'' D'' D D' N : Rep.{u} k G}
(i : M' ⟶ M) (π : M ⟶ M'') (hπ : Function.Surjective π.hom)
(hex : ∀ m : M, π.hom m = 0 ↔ ∃ m' : M', i.hom m' = m)
(πD : D'' ⟶ D) (iD : D ⟶ D') (hiD : Function.Surjective iD.hom)
(hexD : ∀ x : D, iD.hom x = 0 ↔ ∃ y : D'', πD.hom y = x)
(φ' : M' →ₗ[k] D' →ₗ[k] N)
(φ : M →ₗ[k] D →ₗ[k] N) (hφ : Rep.IsEquivariantBilinear M D N φ)
(φ'' : M'' →ₗ[k] D'' →ₗ[k] N)
(hcompat_i : ∀ (m' : M') (x : D), φ (i.hom m') x = φ' m' (iD.hom x))
(hcompat_π : ∀ (m : M) (y : D''), φ m (πD.hom y) = φ'' (π.hom m) y)
(c : M'') (hc : ∀ s, M''.ρ s c = c)
(y : cocycles₁ D') (hy : IsLevelConstant₁ r (⇑y)) :
(cupCochain φ' (deltaCochain₀ i π hπ c) (⇑y)
+ fun st => φ'' c (deltaCochain₁ πD iD hiD (⇑y) st))
∈ levelCoboundaries₂ r N := by sorry