{R : Type u_1} →
  [inst : CommRing R] →
    {L : Type u_2} →
      [inst_1 : RightPreLieRing L] →
        {motive : RightPreLieAlgebra R L → Sort u} →
          (t : RightPreLieAlgebra R L) →
            ([toModule : Module R L] →
                [toIsScalarTower : IsScalarTower R L L] →
                  [toSMulCommClass : SMulCommClass R L L] →
                    motive
                      { toModule := toModule, toIsScalarTower := toIsScalarTower,
                        toSMulCommClass := toSMulCommClass }) →
              motive t