smod_equil_suydam_cluster Submodule

This submodule defines a cylindrical equilibrium in which a Suydam surface is present, such that this gives rises to Suydam cluster modes. The geometry can be overriden using the parfile.

This equilibrium is taken from Nijboer, R. J., Holst, B., Poedts, S., & Goedbloed, J. P. (1997). Calculating magnetohydrodynamic flow spectra. Computer physics communications, 106(1-2), 39-52.



Contents


Functions

function rho0()

Arguments

None

Return Value real(kind=dp)

function T0(r)

Arguments

TypeIntentOptionalAttributesName
real(kind=dp), intent(in) :: r

Return Value real(kind=dp)

function dT0(r)

Arguments

TypeIntentOptionalAttributesName
real(kind=dp), intent(in) :: r

Return Value real(kind=dp)

function v02()

Arguments

None

Return Value real(kind=dp)

function v03(r)

Arguments

TypeIntentOptionalAttributesName
real(kind=dp), intent(in) :: r

Return Value real(kind=dp)

function dv03(r)

Arguments

TypeIntentOptionalAttributesName
real(kind=dp), intent(in) :: r

Return Value real(kind=dp)

function B02(r)

Arguments

TypeIntentOptionalAttributesName
real(kind=dp), intent(in) :: r

Return Value real(kind=dp)

function dB02(r)

Arguments

TypeIntentOptionalAttributesName
real(kind=dp), intent(in) :: r

Return Value real(kind=dp)

function B03(r)

Arguments

TypeIntentOptionalAttributesName
real(kind=dp), intent(in) :: r

Return Value real(kind=dp)

function dB03(r)

Arguments

TypeIntentOptionalAttributesName
real(kind=dp), intent(in) :: r

Return Value real(kind=dp)

function J0(r)

Arguments

TypeIntentOptionalAttributesName
real(kind=dp), intent(in) :: r

Return Value real(kind=dp)

function J1(r)

Arguments

TypeIntentOptionalAttributesName
real(kind=dp), intent(in) :: r

Return Value real(kind=dp)

function DJ0(r)

Arguments

TypeIntentOptionalAttributesName
real(kind=dp), intent(in) :: r

Return Value real(kind=dp)

function DJ1(r)

Arguments

TypeIntentOptionalAttributesName
real(kind=dp), intent(in) :: r

Return Value real(kind=dp)


Module Procedures

module procedure suydam_cluster_eq module module subroutine suydam_cluster_eq(settings, grid, background, physics)

Sets the equilibrium

Arguments

TypeIntentOptionalAttributesName
type(settings_t), intent(inout) :: settings
type(grid_t), intent(inout) :: grid
type(background_t), intent(inout) :: background
type(physics_t), intent(inout) :: physics