EquationSymbolicSolveRequest[List[Equal[Product[ConstE,μ],δ]],List[μ]]Solution[{μ,ExpressionSetPoint[Divide[δ,ConstE],False,ReservedComplex]}]GraphingShow2D[PlotEq2D[Equal[Product[ConstE,μ,x],Product[δ,y]]],Options[Option[ArgRangeValue,μ,0,2,2],Option[ArgRangeValue,δ,0,2,2],Option[RangeX,-2,2],Option[RangeY,-11,11]]]