Create Mathematica.nb