EquationSymbolicSolveRequest[List[Equal[Minus[Divide[μ,Sqrt[2]],a],λ]],List[μ]]Solution[{μ,ExpressionSetPoint[Product[Sqrt[2],Sum[a,λ]],False,ReservedReal]}]EquationSymbolicSolveRequest[List[Equal[Minus[Divide[μ,Sqrt[2]],a],λ]],List[λ]]Solution[{λ,ExpressionSetPoint[Sum[Divide[Product[Sqrt[2],μ],2],Negative[a]],False,ReservedReal]}]EquationSymbolicSolveRequest[List[Equal[Minus[Divide[μ,Sqrt[2]],a],λ]],List[a]]Solution[{a,ExpressionSetPoint[Sum[Divide[Product[Sqrt[2],μ],2],Negative[λ]],False,ReservedReal]}]EquationSymbolicSolveRequest[List[Equal[Minus[Divide[μ,Sqrt[2]],a],λ]],List[μ]]Solution[{μ,ExpressionSetPoint[Product[Sqrt[2],Sum[a,λ]],False,ReservedReal]}]