close all; clc; clear; 

% Problem EPage 82; Example EPage 66
% 
format long
approx = fgauss( 'c_4_p_10_fn', 0, 1, 16 )
format short