{M : Type u_1} →
  {R : Type u_2} →
    [inst : Monoid M] →
      [inst_1 : Ring R] →
        [inst_2 : MulSemiringAction M R] →
          {S : Subring R} →
            {motive : IsInvariantSubring M S → Sort u} →
              (t : IsInvariantSubring M S) → ((smul_mem : ∀ (m : M) {x : R}, x ∈ S → m • x ∈ S) → motive ⋯) → motive t