{𝒮 : Type u₁} →
  {𝒳 : Type u₂} →
    [inst : CategoryTheory.Category.{v₁, u₁} 𝒮] →
      [inst_1 : CategoryTheory.Category.{v₂, u₂} 𝒳] →
        {p : CategoryTheory.Functor 𝒳 𝒮} →
          [inst_2 : HasFibers p] →
            [inst_3 : p.IsPreFibered] →
              {R S : 𝒮} →
                {a : 𝒳} → (f : R ⟶ S) → (ha : p.obj a = S) → (HasFibers.ι R).obj (HasFibers.mkPullback f ha) ⟶ a