EquationSymbolicSolveRequest[List[Equal[Exponent[ConstE,a],δ]],List[δ]]Solution[{δ,ExpressionSetPoint[Exponent[ConstE,a],False,ReservedReal]}]EquationSymbolicSolveRequest[List[Equal[Exponent[ConstE,a],δ]],List[a]]Solution[{a,ExpressionSetPoint[LogE[δ],False,ReservedReal]}]EquationSymbolicSolveRequest[List[Equal[Exponent[ConstE,x],δ]],List[x]]Solution[{x,ExpressionSetPoint[LogE[δ],False,ReservedReal]}]GraphingPlotEq2D[Equal[Exponent[ConstE,x],δ]]