drive_gyroviscosity Subroutine

public subroutine drive_gyroviscosity(self, comm_handler, mesh_cano, mesh_stag, equi_on_stag, ne_v, ti_v, upar_v, qipar_v)

Performs auxiliary precomputations necessary to evaluate guroviscosity - Precomputes viscosities - Communicates uB^3/2 and qiparB^(3/2)

Type Bound

gyroviscosity_t

Arguments

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

Instance of type

type(comm_handler_t), intent(in) :: comm_handler

Communicators

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

Mesh (canonical) within poloidal plane

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

Mesh (staggered) within poloidal plane

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

Equilibrim quantities on staggered mesh

real(kind=GP), intent(in), dimension(mesh_cano%get_n_points()) :: ne_v

Values of density

real(kind=GP), intent(in), dimension(mesh_cano%get_n_points()) :: ti_v

Values of ion temperature

real(kind=GP), intent(in), dimension(mesh_stag%get_n_points()) :: upar_v

Values of parallel ion velocity

real(kind=GP), intent(in), dimension(mesh_stag%get_n_points()) :: qipar_v

Values of parallel ion heat flux, for comoputation of heat-flux related viscosity


Contents