{α : Type u} →
  {σ : Type v} →
    {M : NFA α σ} →
      {motive : (a a_1 : σ) → (a_2 : List α) → M.Path a a_1 a_2 → Sort u_1} →
        {a a_1 : σ} → {a_2 : List α} → M.Path a a_1 a_2 → Sort (max ((max u v) + 1) u_1)