Numerical Solutions for Partial Differential Equations: Problem Solving Using Mathematica (Symbolic and Numeric Computation Series)