Previous: dem41 Up: ../plot79_d.html Next: dem43
SUBROUTINE DEM42 (NIN,NOUT)
C$ (DEM42 - Smoothing Spline Fit)
C$ This program illustrates the use of subroutine FITSM for
C$ the production of a smoothed approximation to a set of
C$ points for which the ordinate values have associated
C$ errors. The function chosen is the sine function in the
C$ range (0,180) degrees, which is rounded to 3 decimal places
C$ before calling FITSM. The original data points are plotted
C$ superimposed on the smooth interpolated curve, and the
C$ error, multiplied by 100, is plotted at the center of the
C$ plotter page. A second call to FITSM is then made,
C$ requesting a normal cubic spline through the data points,
C$ and a second plot is produced in the same way as the first.
C$ The derivative of the spline function is computed at the
C$ data points and resplined to give an interpolated
C$ derivative which is plotted with a dashed line on the
C$ drawings.
C$ (10-APR-82)