EZspline_setup


interface EZspline_setup
!
! Compute the cubic spline coefficients. Note: the grid and the
! boundary conditions should be properly set prior to this call.
!
! NEW optional argument: exact_dim=TRUE to requre f dimensions to
! match higher dimensions of spline_o%fspl exactly; default or FALSE
! means f dimensions can match or exceed dimensions of spline_o%fspl.
!
! array arguments are now declared with f90 style dimensioning; the
! module interface must be used (if not feasible see ezspline_setupx.f90).
!
subroutine EZspline_setup3_r8(spline_o, f, ier, exact_dim)
use EZspline_obj
type(EZspline3_r8) spline_o
real(ezspline_r8), dimension(:,:,:), intent(in) :: f
integer, intent(out) :: ier
logical, intent(in), optional :: exact_dim
end subroutine EZspline_setup3_r8

subroutine EZspline_setup2_r8(spline_o, f, ier, exact_dim)
use EZspline_obj
type(EZspline2_r8) spline_o
real(ezspline_r8), dimension(:,:), intent(in) :: f
integer, intent(out) :: ier
logical, intent(in), optional :: exact_dim
end subroutine EZspline_setup2_r8

subroutine EZspline_setup1_r8(spline_o, f, ier, exact_dim)
use EZspline_obj
type(EZspline1_r8) spline_o
real(ezspline_r8), dimension(:), intent(in) :: f
integer, intent(out) :: ier
logical, intent(in), optional :: exact_dim
end subroutine EZspline_setup1_r8

subroutine EZspline_setup3_r4(spline_o, f, ier, exact_dim)
use EZspline_obj
type(EZspline3_r4) spline_o
real(ezspline_r4), dimension(:,:,:), intent(in) :: f
integer, intent(out) :: ier
logical, intent(in), optional :: exact_dim
end subroutine EZspline_setup3_r4

subroutine EZspline_setup2_r4(spline_o, f, ier, exact_dim)
use EZspline_obj
type(EZspline2_r4) spline_o
real(ezspline_r4), dimension(:,:), intent(in) :: f
integer, intent(out) :: ier
logical, intent(in), optional :: exact_dim
end subroutine EZspline_setup2_r4

subroutine EZspline_setup1_r4(spline_o, f, ier, exact_dim)
use EZspline_obj
type(EZspline1_r4) spline_o
real(ezspline_r4), dimension(:), intent(in) :: f
integer, intent(out) :: ier
logical, intent(in), optional :: exact_dim
end subroutine EZspline_setup1_r4

end interface


Send comments about this document to pletzer@pppl.gov. Tue Apr 24 14:01:03 2007