Derived type containing 2-D PSPLINE interpolants for cylindrical components of vector fields . Real precision of 8 bytes.
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| type(EZspline1), | public | :: | A | Interpolant of a scalar field . |
|||
| type(EZspline1), | public | :: | R | Interpolant of . |
|||
| type(EZspline1), | public | :: | PHI | Interpolant of . |
|||
| type(EZspline1), | public | :: | Z | Interpolant of . |
|||
| integer, | public | :: | Nrm | Size of mesh containing the field data along the -axis. |
|||
| integer, | public, | DIMENSION(2) | :: | BCSrm | = | (/0, 0/) | Not-a-knot boundary condition for the interpolants at both ends of the direction. |
| integer, | public | :: | NPSIP | Size of mesh containing the field data along the -axis. |
|||
| integer, | public, | DIMENSION(2) | :: | BCSPSIP | = | (/0, 0/) | Not-a-knot boundary condition for the interpolants at both ends of the direction. |
TYPE, PRIVATE :: KORC_1D_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(EZspline1) :: A
!! Interpolant of a scalar field \(A(R,Z)\).
TYPE(EZspline1) :: R
!! Interpolant of \(F_R(R,Z)\).
TYPE(EZspline1) :: PHI
!! Interpolant of \(F_\phi(R,Z)\).
TYPE(EZspline1) :: Z
!! Interpolant of \(F_Z(R,Z)\).
INTEGER :: Nrm
!! Size of mesh containing the field data along the \(R\)-axis.
INTEGER, DIMENSION(2) :: BCSrm = (/ 0, 0 /)
!! Not-a-knot boundary condition for the interpolants at both
!! ends of the \(R\) direction.
INTEGER :: NPSIP
!! Size of mesh containing the field data along the \(R\)-axis.
INTEGER, DIMENSION(2) :: BCSPSIP = (/ 0, 0 /)
!! Not-a-knot boundary condition for the interpolants at both
!! ends of the \(R\) direction.
END TYPE KORC_1D_FIELDS_INTERPOLANT