WorksheetMinus[Divide[PI,LogN[Product[x_1,Aggregate[0.4142135623731]]]],Divide[Sqrt[2],μ]]Sum[Divide[Product[PI,LogE[10]],Sum[LogE[x_1],LogE[0.4142135623731]]],Negative[Divide[Sqrt[2],μ]]]EquationSymbolicSolveRequest[List[Equal[Minus[Divide[PI,LogN[Product[x_1,0.4142135623731]]],Divide[Sqrt[2],μ]],y]],List[x_1]]Solution[{x_1,ExpressionSetPoint[ExpressionWithCondition[Exponent[ConstE,Sum[Negative[LogE[0.4142135623731]],Divide[Product[PI,LogE[10],μ],Sum[Product[y,μ],Sqrt[2]]]]],NotEqual[μ,0]],False,ReservedReal]}]WorksheetIndefiniteIntegral[Minus[Divide[PI,LogN[Product[x_1,0.4142135623731]]],Divide[Sqrt[2],μ]],x_1]Sum[Product[PI,LogE[10],IndefiniteIntegral[Divide[1,Sum[LogE[x_1],LogE[0.4142135623731]]],x_1]],Negative[Divide[Product[Sqrt[2],x_1],μ]]]