Theorem: HomologicalComplex₂.flip_totalFlipIso
File: Mathlib/Algebra/Homology/TotalComplexSymmetry.lean

Proof steps:
state_before: C : Type u_1
I₁ : Type u_2
I₂ : Type u_3
J : Type u_4
inst✝⁹ : Category.{u_5, u_1} C
inst✝⁸ : Preadditive C
c₁ : ComplexShape I₁
c₂ : ComplexShape I₂
K : HomologicalComplex₂ C c₁ c₂
c : ComplexShape J
inst✝⁷ : TotalComplexShape c₁ c₂ c
inst✝⁶ : TotalComplexShape c₂ c₁ c
inst✝⁵ : TotalComplexShapeSymmetry c₁ c₂ c
inst✝⁴ : K.HasTotal c
inst✝³ : K.flip.HasTotal c
inst✝² : DecidableEq J
inst✝¹ : TotalComplexShapeSymmetry c₂ c₁ c
inst✝ : TotalComplexShapeSymmetrySymmetry c₁ c₂ c
⊢ K.flip.totalFlipIso c = (K.totalFlipIso c).symm
state_after: case w.h.h
C : Type u_1
I₁ : Type u_2
I₂ : Type u_3
J : Type u_4
inst✝⁹ : Category.{u_5, u_1} C
inst✝⁸ : Preadditive C
c₁ : ComplexShape I₁
c₂ : ComplexShape I₂
K : HomologicalComplex₂ C c₁ c₂
c : ComplexShape J
inst✝⁷ : TotalComplexShape c₁ c₂ c
inst✝⁶ : TotalComplexShape c₂ c₁ c
inst✝⁵ : TotalComplexShapeSymmetry c₁ c₂ c
inst✝⁴ : K.HasTotal c
inst✝³ : K.flip.HasTotal c
inst✝² : DecidableEq J
inst✝¹ : TotalComplexShapeSymmetry c₂ c₁ c
inst✝ : TotalComplexShapeSymmetrySymmetry c₁ c₂ c
j : J
i₁ : I₁
i₂ : I₂
h : c₁.π c₂ c (i₁, i₂) = j
⊢ K.flip.flip.ιTotal c i₁ i₂ j h ≫ (K.flip.totalFlipIso c).hom.f j =
    K.flip.flip.ιTotal c i₁ i₂ j h ≫ (K.totalFlipIso c).symm.hom.f j
tactic: ext j i₁ i₂ h
state_before: case w.h.h
C : Type u_1
I₁ : Type u_2
I₂ : Type u_3
J : Type u_4
inst✝⁹ : Category.{u_5, u_1} C
inst✝⁸ : Preadditive C
c₁ : ComplexShape I₁
c₂ : ComplexShape I₂
K : HomologicalComplex₂ C c₁ c₂
c : ComplexShape J
inst✝⁷ : TotalComplexShape c₁ c₂ c
inst✝⁶ : TotalComplexShape c₂ c₁ c
inst✝⁵ : TotalComplexShapeSymmetry c₁ c₂ c
inst✝⁴ : K.HasTotal c
inst✝³ : K.flip.HasTotal c
inst✝² : DecidableEq J
inst✝¹ : TotalComplexShapeSymmetry c₂ c₁ c
inst✝ : TotalComplexShapeSymmetrySymmetry c₁ c₂ c
j : J
i₁ : I₁
i₂ : I₂
h : c₁.π c₂ c (i₁, i₂) = j
⊢ K.flip.flip.ιTotal c i₁ i₂ j h ≫ (K.flip.totalFlipIso c).hom.f j =
    K.flip.flip.ιTotal c i₁ i₂ j h ≫ (K.totalFlipIso c).symm.hom.f j
