∀ {R : Type u_1} {L : Type u_2} {M : Type u_3} [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] {h e f : L}
  {m : M} {μ : R} {t : IsSl2Triple h e f},
  t.HasPrimitiveVectorWith m μ →
    ∀ [CharZero R] [IsDomain R] [Module.IsTorsionFree R M] {n : ℕ},
      μ = ↑n → ∀ {i : ℕ}, i ≤ n → ((LieModule.toEnd R L M) f ^ i) m ≠ 0