mod_background Module

Uses

Derived Types

type, public :: background_t

Components

Type	Visibility	Attributes		Name		Initial
type(bg_density_t),	public		::	density
type(bg_velocity_t),	public		::	velocity
type(bg_temperature_t),	public		::	temperature
type(bg_magnetic_t),	public		::	magnetic

Type-Bound Procedures

procedure, public :: set_density_funcs
procedure, public :: set_velocity_1_funcs
procedure, public :: set_velocity_2_funcs
procedure, public :: set_velocity_3_funcs
procedure, public :: set_temperature_funcs
procedure, public :: set_magnetic_1_funcs
procedure, public :: set_magnetic_2_funcs
procedure, public :: set_magnetic_3_funcs
procedure, public :: delete

Functions

public function new_background() result(background)

Arguments

None

Return Value type(background_t)

Subroutines

private subroutine set_density_funcs(this, rho0_func, drho0_func)

Arguments

Type	Intent	Optional	Attributes		Name
class(background_t),	intent(inout)			::	this
procedure(real(dp))				::	rho0_func
procedure(real(dp)),		optional		::	drho0_func

private subroutine set_velocity_1_funcs(this, v01_func, dv01_func, ddv01_func)

Arguments

Type	Intent	Optional	Attributes		Name
class(background_t),	intent(inout)			::	this
procedure(real(dp))				::	v01_func
procedure(real(dp)),		optional		::	dv01_func
procedure(real(dp)),		optional		::	ddv01_func

private subroutine set_velocity_2_funcs(this, v02_func, dv02_func, ddv02_func)

Arguments

Type	Intent	Optional	Attributes		Name
class(background_t),	intent(inout)			::	this
procedure(real(dp))				::	v02_func
procedure(real(dp)),		optional		::	dv02_func
procedure(real(dp)),		optional		::	ddv02_func

private subroutine set_velocity_3_funcs(this, v03_func, dv03_func, ddv03_func)

Arguments

Type	Intent	Optional	Attributes		Name
class(background_t),	intent(inout)			::	this
procedure(real(dp))				::	v03_func
procedure(real(dp)),		optional		::	dv03_func
procedure(real(dp)),		optional		::	ddv03_func

private subroutine set_temperature_funcs(this, T0_func, dT0_func, ddT0_func)

Arguments

Type	Intent	Optional	Attributes		Name
class(background_t),	intent(inout)			::	this
procedure(real(dp))				::	T0_func
procedure(real(dp)),		optional		::	dT0_func
procedure(real(dp)),		optional		::	ddT0_func

private subroutine set_magnetic_1_funcs(this, B01_func)

Arguments

Type	Intent	Optional	Attributes		Name
class(background_t),	intent(inout)			::	this
procedure(real(dp))				::	B01_func

private subroutine set_magnetic_2_funcs(this, B02_func, dB02_func, ddB02_func)

Arguments

Type	Intent	Optional	Attributes		Name
class(background_t),	intent(inout)			::	this
procedure(real(dp))				::	B02_func
procedure(real(dp)),		optional		::	dB02_func
procedure(real(dp)),		optional		::	ddB02_func

private subroutine set_magnetic_3_funcs(this, B03_func, dB03_func, ddB03_func)

Arguments

Type	Intent	Optional	Attributes		Name
class(background_t),	intent(inout)			::	this
procedure(real(dp))				::	B03_func
procedure(real(dp)),		optional		::	dB03_func
procedure(real(dp)),		optional		::	ddB03_func

private pure subroutine delete(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(background_t),	intent(inout)			::	this