EZhybrid_init


interface EZhybrid_init
!
! Initialize and allocate memory for hybrid interpolation object:
! dimensionality > 1 only. Interpolation method is specified separately
! for each dimension. At present, Akima Hermite and Spline interpolation
! cannot be mixed.
!
! Boundary condition arguments are optional. They are appropriate only
! for the end points of dimensions for which Hermite or Spline cubic
! interpolation is used.
!
! hspline(...) specifies the interpolation method for each dimension,
! according to the code: -1 for step function, 0 for piecewise linear,
! 1 for Akima Hermite, 2 for cubic Spline.
!
subroutine EZhybrid_init3_r8(spline_o, n1, n2, n3, hspline, ier, &
BCS1, BCS2, BCS3)
use EZspline_obj
type(EZspline3_r8) spline_o
integer, intent(in) :: n1, n2, n3
integer, intent(in) :: hspline(3)
integer, intent(out) :: ier
integer, intent(in), OPTIONAL :: BCS1(2), BCS2(2), BCS3(2)
end subroutine EZhybrid_init3_r8

subroutine EZhybrid_init2_r8(spline_o, n1, n2, hspline, ier, &
BCS1, BCS2)
use EZspline_obj
type(EZspline2_r8) spline_o
integer, intent(in) :: n1, n2
integer, intent(in) :: hspline(2)
integer, intent(out) :: ier
integer, intent(in), OPTIONAL :: BCS1(2), BCS2(2)
end subroutine EZhybrid_init2_r8

subroutine EZhybrid_init3_r4(spline_o, n1, n2, n3, hspline, ier, &
BCS1, BCS2, BCS3)
use EZspline_obj
type(EZspline3_r4) spline_o
integer, intent(in) :: n1, n2, n3
integer, intent(in) :: hspline(3)
integer, intent(out) :: ier
integer, intent(in), OPTIONAL :: BCS1(2), BCS2(2), BCS3(2)
end subroutine EZhybrid_init3_r4

subroutine EZhybrid_init2_r4(spline_o, n1, n2, hspline, ier, &
BCS1, BCS2)
use EZspline_obj
type(EZspline2_r4) spline_o
integer, intent(in) :: n1, n2
integer, intent(in) :: hspline(2)
integer, intent(out) :: ier
integer, intent(in), OPTIONAL :: BCS1(2), BCS2(2)
end subroutine EZhybrid_init2_r4

end interface


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