結果 : solving systems of equations in mathematica