#
EZspline1_r4

**type EZspline1_r4 **

`! `

`! 1-d Spline/Akima Hermite/Piecewise Linear interpolation `

`! `

`! Grid `

`! `

` real(ezspline_r4), dimension(:), pointer :: x1
`

`! `

`! The boundary condition values (for slope and 2nd derivative). `

`! Can be optionally set by the user. Not used for periodic and `

`! not a knot boundary conditions. `

`! `

` real(ezspline_r4) :: bcval1min, bcval1max
`

`! `

`! Select between spline (0) and Akima spline (1); default=0 (spline) `

`! `

` integer :: isHermite``! set after EZspline_init call... `

`! `

`! set =0 for Spline or Akima; =1 for piecewise linear: this is set `

`! by EZspline_init or EZlinear_init; DO NOT SET DIRECTLY: `

`! `

` integer :: isLinear
`

`! `

`! Grid sizes (set during EZ*_init call). `

`! `

` integer :: n1
`

`! `

`! Grid zone lookup method `

`! `

` integer :: klookup1
`

`! `

`! Type of boundary conditions (set during EZspline_init call) on left `

`! and right hand side. Possible values are: `

`! `

`! -1 periodic `

`! 0 not a knot `

`! +1 1st derivative imposed `

`! +2 2nd derivative imposed `

`! `

`! For instance, ibctype1 =(/1, 0/) for 1st derivative set on left-hand `

`! and not a knot boundary conditions on right-hand side. The values of `

`! the derivatives are set via bcval1min. (See above) `

`! `

` integer ibctype1(2)
`

`! `

`! Grid lengths. DO NOT SET. `

`! `

` real(ezspline_r4) :: x1min, x1max
`

`! `

`! Compact cubic coefficient arrays. DO NOT SET. `

`! `

` real(ezspline_r4), dimension(:,:), pointer :: fspl
`

`! `

`! Control/Other. DO NOT SET. `

`! `

` integer :: isInitialized, isAllocated, isReady
`

` integer :: ilin1
`

` real(ezspline_r4), dimension(:,:), pointer :: x1pkg
`

`! `

` integer :: nguard
`

` end type EZspline1_r4
`

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