∀ (R : Type u_3) [inst : Ring R] (C : Type u_1) [inst_1 : CategoryTheory.Category.{u_2, u_1} C]
  [inst_2 : CategoryTheory.Abelian C] [inst_3 : CategoryTheory.Linear R C] [inst_4 : CategoryTheory.EnoughProjectives C]
  (n : ℕ) (X : C),
  CategoryTheory.NatTrans.leftOp
      (CategoryTheory.NatTrans.leftDerived
        (CategoryTheory.NatTrans.rightOp ((CategoryTheory.linearYoneda R C).map (CategoryTheory.CategoryStruct.id X)))
        n) =
    CategoryTheory.CategoryStruct.id (((CategoryTheory.linearYoneda R C).obj X).rightOp.leftDerived n).leftOp