Use of Mathematica as a Tool