Add a bunch of stuff to the Mathematica code