結果 : solve system of equations in mathematica