{R : Type u} →
  [inst : CommRing R] →
    {motive : FGAlgCatSkeleton R → Sort u_1} →
      (t : FGAlgCatSkeleton R) → ((n : ℕ) → (I : Ideal (MvPolynomial (Fin n) R)) → motive { n := n, I := I }) → motive t