EquationSymbolicSolveRequest[List[Equal[a_1,b]],List[b]]Solution[{b,ExpressionSetPoint[a_1,False,ReservedComplex]}]WorksheetAssign[a_1,b]bAssign[a_1,b]