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