∀ {R : Type u_2} {M : Type u} {S : Type u_4} [inst : Ring R] [inst_1 : AddCommGroup M] [inst_2 : AddCommGroup S]
  [inst_3 : Module R M] [inst_4 : Module R S] [IsSemisimpleModule R M],
  IsIsotypicOfType R M S → ∃ ι, Nonempty (M ≃ₗ[R] ι →₀ S)