Mathematica 함수 호출 예외 발생 시 계산 중지

문제 설명: Solve[]를 호출하는 동안 오류가 발생하면 계산을 중단하고 오류 정보를 되돌려줍니다.
코드 구현:
sol = Check[Solve[EQ, vars],
         Print["The number of variables is greater than the number of equations."];
         Abort[],Solve::svars];
If[Length[sol]==0,
      Print["There is no solution."];
      Abort[]
];
설명: Solve 구해에서 Solve::svars 오류가 발생하면 경고를 출력하고 Abort로 계산을 종료합니다.그렇지 않으면 무해한 것인지 아닌지를 검사한다.

좋은 웹페이지 즐겨찾기