NAG FL Interface
e01bef (dim1_​monotonic)

Settings help

FL Name Style:


FL Specification Language:


1 Purpose

e01bef computes a monotonicity-preserving piecewise cubic Hermite interpolant to a set of data points.

2 Specification

Fortran Interface
Subroutine e01bef ( n, x, f, d, ifail)
Integer, Intent (In) :: n
Integer, Intent (Inout) :: ifail
Real (Kind=nag_wp), Intent (In) :: x(n), f(n)
Real (Kind=nag_wp), Intent (Out) :: d(n)
C Header Interface
#include <nag.h>
void  e01bef_ (const Integer *n, const double x[], const double f[], double d[], Integer *ifail)
The routine may be called by the names e01bef or nagf_interp_dim1_monotonic.

3 Description

e01bef estimates first derivatives at the set of data points (xr,fr), for r=1,2,,n, which determine a piecewise cubic Hermite interpolant to the data, that preserves monotonicity over ranges where the data points are monotonic. If the data points are only piecewise monotonic, the interpolant will have an extremum at each point where monotonicity switches direction. The estimates of the derivatives are computed by a formula due to Brodlie, which is described in Fritsch and Butland (1984), with suitable changes at the boundary points.
The routine is derived from routine PCHIM in Fritsch (1982).
Values of the computed interpolant, and of its first derivative and definite integral, can subsequently be computed by calling e01bff, e01bgf and e01bhf, as described in Section 9.

4 References

Fritsch F N (1982) PCHIP final specifications Report UCID-30194 Lawrence Livermore National Laboratory
Fritsch F N and Butland J (1984) A method for constructing local monotone piecewise cubic interpolants SIAM J. Sci. Statist. Comput. 5 300–304

5 Arguments

1: n Integer Input
On entry: n, the number of data points.
Constraint: n2.
2: x(n) Real (Kind=nag_wp) array Input
On entry: x(r) must be set to xr, the rth value of the independent variable (abscissa), for r=1,2,,n.
Constraint: x(r)<x(r+1).
3: f(n) Real (Kind=nag_wp) array Input
On entry: f(r) must be set to fr, the rth value of the dependent variable (ordinate), for r=1,2,,n.
4: d(n) Real (Kind=nag_wp) array Output
On exit: estimates of derivatives at the data points. d(r) contains the derivative at x(r).
5: ifail Integer Input/Output
On entry: ifail must be set to 0, -1 or 1 to set behaviour on detection of an error; these values have no effect when no error is detected.
A value of 0 causes the printing of an error message and program execution will be halted; otherwise program execution continues. A value of -1 means that an error message is printed while a value of 1 means that it is not.
If halting is not appropriate, the value -1 or 1 is recommended. If message printing is undesirable, then the value 1 is recommended. Otherwise, the value 0 is recommended. When the value -1 or 1 is used it is essential to test the value of ifail on exit.
On exit: ifail=0 unless the routine detects an error or a warning has been flagged (see Section 6).

6 Error Indicators and Warnings

If on entry ifail=0 or -1, explanatory error messages are output on the current error message unit (as defined by x04aaf).
Errors or warnings detected by the routine:
ifail=1
On entry, n=value.
Constraint: n2.
ifail=2
On entry, r=value, x(r-1)=value and x(r)=value.
Constraint: x(r-1)<x(r) for all r.
ifail=-99
An unexpected error has been triggered by this routine. Please contact NAG.
See Section 7 in the Introduction to the NAG Library FL Interface for further information.
ifail=-399
Your licence key may have expired or may not have been installed correctly.
See Section 8 in the Introduction to the NAG Library FL Interface for further information.
ifail=-999
Dynamic memory allocation failed.
See Section 9 in the Introduction to the NAG Library FL Interface for further information.

7 Accuracy

The computational errors in the array d should be negligible in most practical situations.

8 Parallelism and Performance

e01bef is not threaded in any implementation.

9 Further Comments

The time taken by e01bef is approximately proportional to n.
The values of the computed interpolant at the points px(i), for i=1,2,,m, may be obtained in the real array pf, of length at least m, by the call:
Call e01bff(n,x,f,d,m,px,pf,ifail)
where n, x and f are the input arguments to e01bef and d is the output argument from e01bef.
The values of the computed interpolant at the points px(i), for i=1,2,,m, together with its first derivatives, may be obtained in the real arrays pf and pd, both of length at least m, by the call:
Call e01bgf(n,x,f,d,m,px,pf,pd,ifail)
where n, x, f and d are as described above.
The value of the definite integral of the interpolant over the interval a to b can be obtained in the real variable pint by the call:
Call e01bhf(n,x,f,d,a,b,pint,ifail)
where n, x, f and d are as described above.

10 Example

This example reads in a set of data points, calls e01bef to compute a piecewise monotonic interpolant, and then calls e01bff to evaluate the interpolant at equally spaced points.

10.1 Program Text

Program Text (e01befe.f90)

10.2 Program Data

Program Data (e01befe.d)

10.3 Program Results

Program Results (e01befe.r)