EquationSymbolicSolveRequest[List[Equal[Product[f,Exponent[x,2]],Divide[r,t]]],List[x]]Solution[{x,ExpressionSetPoint[ExpressionWithCondition[Sqrt[Divide[r,Product[f,t]]],And[GreaterOrEqual[Divide[r,Product[f,t]],0],NotEqual[f,0],NotEqual[t,0]]],False,ReservedReal]}]Solution[{x,ExpressionSetPoint[ExpressionWithCondition[Negative[Sqrt[Divide[r,Product[f,t]]]],And[GreaterOrEqual[Divide[r,Product[f,t]],0],NotEqual[f,0],NotEqual[t,0]]],False,ReservedReal]}]EquationSymbolicSolveRequest[List[Equal[Product[f,Exponent[x,2]],Divide[r,t]]],List[x]]Solution[{x,ExpressionSetPoint[ExpressionWithCondition[Sqrt[Divide[r,Product[f,t]]],And[GreaterOrEqual[Divide[r,Product[f,t]],0],NotEqual[f,0],NotEqual[t,0]]],False,ReservedReal]}]Solution[{x,ExpressionSetPoint[ExpressionWithCondition[Negative[Sqrt[Divide[r,Product[f,t]]]],And[GreaterOrEqual[Divide[r,Product[f,t]],0],NotEqual[f,0],NotEqual[t,0]]],False,ReservedReal]}]Solution[{x,ExpressionWithCondition[ReservedEmpty,And[Equal[f,0],NotEqual[t,0],NotEqual[Negative[Divide[r,t]],0]]]}]Solution[{x,ExpressionWithCondition[ReservedReal,And[Equal[f,0],Equal[Negative[Divide[r,t]],0],NotEqual[t,0]]]}]EquationSymbolicSolveRequest[List[Equal[Product[f,Exponent[x,2]],Divide[r,t]]],List[t]]Solution[{t,ExpressionSetPoint[ExpressionWithCondition[Divide[r,Product[f,Exponent[x,2]]],And[NotEqual[Product[f,Exponent[x,2]],0],NotEqual[Divide[r,Product[f,Exponent[x,2]]],0]]],False,ReservedReal]}]EquationSymbolicSolveRequest[List[Equal[Product[f,Exponent[x,2]],Divide[r,t]]],List[r]]Solution[{r,ExpressionSetPoint[ExpressionWithCondition[Product[f,t,Exponent[x,2]],NotEqual[t,0]],False,ReservedReal]}]EquationSymbolicSolveRequest[List[Equal[Product[f,Exponent[x,2]],Divide[r,t]]],List[f]]Solution[{f,ExpressionSetPoint[ExpressionWithCondition[Divide[r,Product[t,Exponent[x,2]]],And[NotEqual[x,0],NotEqual[t,0]]],False,ReservedReal]}]GraphingShow2D[Plot2D[Product[f,Exponent[x,2]]],Plot2D[Divide[r,t]],Options[Option[ArgRangeValue,f,0,2,2],Option[RangeX,-2,2],Option[RangeY,-2,6]]]GraphingPlotEq2D[Equal[Product[f,Exponent[x,2]],Divide[r,t]]]