∀ {R : Type u_2} {M : Type u} [inst : Ring R] [inst_1 : AddCommGroup M] [inst_2 : Module R M] [IsSemisimpleModule R M]
  {m : Submodule R M}, m.IsFullyInvariant ↔ ∀ S ≤ m, ∀ [IsSimpleModule R ↥S], isotypicComponent R M ↥S ≤ m