∀ {R : Type u₁} {L : Type u₂} {M : Type u₄} [inst : CommRing R] [inst_1 : LieRing L] [inst_2 : LieAlgebra R L]
  [inst_3 : AddCommGroup M] [inst_4 : Module R M] [inst_5 : LieRingModule L M] [inst_6 : LieModule R L M]
  {I : LieIdeal R L} {x : L},
  R ∙ x ⊔ (LieIdeal.toLieSubalgebra R L I).toSubmodule = ⊤ →
    ∀ (N : LieSubmodule R L M), ↑⁅⊤, N⁆ = Submodule.map ((LieModule.toEnd R L M) x) ↑N ⊔ ↑⁅I, N⁆