{R : Type u_1} →
  {M : Type u_2} →
    [inst : CommSemiring R] →
      [inst_1 : AddCommMonoid M] →
        [inst_2 : Module R M] →
          {N : Submodule R M} →
            {I : Ideal R} →
              {motive : N.IsAssociatedPrime I → Sort u} →
                (t : N.IsAssociatedPrime I) →
                  ((toIsPrime : I.IsPrime) → (eq_radical_colon : ∃ x, I = (N.colon {x}).radical) → motive ⋯) → motive t