KORC_3D_PROFILES_INTERPOLANT Derived Type

type, private :: KORC_3D_PROFILES_INTERPOLANT


Inherits

type~~korc_3d_profiles_interpolant~~InheritsGraph type~korc_3d_profiles_interpolant KORC_3D_PROFILES_INTERPOLANT EZspline3 EZspline3 type~korc_3d_profiles_interpolant->EZspline3 ne, Te, Zeff

Contents


Components

TypeVisibility AttributesNameInitial
type(EZspline3), public :: ne

Interpolant of background electron density .

type(EZspline3), public :: Te

Interpolant of background electron temperature .

type(EZspline3), public :: Zeff

Interpolant of effective charge number .

integer, public :: NR

Size of mesh containing the field data along the -axis.

integer, public :: NPHI

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):: BCSPHI =(/-1, -1/)

Periodic 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.


Source Code

  TYPE, PRIVATE :: KORC_3D_PROFILES_INTERPOLANT
     !! @note Derived type containing 3-D PSPLINE interpolants for cylindrical
     !! components of the density \(n_e(R,\phi,Z)\),
     !! temperature \(T_e(R,\phi,Z)\), and effective charge number
     !! \(Z_{eff}(R,\phi,Z)\) profiles. Real precision of 8 bytes. @endnote
     TYPE(EZspline3)    :: ne
     !! Interpolant of background electron density \(n_e(R,\phi,Z)\).
     TYPE(EZspline3)    :: Te
     !! Interpolant of background electron temperature \(T_e(R,\phi,Z)\).
     TYPE(EZspline3)    :: Zeff
     !! Interpolant of effective charge number \(Z_{eff}(R,\phi,Z)\).

     INTEGER               :: NR
     !! Size of mesh containing the field data along the \(R\)-axis.
     INTEGER               :: NPHI
     !! Size of mesh containing the field data along the \(\phi\)-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) :: BCSPHI = (/ -1, -1 /)
     !! Periodic boundary condition for the interpolants at both ends of
     !! the \(\phi\) 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_3D_PROFILES_INTERPOLANT