Mechanics and dynamical systems with mathematica - Bellomo, Nicola (Birkhauser, 2000)