Mathematica programming an advanced introduction