EZspline_allocated


interface EZspline_allocated
! logical function returns TRUE if allocated, FALSE otherwise
!
! usage:
! logical :: answer
! answer = EZspline_allocated(spline_o)
! ...where spline_o is a 1d, 2d, or 3d spline object of R4 or R8
! precision.

module procedure &
EZspline_allocated1_r8, &
EZspline_allocated2_r8, &
EZspline_allocated3_r8, &
EZspline_allocated1_r4, &
EZspline_allocated2_r4, &
EZspline_allocated3_r4
end interface


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