db3ink Interface

public interface db3ink

3D initialization routines.

Calls

interface~~db3ink~~CallsGraph interface~db3ink db3ink proc~db3ink_default db3ink_default interface~db3ink->proc~db3ink_default proc~db3ink_multi db3ink_multi interface~db3ink->proc~db3ink_multi proc~check_inputs check_inputs proc~db3ink_default->proc~check_inputs proc~dbknot dbknot proc~db3ink_default->proc~dbknot proc~dbtpcf dbtpcf proc~db3ink_default->proc~dbtpcf proc~db3ink_multi->proc~db3ink_default proc~dbintk dbintk proc~dbtpcf->proc~dbintk proc~dbnslv dbnslv proc~dbtpcf->proc~dbnslv proc~dbintk->proc~dbnslv proc~dbnfac dbnfac proc~dbintk->proc~dbnfac proc~dbspvn dbspvn proc~dbintk->proc~dbspvn

Called by

interface~~db3ink~~CalledByGraph interface~db3ink db3ink proc~initialize_3d_auto_knots bspline_3d%initialize_3d_auto_knots proc~initialize_3d_auto_knots->interface~db3ink proc~initialize_3d_auto_knots_multi bspline_3d%initialize_3d_auto_knots_multi proc~initialize_3d_auto_knots_multi->interface~db3ink proc~initialize_3d_specify_knots bspline_3d%initialize_3d_specify_knots proc~initialize_3d_specify_knots->interface~db3ink proc~initialize_3d_specify_knots_multi bspline_3d%initialize_3d_specify_knots_multi proc~initialize_3d_specify_knots_multi->interface~db3ink proc~bspline_3d_constructor_auto_knots bspline_3d_constructor_auto_knots proc~bspline_3d_constructor_auto_knots->proc~initialize_3d_auto_knots proc~bspline_3d_constructor_specify_knots bspline_3d_constructor_specify_knots proc~bspline_3d_constructor_specify_knots->proc~initialize_3d_specify_knots interface~bspline_3d bspline_3d interface~bspline_3d->proc~bspline_3d_constructor_auto_knots interface~bspline_3d->proc~bspline_3d_constructor_specify_knots

Module Procedures

private pure subroutine db3ink_default(x, nx, y, ny, z, nz, fcn, kx, ky, kz, iknot, tx, ty, tz, bcoef, iflag)

Determines the parameters of a function that interpolates the three-dimensional gridded data The interpolating function and its derivatives may subsequently be evaluated by the function db3val.

Read more…

Arguments

Type IntentOptional Attributes Name
real(kind=wp), intent(in), dimension(:) :: x

(nx) array of abcissae. must be strictly increasing.
integer(kind=ip), intent(in) :: nx

number of abcissae ( )
real(kind=wp), intent(in), dimension(:) :: y

(ny) array of abcissae. must be strictly increasing.
integer(kind=ip), intent(in) :: ny

number of abcissae ( )
real(kind=wp), intent(in), dimension(:) :: z

(nz) array of abcissae. must be strictly increasing.
integer(kind=ip), intent(in) :: nz

number of abcissae ( )
real(kind=wp), intent(in), dimension(:,:,:) :: fcn

(nx,ny,nz) matrix of function values to interpolate. fcn(i,j,k) should contain the function value at the point (x(i),y(j),z(k))
integer(kind=ip), intent(in) :: kx

The order of spline pieces in ( ) (order = polynomial degree + 1)
integer(kind=ip), intent(in) :: ky

The order of spline pieces in ( ) (order = polynomial degree + 1)
integer(kind=ip), intent(in) :: kz

the order of spline pieces in ( ) (order = polynomial degree + 1)
integer(kind=ip), intent(in) :: iknot

knot sequence flag:

Read more…
real(kind=wp), intent(inout), dimension(:) :: tx

The (nx+kx) knots in the direction for the spline interpolant.

Read more…
real(kind=wp), intent(inout), dimension(:) :: ty

The (ny+ky) knots in the direction for the spline interpolant.

Read more…
real(kind=wp), intent(inout), dimension(:) :: tz

The (nz+kz) knots in the direction for the spline interpolant.

Read more…
real(kind=wp), intent(out), dimension(:,:,:) :: bcoef

(nx,ny,nz) matrix of coefficients of the b-spline interpolant.
integer(kind=ip), intent(out) :: iflag Read more…

private pure subroutine db3ink_multi(x, nx, y, ny, z, nz, fcn, kx, ky, kz, iknot, tx, ty, tz, bcoef, iflag)

Multiple-output version of db3ink: interpolates nf functions on the same grid, with the same knots. The last dimension of fcn and bcoef is the output index. Evaluate them with db3val (multiple-output version).

Arguments

Type IntentOptional Attributes Name
real(kind=wp), intent(in), dimension(:) :: x

(nx) array of abcissae. Must be strictly increasing.
integer(kind=ip), intent(in) :: nx

Number of abcissae
real(kind=wp), intent(in), dimension(:) :: y

(ny) array of abcissae. Must be strictly increasing.
integer(kind=ip), intent(in) :: ny

Number of abcissae
real(kind=wp), intent(in), dimension(:) :: z

(nz) array of abcissae. Must be strictly increasing.
integer(kind=ip), intent(in) :: nz

Number of abcissae
real(kind=wp), intent(in), dimension(:,:,:,:) :: fcn

(nx,ny,nz,nf) array of function values to interpolate: fcn(i1,i2,i3,j) is output j at grid point (x(i1),y(i2),z(i3))
integer(kind=ip), intent(in) :: kx

The order of spline pieces in

integer(kind=ip), intent(in) :: ky

The order of spline pieces in

integer(kind=ip), intent(in) :: kz

The order of spline pieces in

integer(kind=ip), intent(in) :: iknot

knot sequence flag (see db3ink_default)
real(kind=wp), intent(inout), dimension(:) :: tx

The (nx+kx) knots in the direction
real(kind=wp), intent(inout), dimension(:) :: ty

The (ny+ky) knots in the direction
real(kind=wp), intent(inout), dimension(:) :: tz

The (nz+kz) knots in the direction
real(kind=wp), intent(out), dimension(:,:,:,:) :: bcoef

(nx,ny,nz,nf) array of b-spline coefficients
integer(kind=ip), intent(out) :: iflag

status flag (see db3ink_default), or 6001 if fcn and bcoef do not have the same number of outputs (or it is zero)