Lean4
/-- Given a left homology map data `ψ : LeftHomologyMapData φ h₁ h₂` such that
both left homology data `h₁` and `h₂` are preserved by a functor `F`, this is
the induced left homology map data for the morphism `F.mapShortComplex.map φ`. -/
@[simps]
noncomputable def map {φ : S₁ ⟶ S₂} {h₁ : S₁.LeftHomologyData} {h₂ : S₂.LeftHomologyData}
(ψ : LeftHomologyMapData φ h₁ h₂) (F : C ⥤ D) [F.PreservesZeroMorphisms] [h₁.IsPreservedBy F] [h₂.IsPreservedBy F] :
LeftHomologyMapData (F.mapShortComplex.map φ) (h₁.map F) (h₂.map F)
where
φK := F.map ψ.φK
φH := F.map ψ.φH
commi := by simpa only [F.map_comp] using F.congr_map ψ.commi
commf' := by simpa only [LeftHomologyData.map_f', F.map_comp] using F.congr_map ψ.commf'
commπ := by simpa only [F.map_comp] using F.congr_map ψ.commπ