∀ {A : Type u_1} [inst : CategoryTheory.Category.{u_3, u_1} A] {B : Type u_2}
  [inst_1 : CategoryTheory.Category.{u_4, u_2} B]
  (L : CategoryTheory.Functor A (CategoryTheory.Discrete PUnit.{u_5 + 1}))
  (R : CategoryTheory.Functor B (CategoryTheory.Discrete PUnit.{u_5 + 1})) (X : A × B),
  { left := (CategoryTheory.CategoryStruct.id X).1, right := (CategoryTheory.CategoryStruct.id X).2, w := ⋯ } =
    CategoryTheory.CategoryStruct.id { left := X.1, right := X.2, hom := CategoryTheory.Discrete.eqToHom ⋯ }