Programming in Mathematica by Roman Maeder