no goals
R : Type u
L : Type v
M : Type w
L' : Type w₁
inst✝⁴ : CommRing R
inst✝³ : LieRing L
inst✝² : LieAlgebra R L
inst✝¹ : LieRing L'
inst✝ : LieAlgebra R L'
I J : LieIdeal R L
f : L' →ₗ⁅R⁆ L
⊢ IsLieAbelian { x // x ∈ ↑I } ↔ D 1 I = ⊥
rw [derivedSeriesOfIdeal_succ, derivedSeriesOfIdeal_zero,
  LieSubmodule.lie_abelian_iff_lie_self_eq_bot]