Previous: dem42 Up: ../plot79_d.html Next: dem44


DEM43

       SUBROUTINE  DEM43 (NIN,NOUT)
 C$    (DEM43 - Akima's Interpolant)
 C$    This program illustrates the  use of subroutines FITIN  and
 C$    FITCF from ACM Algorithm  433 for the fitting  of a set  of
 C$    data points with a smooth  curve.  The function shown is  a
 C$    decaying sine  wave,  and  the error  in  the  interpolated
 C$    function multiplied  by 100  is superimposed  on the  plot.
 C$    The original data points are marked by crosses.
 C$    (10-APR-82)