smod_equil_isothermal_atmosphere Submodule

This submodule defines an equilibrium in Cartesian geometry with a stratified equilibrium profile, representing a solar magnetic atmosphere. The equilibrium is isothermal with a constant magnetic field. The scale height is given by The geometry is fixed to Cartesian, boundaries can be overridden using the parfile.

This equilibrium is taken from Nye, A., & Thomas, J. (1976). Solar magneto-atmospheric waves. I. An exact solution for a horizontal magnetic field. The Astrophysical Journal, 204. 573-581.



Contents


Variables

TypeVisibilityAttributesNameInitial
real(kind=dp), private :: scale_height

Functions

function rho0(x)

Arguments

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

Return Value real(kind=dp)

function drho0(x)

Arguments

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

Return Value real(kind=dp)

function T0()

Arguments

None

Return Value real(kind=dp)

function B02()

Arguments

None

Return Value real(kind=dp)

function B03()

Arguments

None

Return Value real(kind=dp)

function g0(x, settings, background)

Arguments

TypeIntentOptionalAttributesName
real(kind=dp), intent(in) :: x
type(settings_t), intent(in) :: settings
type(background_t), intent(in) :: background

Return Value real(kind=dp)


Module Procedures

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

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