{A : Type u₁} →
  [inst : CategoryTheory.Category.{v₁, u₁} A] →
    {B : Type u₂} →
      [inst_1 : CategoryTheory.Category.{v₂, u₂} B] →
        (L : CategoryTheory.Functor A (CategoryTheory.Discrete PUnit.{u_1 + 1})) →
          (R : CategoryTheory.Functor B (CategoryTheory.Discrete PUnit.{u_1 + 1})) →
            CategoryTheory.Functor (A × B) (CategoryTheory.Comma L R)