Derived type containing 2-D PSPLINE interpolants for cylindrical components of vector fields . Real precision of 4 bytes.
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| type(EZspline2_r4), | public | :: | A | Interpolant of a scalar field . |
|||
| type(EZspline2_r4), | public | :: | R | Interpolant of . |
|||
| type(EZspline2_r4), | public | :: | PHI | Interpolant of . |
|||
| type(EZspline2_r4), | public | :: | Z | Interpolant of . |
|||
| integer, | public | :: | NR | Size of mesh containing the field data along the -axis. |
|||
| integer, | public | :: | NZ | Size of mesh containing the field data along the -axis. |
|||
| integer, | public, | DIMENSION(2) | :: | BCSR | = | (/0, 0/) | Not-a-knot boundary condition for the interpolants at both ends of the direction. |
| integer, | public, | DIMENSION(2) | :: | BCSZ | = | (/0, 0/) | Not-a-knot boundary condition for the interpolants at both ends of the direction. |
TYPE, PRIVATE :: KORC_2D_FIELDS_INTERPOLANT
!! @note Derived type containing 2-D PSPLINE interpolants for
!! cylindrical components of vector fields \(\mathbf{F}(R,Z) =
!! F_R\hat{e}_R + F_\phi\hat{e}_phi+ F_Z\hat{e}_Z\).
!! Real precision of 8 bytes. @endnote
TYPE(EZspline2) :: A
!! Interpolant of a scalar field \(A(R,Z)\).
TYPE(EZspline2) :: R
!! Interpolant of \(F_R(R,Z)\).
TYPE(EZspline2) :: PHI
!! Interpolant of \(F_\phi(R,Z)\).
TYPE(EZspline2) :: Z
!! Interpolant of \(F_Z(R,Z)\).
INTEGER :: NR
!! Size of mesh containing the field data along the \(R\)-axis.
INTEGER :: NZ
!! Size of mesh containing the field data along the \(Z\)-axis.
INTEGER, DIMENSION(2) :: BCSR = (/ 0, 0 /)
!! Not-a-knot boundary condition for the interpolants at both
!! ends of the \(R\) direction.
INTEGER, DIMENSION(2) :: BCSZ = (/ 0, 0 /)
!! Not-a-knot boundary condition for the interpolants at both
!! ends of the \(Z\) direction.
END TYPE KORC_2D_FIELDS_INTERPOLANT