state_after: case w.h.h
C : Type u_1
I₁ : Type u_2
I₂ : Type u_3
J : Type u_4
inst✝⁹ : Category.{u_5, u_1} C
inst✝⁸ : Preadditive C
c₁ : ComplexShape I₁
c₂ : ComplexShape I₂
K : HomologicalComplex₂ C c₁ c₂
c : ComplexShape J
inst✝⁷ : TotalComplexShape c₁ c₂ c
inst✝⁶ : TotalComplexShape c₂ c₁ c
inst✝⁵ : TotalComplexShapeSymmetry c₁ c₂ c
inst✝⁴ : K.HasTotal c
inst✝³ : K.flip.HasTotal c
inst✝² : DecidableEq J
inst✝¹ : TotalComplexShapeSymmetry c₂ c₁ c
inst✝ : TotalComplexShapeSymmetrySymmetry c₁ c₂ c
j : J
i₁ : I₁
i₂ : I₂
h : c₁.π c₂ c (i₁, i₂) = j
⊢ c₂.σ c₁ c i₂ i₁ • K.flip.ιTotal c i₂ i₁ j ⋯ = K.flip.flip.ιTotal c i₁ i₂ j h ≫ (K.totalFlipIso c).inv.f j
tactic: rw [Iso.symm_hom, ιTotal_totalFlipIso_f_hom]
state_before: case w.h.h
C : Type u_1
I₁ : Type u_2
I₂ : Type u_3
J : Type u_4
inst✝⁹ : Category.{u_5, u_1} C
inst✝⁸ : Preadditive C
c₁ : ComplexShape I₁
c₂ : ComplexShape I₂
K : HomologicalComplex₂ C c₁ c₂
c : ComplexShape J
inst✝⁷ : TotalComplexShape c₁ c₂ c
inst✝⁶ : TotalComplexShape c₂ c₁ c
inst✝⁵ : TotalComplexShapeSymmetry c₁ c₂ c
inst✝⁴ : K.HasTotal c
inst✝³ : K.flip.HasTotal c
inst✝² : DecidableEq J
inst✝¹ : TotalComplexShapeSymmetry c₂ c₁ c
inst✝ : TotalComplexShapeSymmetrySymmetry c₁ c₂ c
j : J
i₁ : I₁
i₂ : I₂
h : c₁.π c₂ c (i₁, i₂) = j
⊢ c₂.σ c₁ c i₂ i₁ • K.flip.ιTotal c i₂ i₁ j ⋯ = K.flip.flip.ιTotal c i₁ i₂ j h ≫ (K.totalFlipIso c).inv.f j
state_after: case w.h.h
C : Type u_1
I₁ : Type u_2
I₂ : Type u_3
J : Type u_4
inst✝⁹ : Category.{u_5, u_1} C
inst✝⁸ : Preadditive C
c₁ : ComplexShape I₁
c₂ : ComplexShape I₂
K : HomologicalComplex₂ C c₁ c₂
c : ComplexShape J
inst✝⁷ : TotalComplexShape c₁ c₂ c
inst✝⁶ : TotalComplexShape c₂ c₁ c
inst✝⁵ : TotalComplexShapeSymmetry c₁ c₂ c
inst✝⁴ : K.HasTotal c
inst✝³ : K.flip.HasTotal c
inst✝² : DecidableEq J
inst✝¹ : TotalComplexShapeSymmetry c₂ c₁ c
inst✝ : TotalComplexShapeSymmetrySymmetry c₁ c₂ c
j : J
i₁ : I₁
i₂ : I₂
h : c₁.π c₂ c (i₁, i₂) = j
⊢ c₂.σ c₁ c i₂ i₁ • K.flip.ιTotal c i₂ i₁ j ⋯ = K.ιTotal c i₁ i₂ j h ≫ (K.totalFlipIso c).inv.f j
tactic: dsimp only [flip_flip]
state_before: case w.h.h
C : Type u_1
I₁ : Type u_2
I₂ : Type u_3
J : Type u_4
inst✝⁹ : Category.{u_5, u_1} C
inst✝⁸ : Preadditive C
c₁ : ComplexShape I₁
c₂ : ComplexShape I₂
K : HomologicalComplex₂ C c₁ c₂
c : ComplexShape J
inst✝⁷ : TotalComplexShape c₁ c₂ c
inst✝⁶ : TotalComplexShape c₂ c₁ c
inst✝⁵ : TotalComplexShapeSymmetry c₁ c₂ c
inst✝⁴ : K.HasTotal c
inst✝³ : K.flip.HasTotal c
inst✝² : DecidableEq J
inst✝¹ : TotalComplexShapeSymmetry c₂ c₁ c
inst✝ : TotalComplexShapeSymmetrySymmetry c₁ c₂ c
j : J
i₁ : I₁
i₂ : I₂
h : c₁.π c₂ c (i₁, i₂) = j
⊢ c₂.σ c₁ c i₂ i₁ • K.flip.ιTotal c i₂ i₁ j ⋯ = K.ιTotal c i₁ i₂ j h ≫ (K.totalFlipIso c).inv.f j
state_after: no goals
tactic: rw [ιTotal_totalFlipIso_f_inv, ComplexShape.σ_symm]