∀ {C : Type u} [inst : CategoryTheory.Category.{v, u} C] [inst_1 : CategoryTheory.Limits.HasFiniteProducts C]
  [inst_2 : CategoryTheory.Limits.HasPullbacks C] {X Y : CategoryTheory.Dial C} (f f_1 : X.src ⟶ Y.src) (e_f : f = f_1)
  (F F_1 : X.src ⨯ Y.tgt ⟶ X.tgt) (e_F : F = F_1)
  (le :
    (CategoryTheory.Subobject.pullback (CategoryTheory.Limits.prod.lift CategoryTheory.Limits.prod.fst F)).obj X.rel ≤
      (CategoryTheory.Subobject.pullback
            (CategoryTheory.Limits.prod.map f (CategoryTheory.CategoryStruct.id Y.tgt))).obj
        Y.rel),
  { f := f, F := F, le := le } = { f := f_1, F := F_1, le := ⋯ }