EquationSymbolicSolveRequest[List[Equal[Product[δ,x],Product[β,y]]],List[x]]Solution[{x,ExpressionSetPoint[ExpressionWithCondition[Divide[Product[y,β],δ],NotEqual[δ,0]],False,ReservedReal]}]EquationSymbolicSolveRequest[List[Equal[Product[δ,x],Product[β,y]]],List[x]]Solution[{x,ExpressionSetPoint[ExpressionWithCondition[Divide[Product[y,β],δ],NotEqual[δ,0]],False,ReservedReal]}]Solution[{x,ExpressionWithCondition[ReservedEmpty,And[Equal[δ,0],NotEqual[Negative[Product[β,y]],0]]]}]Solution[{x,ExpressionWithCondition[ReservedReal,And[Equal[δ,0],Equal[Negative[Product[β,y]],0]]]}]EquationSymbolicSolveRequest[List[Equal[Product[δ,x],Product[β,y]]],List[δ]]Solution[{δ,ExpressionSetPoint[ExpressionWithCondition[Divide[Product[y,β],x],NotEqual[x,0]],False,ReservedReal]}]EquationSymbolicSolveRequest[List[Equal[Product[δ,x],Product[β,y]]],List[β]]Solution[{β,ExpressionSetPoint[ExpressionWithCondition[Divide[Product[x,δ],y],NotEqual[y,0]],False,ReservedReal]}]EquationSymbolicSolveRequest[List[Equal[Product[δ,x],Product[β,y]]],List[y]]Solution[{y,ExpressionSetPoint[ExpressionWithCondition[Divide[Product[x,δ],β],NotEqual[β,0]],False,ReservedReal]}]GraphingShow3D[PlotEq3D[Equal[Product[δ,x],Product[β,y]]],Options[Option[ArgRangeValue,δ,0,0.76,2],Option[ArgRangeValue,β,0,0.22,2],Option[ShowWireframe,false],Option[ViewAngle,17,-106,86],Option[RangeX,-2,2],Option[RangeY,-3,3],Option[RangeZ,-2,2]]]GraphingShow3D[Plot3D[Product[δ,x]],Plot3D[Product[β,y]],Options[Option[ShowWireframe,false],Option[ViewAngle,58.187,78.504,-50.385]]]GraphingShow2D[PlotEq2D[Equal[Product[δ,x],Product[β,y]]],Options[Option[ArgRangeValue,δ,0,0.58,2],Option[ArgRangeValue,β,0,0.42,2],Option[RangeX,-2,2],Option[RangeY,-4,4]]]