Previous: dem48 Up: ../plot79_d.html Next: dem50
SUBROUTINE DEM49 (NIN,NOUT)
C$ (DEM49 - Surface Fit Comparison)
C$ Program to test and plot the results of subroutines FITSF
C$ and FITTTR/FITTGR/FITTSV which produce an interpolation of
C$ a grid of points defined on a surface. FITSF implements
C$ ACM Algorithm 474 by H. Akima (Comm. A.C.M. 17, 18-20
C$ (1974)). FITTTR/FITTGR/FITTSV implement F. Little's
C$ triangulation surface fit. The test data defined in the
C$ arrays X(*), Y(*), and Z(*,*) below are taken from Akima's
C$ paper, and the printed output from this program should
C$ agree with the test output published in the paper.
C$ (25-NOV-86)