introduce the mathematica script