SMS: Micromechanics with Mathematica /