EquationSymbolicSolveRequest[List[Equal[μ,PI]],List[μ]]Solution[{μ,ExpressionSetPoint[PI,False,ReservedComplex],3.1415926535898}]EquationSymbolicSolveRequest[List[Equal[Product[μ,x],Product[PI,y]]],List[x]]Solution[{x,ExpressionSetPoint[ExpressionWithCondition[Divide[Product[PI,y],μ],NotEqual[μ,0]],False,ReservedComplex]}]Solution[{x,ExpressionWithCondition[ReservedEmpty,And[Equal[μ,0],NotEqual[y,0]]]}]Solution[{x,ExpressionWithCondition[ReservedComplex,And[Equal[μ,0],Equal[y,0]]]}]EquationSymbolicSolveRequest[List[Equal[Product[μ,x],Product[PI,y]]],List[μ]]Solution[{μ,ExpressionSetPoint[ExpressionWithCondition[Divide[Product[PI,y],x],NotEqual[x,0]],False,ReservedComplex]}]Solution[{μ,ExpressionWithCondition[ReservedEmpty,And[Equal[x,0],NotEqual[y,0]]]}]Solution[{μ,ExpressionWithCondition[ReservedComplex,And[Equal[x,0],Equal[y,0]]]}]EquationSymbolicSolveRequest[List[Equal[Product[μ,x],Product[PI,y]]],List[y]]Solution[{y,ExpressionSetPoint[Divide[Product[x,μ],PI],False,ReservedComplex]}]GraphingShow2D[PlotEq2D[Equal[Product[μ,x],Product[PI,y]]],Options[Option[ArgRangeValue,μ,0,2,2],Option[RangeX,-2,2],Option[RangeY,-2,2]]]