-- Lean 4 proof step from Mathlib.CategoryTheory.Triangulated.TStructure.ETrunc (hypothesis)
Goal:
C : Type u_1
inst : Category.{v_1, u_1} C
inst_1 : Preadditive.{v_1, u_1} C
inst_2 : HasZeroObject.{v_1, u_1} C
inst_3 : HasShift.{v_1, u_1, 0} C ℤ
inst_4 : ∀ (n : ℤ), Functor.Additive.{v_1, u_1, v_1, u_1} (shiftFunctor C n)
inst_5 : Pretriangulated.{v_1, u_1} C
t : TStructure.{v_1, u_1} C
x y z : EInt
f : x ⟶ y
g : y ⟶ z
⊢ Eq (α :=
    Quiver.Hom (V := Functor.{v_1, v_1, u_1, u_1} C C)
      (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C) x :
        Functor.{v_1, v_1, u_1, u_1} C C)
      (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C) z :
        Functor.{v_1, v_1, u_1, u_1} C C))
    (WithBotTop.rec (motive := fun {x : EInt} ↦
        (f : x ⟶ z) →
          Quiver.Hom (V := Functor.{v_1, v_1, u_1, u_1} C C)
            (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C) x :
              Functor.{v_1, v_1, u_1, u_1} C C)
            (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C) z :
              Functor.{v_1, v_1, u_1, u_1} C C))
        (fun (f : ⊥ ⟶ z) ↦
          WithBotTop.rec (motive := fun {y : EInt} ↦
            (f : ⊥ ⟶ y) →
              Quiver.Hom (V := Functor.{v_1, v_1, u_1, u_1} C C)
                (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C)
                    ⊥ :
                  Functor.{v_1, v_1, u_1, u_1} C C)
                (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C)
                    y :
                  Functor.{v_1, v_1, u_1, u_1} C C))
            (fun (f : Quiver.Hom (V := EInt) ⊥ ⊥) ↦
              𝟙
                (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C)
                  ⊥))
            (fun (b : ℤ) (f : ⊥ ⟶ WithBotTop.coe b) ↦ 0) (fun (f : Quiver.Hom (V := EInt) ⊥ ⊤) ↦ 0) z f)
        (fun (a : ℤ) (f : WithBotTop.coe a ⟶ z) ↦
          WithBotTop.rec (motive := fun {y : EInt} ↦
            (f : WithBotTop.coe a ⟶ y) →
              Quiver.Hom (V := Functor.{v_1, v_1, u_1, u_1} C C)
                (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C)
                    (WithBotTop.coe a) :
                  Functor.{v_1, v_1, u_1, u_1} C C)
                (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C)
                    y :
                  Functor.{v_1, v_1, u_1, u_1} C C))
            (fun (f : WithBotTop.coe a ⟶ ⊥) ↦ 0)
            (fun (b : ℤ) (f : WithBotTop.coe a ⟶ WithBotTop.coe b) ↦ t.natTransTruncLTOfLE a b ⋯)
            (fun (f : WithBotTop.coe a ⟶ ⊤) ↦ t.truncLTι a) z f)
        (fun (f : ⊤ ⟶ z) ↦
          WithBotTop.rec (motive := fun {y : EInt} ↦
            (f : ⊤ ⟶ y) →
              Quiver.Hom (V := Functor.{v_1, v_1, u_1, u_1} C C)
                (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C)
                    ⊤ :
                  Functor.{v_1, v_1, u_1, u_1} C C)
                (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C)
                    y :
                  Functor.{v_1, v_1, u_1, u_1} C C))
            (fun (f : Quiver.Hom (V := EInt) ⊤ ⊥) ↦ 0) (fun (b : ℤ) (f : ⊤ ⟶ WithBotTop.coe b) ↦ 0)
            (fun (f : Quiver.Hom (V := EInt) ⊤ ⊤) ↦
              𝟙
                (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C)
                  ⊤))
            z f)
        x (f ≫ g) :
      Quiver.Hom (V := Functor.{v_1, v_1, u_1, u_1} C C)
        (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C) x :
          Functor.{v_1, v_1, u_1, u_1} C C)
        (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C) z :
          Functor.{v_1, v_1, u_1, u_1} C C))
    (CategoryStruct.comp (Y :=
        WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C) y)
        (WithBotTop.rec (motive := fun {x : EInt} ↦
          (f : x ⟶ y) →
            Quiver.Hom (V := Functor.{v_1, v_1, u_1, u_1} C C)
              (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C)
                  x :
                Functor.{v_1, v_1, u_1, u_1} C C)
              (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C)
                  y :
                Functor.{v_1, v_1, u_1, u_1} C C))
          (fun (f : ⊥ ⟶ y) ↦
            WithBotTop.rec (motive := fun {y : EInt} ↦
              (f : ⊥ ⟶ y) →
                Quiver.Hom (V := Functor.{v_1, v_1, u_1, u_1} C C)
                  (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT
                      (𝟭 C) ⊥ :
                    Functor.{v_1, v_1, u_1, u_1} C C)
                  (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT
                      (𝟭 C) y :
                    Functor.{v_1, v_1, u_1, u_1} C C))
              (fun (f : Quiver.Hom (V := EInt) ⊥ ⊥) ↦
                𝟙
                  (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT
                    (𝟭 C) ⊥))
              (fun (b : ℤ) (f : ⊥ ⟶ WithBotTop.coe b) ↦ 0) (fun (f : Quiver.Hom (V := EInt) ⊥ ⊤) ↦ 0) y f)
          (fun (a : ℤ) (f : WithBotTop.coe a ⟶ y) ↦
            WithBotTop.rec (motive := fun {y : EInt} ↦
              (f : WithBotTop.coe a ⟶ y) →
                Quiver.Hom (V := Functor.{v_1, v_1, u_1, u_1} C C)
                  (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT
                      (𝟭 C) (WithBotTop.coe a) :
                    Functor.{v_1, v_1, u_1, u_1} C C)
                  (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT
                      (𝟭 C) y :
                    Functor.{v_1, v_1, u_1, u_1} C C))
              (fun (f : WithBotTop.coe a ⟶ ⊥) ↦ 0)
              (fun (b : ℤ) (f : WithBotTop.coe a ⟶ WithBotTop.coe b) ↦ t.natTransTruncLTOfLE a b ⋯)
              (fun (f : WithBotTop.coe a ⟶ ⊤) ↦ t.truncLTι a) y f)
          (fun (f : ⊤ ⟶ y) ↦
            WithBotTop.rec (motive := fun {y : EInt} ↦
              (f : ⊤ ⟶ y) →
                Quiver.Hom (V := Functor.{v_1, v_1, u_1, u_1} C C)
                  (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT
                      (𝟭 C) ⊤ :
                    Functor.{v_1, v_1, u_1, u_1} C C)
                  (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT
                      (𝟭 C) y :
                    Functor.{v_1, v_1, u_1, u_1} C C))
              (fun (f : Quiver.Hom (V := EInt) ⊤ ⊥) ↦ 0) (fun (b : ℤ) (f : ⊤ ⟶ WithBotTop.coe b) ↦ 0)
              (fun (f : Quiver.Hom (V := EInt) ⊤ ⊤) ↦
                𝟙
                  (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT
                    (𝟭 C) ⊤))
              y f)
          x f)
        (WithBotTop.rec (motive := fun {x : EInt} ↦
          (f : x ⟶ z) →
            Quiver.Hom (V := Functor.{v_1, v_1, u_1, u_1} C C)
              (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C)
                  x :
                Functor.{v_1, v_1, u_1, u_1} C C)
              (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C)
                  z :
                Functor.{v_1, v_1, u_1, u_1} C C))
          (fun (f : ⊥ ⟶ z) ↦
            WithBotTop.rec (motive := fun {y : EInt} ↦
              (f : ⊥ ⟶ y) →
                Quiver.Hom (V := Functor.{v_1, v_1, u_1, u_1} C C)
                  (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT
                      (𝟭 C) ⊥ :
                    Functor.{v_1, v_1, u_1, u_1} C C)
                  (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT
                      (𝟭 C) y :
                    Functor.{v_1, v_1, u_1, u_1} C C))
              (fun (f : Quiver.Hom (V := EInt) ⊥ ⊥) ↦
                𝟙
                  (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT
                    (𝟭 C) ⊥))
              (fun (b : ℤ) (f : ⊥ ⟶ WithBotTop.coe b) ↦ 0) (fun (f : Quiver.Hom (V := EInt) ⊥ ⊤) ↦ 0) z f)
          (fun (a : ℤ) (f : WithBotTop.coe a ⟶ z) ↦
            WithBotTop.rec (motive := fun {y : EInt} ↦
              (f : WithBotTop.coe a ⟶ y) →
                Quiver.Hom (V := Functor.{v_1, v_1, u_1, u_1} C C)
                  (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT
                      (𝟭 C) (WithBotTop.coe a) :
                    Functor.{v_1, v_1, u_1, u_1} C C)
                  (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT
                      (𝟭 C) y :
                    Functor.{v_1, v_1, u_1, u_1} C C))
              (fun (f : WithBotTop.coe a ⟶ ⊥) ↦ 0)
              (fun (b : ℤ) (f : WithBotTop.coe a ⟶ WithBotTop.coe b) ↦ t.natTransTruncLTOfLE a b ⋯)
              (fun (f : WithBotTop.coe a ⟶ ⊤) ↦ t.truncLTι a) z f)
          (fun (f : ⊤ ⟶ z) ↦
            WithBotTop.rec (motive := fun {y : EInt} ↦
              (f : ⊤ ⟶ y) →
                Quiver.Hom (V := Functor.{v_1, v_1, u_1, u_1} C C)
                  (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT
                      (𝟭 C) ⊤ :
                    Functor.{v_1, v_1, u_1, u_1} C C)
                  (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT
                      (𝟭 C) y :
                    Functor.{v_1, v_1, u_1, u_1} C C))
              (fun (f : Quiver.Hom (V := EInt) ⊤ ⊥) ↦ 0) (fun (b : ℤ) (f : ⊤ ⟶ WithBotTop.coe b) ↦ 0)
              (fun (f : Quiver.Hom (V := EInt) ⊤ ⊤) ↦
                𝟙
                  (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT
                    (𝟭 C) ⊤))
              z f)
          y g) :
      Quiver.Hom (V := Functor.{v_1, v_1, u_1, u_1} C C)
        (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C) x :
          Functor.{v_1, v_1, u_1, u_1} C C)
        (WithBotTop.rec (motive := fun (x : WithBotTop ℤ) ↦ Functor.{v_1, v_1, u_1, u_1} C C) 0 t.truncLT (𝟭 C) z :
          Functor.{v_1, v_1, u_1, u_1} C C))
have f' : x ≤ y
Tactic: have f' := leOfHom f