Modern Differential Geometry of Curves and Surfaces with Mathematica