EquationSymbolicSolveRequest[List[Equal[Exponent[E,2],λ]],List[λ]]Solution[{λ,ExpressionSetPoint[Exponent[E,2],False,ReservedComplex]}]1Eq.1Var.1Inst.19EquationSymbolicSolveRequest[List[Equal[Exponent[E,2],λ]],List[E]]Solution[{E,ExpressionSetPoint[Product[Sqrt[Abs[λ]],Exponent[ConstE,Divide[Product[Arg[λ],&i],2]]],False,ReservedComplex]}]Solution[{E,ExpressionSetPoint[Product[Sqrt[Abs[λ]],Exponent[ConstE,Sum[Divide[Product[Arg[λ],&i],2],Product[PI,&i]]]],False,ReservedComplex]}]1Eq.1Var.1Inst.Quad.QuadForm.7