Example 2.8
Created by
Mathematica
(September 7, 2003)