We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
erw
Algebra.Homology.ShortComplex.Exact
1 parent fff5a28 commit f8cd90eCopy full SHA for f8cd90e
Mathlib/Algebra/Homology/ShortComplex/Exact.lean
@@ -539,11 +539,7 @@ noncomputable def leftHomologyData [HasZeroObject C] (s : S.Splitting) :
539
sub_eq_self, reassoc_of% hx, zero_comp])
540
(fun x _ b hb => by simp only [← hb, assoc, f_r, comp_id])
541
let f' := hi.lift (KernelFork.ofι S.f S.zero)
542
- have hf' : f' = 𝟙 _ := by
543
- apply Fork.IsLimit.hom_ext hi
544
- dsimp
545
- erw [Fork.IsLimit.lift_ι hi]
546
- simp only [Fork.ι_ofι, id_comp]
+ have hf' : f' = 𝟙 _ := by simp [f']
547
have wπ : f' ≫ (0 : S.X₁ ⟶ 0) = 0 := comp_zero
548
have hπ : IsColimit (CokernelCofork.ofπ 0 wπ) := CokernelCofork.IsColimit.ofEpiOfIsZero _
549
(by rw [hf']; infer_instance) (isZero_zero _)
0 commit comments