build_braginskii_initial_state Subroutine

public subroutine build_braginskii_initial_state(comm_handler, equi, equi_on_cano, equi_on_stag, mesh_cano, mesh_stag, hsolver_cano, hsolver_stag, map, penalisation_cano, penalisation_stag, polars_cano, polars_stag, opsinplane_cano, opsinplane_stag, init_select, filename, snaps, boundaries, isnaps, tau, ne, pot, vort, upar, jpar, apar, apar_fluct, te, ti)

Builds initial state

Arguments

Type IntentOptional Attributes Name
type(comm_handler_t), intent(in) :: comm_handler

Communicators

class(equilibrium_t), intent(inout) :: equi

Equilibrium

class(equilibrium_storage_t), intent(in) :: equi_on_cano

Equilibrim quantities on canonical mesh

class(equilibrium_storage_t), intent(in) :: equi_on_stag

Equilibrim quantities on staggered mesh

type(mesh_cart_t), intent(inout) :: mesh_cano

Mesh (canonical)

type(mesh_cart_t), intent(inout) :: mesh_stag

Mesh (staggered)

class(helmholtz_solver_t), intent(inout) :: hsolver_cano

Elliptic (2D) solver on canonical mesh

class(helmholtz_solver_t), intent(inout) :: hsolver_stag

Elliptic (2D) solver on staggered mesh

type(parallel_map_t), intent(in) :: map

Parallel map

type(penalisation_t), intent(in) :: penalisation_cano

Penalisation (canonical)

type(penalisation_t), intent(in) :: penalisation_stag

Penalisation (staggered)

type(polars_t), intent(in) :: polars_cano

Polar grid and operators (canonical)

type(polars_t), intent(in) :: polars_stag

Polar grid and operators (staggered)

type(inplane_operators_t), intent(in) :: opsinplane_cano

In-plane operators (canonical)

type(inplane_operators_t), intent(in) :: opsinplane_stag

In-plane operators (staggered)

character(len=*), intent(in) :: init_select

Type of initial state

character(len=*), intent(in) :: filename

Filename, where parameters are possibly read from

type(snapshot_t), intent(in) :: snaps

Snapshot, where initial state is possibly read from

type(boundaries_braginskii_t), intent(inout) :: boundaries

Boundary information for the BRAGINSKII model

integer, intent(out) :: isnaps

Snapshot number

real(kind=GP), intent(out) :: tau

Time of initial state

type(variable_t), intent(inout) :: ne

Electron density

type(variable_t), intent(inout) :: pot

Electrostatic potential

type(variable_t), intent(inout) :: vort

Generalised vorticity

type(variable_t), intent(inout) :: upar

Parallel ion velocity

type(variable_t), intent(inout) :: jpar

Parallel current

type(variable_t), intent(inout) :: apar

Parallel electromagnetic potential

type(variable_t), intent(inout) :: apar_fluct

Fluctuation of apar used for flutter operators

type(variable_t), intent(inout) :: te

Electron temperature

type(variable_t), intent(inout) :: ti

Ion temperature


Contents