{R : Type u_1} →
  {N : Type u_2} →
    {M : Type u_4} →
      [inst : CommRing R] →
        [inst_1 : LieRing N] →
          [inst_2 : LieAlgebra R N] →
            [inst_3 : LieRing M] →
              [inst_4 : LieAlgebra R M] →
                {motive : LieAlgebra.Extension R N M → Sort u} →
                  (t : LieAlgebra.Extension R N M) →
                    ((L : Type u_5) →
                        (instLieRing : LieRing L) →
                          (instLieAlgebra : LieAlgebra R L) →
                            (incl : N →ₗ⁅R⁆ L) →
                              (proj : L →ₗ⁅R⁆ M) →
                                (IsExtension : LieAlgebra.IsExtension incl proj) →
                                  motive
                                    { L := L, instLieRing := instLieRing, instLieAlgebra := instLieAlgebra,
                                      incl := incl, proj := proj, IsExtension := IsExtension }) →
                      motive t