∀ {C : Type u_1} [inst : CategoryTheory.Category.{u_2, u_1} C] {A : Type u_4}
  [inst_1 : CategoryTheory.Category.{u_3, u_4} A] {U : C} (R : CategoryTheory.Presieve U)
  (P : CategoryTheory.Functor Cᵒᵖ A) [CategoryTheory.Limits.HasProducts A]
  [inst_3 : CategoryTheory.Limits.HasPullbacks C],
  CategoryTheory.Limits.HasLimit
    (CategoryTheory.Discrete.functor fun fg => P.obj (Opposite.op (CategoryTheory.Limits.pullback ↑fg.1.snd ↑fg.2.snd)))