Using Mathematica to Illustrate the Race Track Principle in Calculus