Previous: dem47 Up: ../plot79_d.html Next: dem49
SUBROUTINE DEM48 (NIN,NOUT) C$ (DEM48 - Tensioned Spline Interpolation) C$ This program illustrates the use of routines FITC1 and C$ FITC2 from ACM Algorithm 476 for interpolating a curve by a C$ spline under tension. Two examples showing a decaying sin C$ wave and its interpolated and exact derivative are C$ produced. For each, the original data points are drawn, C$ connected by straight lines, with the interpolated curves C$ for three different tension factors appearing in quadrants C$ 2-4. The error in the interpolated function is multiplied C$ by 100 and superimposed on each plot. C$ (10-APR-82)