EZspline_isGridRegular


interface EZspline_isGridRegular
!
! Return error code if grid is not regular (not strictly increasing).
! The evaluation can be sought at a single point (p1, [p2, [p3]]
! are scalars), on an unordered list of points (p1, [p2, [p3]] have
! dimension k), or on a structured grid (p1, [p2, [p3]] have dimension
! k1, [k2, [k3]] respectively).
!
subroutine EZspline_isGridRegular3_r8(spline_o, ier)
use EZspline_obj
type(EZspline3_r8) :: spline_o
integer, intent(out) :: ier
end subroutine EZspline_isGridRegular3_r8

subroutine EZspline_isGridRegular2_r8(spline_o, ier)
use EZspline_obj
type(EZspline2_r8) :: spline_o
integer, intent(out) :: ier
end subroutine EZspline_isGridRegular2_r8

subroutine EZspline_isGridRegular1_r8(spline_o, ier)
use EZspline_obj
type(EZspline1_r8) :: spline_o
integer, intent(out) :: ier
end subroutine EZspline_isGridRegular1_r8

subroutine EZspline_isGridRegular3_r4(spline_o, ier)
use EZspline_obj
type(EZspline3_r4) :: spline_o
integer, intent(out) :: ier
end subroutine EZspline_isGridRegular3_r4

subroutine EZspline_isGridRegular2_r4(spline_o, ier)
use EZspline_obj
type(EZspline2_r4) :: spline_o
integer, intent(out) :: ier
end subroutine EZspline_isGridRegular2_r4

subroutine EZspline_isGridRegular1_r4(spline_o, ier)
use EZspline_obj
type(EZspline1_r4) :: spline_o
integer, intent(out) :: ier
end subroutine EZspline_isGridRegular1_r4

end interface


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