{C : Type u₁} →
  [inst : CategoryTheory.Category.{v₁, u₁} C] →
    {F : CategoryTheory.Functor Cᵒᵖ (Type v)} →
      {Y : C} →
        {motive : F.RepresentableBy Y → Sort u} →
          (t : F.RepresentableBy Y) →
            ((homEquiv : {X : C} → (X ⟶ Y) ≃ F.obj (Opposite.op X)) →
                (homEquiv_comp :
                    ∀ {X X' : C} (f : X ⟶ X') (g : X' ⟶ Y),
                      homEquiv (CategoryTheory.CategoryStruct.comp f g) = F.map f.op (homEquiv g)) →
                  motive { homEquiv := homEquiv, homEquiv_comp := homEquiv_comp }) →
              motive t