Programming In Mathematica by Roman E Maeder