equilibrium_storage_t Derived Type

type, public :: equilibrium_storage_t

Datatype for storage of equilibrium on mesh


Contents

Variables

Finalization Procedures

Type-Bound Procedures


Components

Type Visibility Attributes Name Initial
real(kind=GP), public, allocatable, dimension(:) :: rho

rho on mesh
real(kind=GP), public, allocatable, dimension(:) :: bx

bx on mesh
real(kind=GP), public, allocatable, dimension(:) :: by

by on mesh
real(kind=GP), public, allocatable, dimension(:) :: btor

btor on mesh
real(kind=GP), public, allocatable, dimension(:,:) :: epol

epol on mesh
real(kind=GP), public, allocatable, dimension(:,:) :: erad

erad on mesh
integer, public, allocatable, dimension(:) :: district

District on mesh

Finalization Procedures

final :: destructor


Type-Bound Procedures

procedure, public :: absb

  • public pure function absb(self, l)

    Computes absolute value of magnetic field from stured quantities

    Arguments

    Type IntentOptional Attributes Name
    class(equilibrium_storage_t), intent(in) :: self

    Instance of class
    integer, intent(in) :: l

    Index

    Return Value real(kind=gp)

procedure, public :: fill_storage

  • public subroutine fill_storage(self, equi, mesh)

    Fills storage with values on mesh points

    Arguments

    Type IntentOptional Attributes Name
    class(equilibrium_storage_t), intent(inout) :: self

    Instance of class
    class(equilibrium_t), intent(inout), target :: equi

    Equilibrium
    type(mesh_cart_t), intent(in) :: mesh

    Mesh

procedure, public :: write_netcdf => write_netcdf_equilibrium_storage

  • interface

    public module subroutine write_netcdf_equilibrium_storage(self, fgid)

    Writes stored quantities of grid to netcdf file

    Arguments

    Type IntentOptional Attributes Name
    class(equilibrium_storage_t), intent(in) :: self

    Instance of class
    integer, intent(in) :: fgid

    File or group id

procedure, public :: read_netcdf => read_netcdf_equilibrium_storage

  • interface

    public module subroutine read_netcdf_equilibrium_storage(self, fgid)

    Writes stored quantities of grid to netcdf file

    Arguments

    Type IntentOptional Attributes Name
    class(equilibrium_storage_t), intent(inout) :: self

    Instance of class
    integer, intent(in) :: fgid

    File or group id