{C : Type u₁} →
  [inst : CategoryTheory.Category.{v₁, u₁} C] →
    {D : Type u₂} →
      [inst_1 : CategoryTheory.Category.{v₂, u₂} D] →
        {right : CategoryTheory.Functor D C} →
          {motive : right.IsRightAdjoint → Sort u} →
            (t : right.IsRightAdjoint) → ((exists_leftAdjoint : ∃ left, Nonempty (left ⊣ right)) → motive ⋯) → motive t