{n : ℕ} →
  (P : MvPFunctor.{u} (n + 1)) →
    {α : TypeVec.{u_1} n} →
      {a : P.A} →
        {f : P.last.B a → P.last.W} →
          (P.drop.B a).Arrow α →
            ((j : P.last.B a) → TypeVec.Arrow (P.WPath (f j)) α) → TypeVec.Arrow (P.WPath (WType.mk a f)) α