∀ {R : Type u_1} {M : Type u_2} [inst : Monoid R] [inst_1 : MulAction R M] [inst_2 : Monoid M]
  [inst_3 : IsScalarTower R M M] [inst_4 : SMulCommClass R M M] (p : SubMulAction R M) {n : ℕ}, ↑p ^ n ⊆ ↑(p ^ n)