mod_cooling_curves Module

Uses

Contents

Variables

curve_T curve_lambda curve_dlambdadT minT maxT

Functions

get_rosner_index get_rosner_lambdaT get_rosner_dlambdadT get_interpolated_lambdaT get_interpolated_dlambdadT is_valid_cooling_curve

Subroutines

interpolate_cooling_curves get_cooling_table deallocate_cooling_curves

Variables

Type	Visibility	Attributes		Name		Initial
real(kind=dp),	private,	allocatable	::	curve_T(:)
real(kind=dp),	private,	allocatable	::	curve_lambda(:)
real(kind=dp),	private,	allocatable	::	curve_dlambdadT(:)
real(kind=dp),	private		::	minT
real(kind=dp),	private		::	maxT

Functions

private pure function get_rosner_index(logT0)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	logT0	dimensionfull log10(T0) value

Return Value integer

public function get_rosner_lambdaT(x, settings, background)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x
type(settings_t),	intent(in)			::	settings
type(background_t),	intent(in)			::	background

Return Value real(kind=dp)

public function get_rosner_dlambdadT(x, settings, background)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x
type(settings_t),	intent(in)			::	settings
type(background_t),	intent(in)			::	background

Return Value real(kind=dp)

public function get_interpolated_lambdaT(x, settings, background)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x
type(settings_t),	intent(in)			::	settings
type(background_t),	intent(in)			::	background

Return Value real(kind=dp)

public function get_interpolated_dlambdadT(x, settings, background)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x
type(settings_t),	intent(in)			::	settings
type(background_t),	intent(in)			::	background

Return Value real(kind=dp)

public function is_valid_cooling_curve(name)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	name

Return Value logical

Subroutines

public subroutine interpolate_cooling_curves(settings)

Arguments

Type	Intent	Optional	Attributes		Name
type(settings_t),	intent(in)			::	settings

public subroutine get_cooling_table(name, table_T, table_lambda)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	name
real(kind=dp),	intent(out),		allocatable	::	table_T(:)
real(kind=dp),	intent(out),		allocatable	::	table_lambda(:)

public subroutine deallocate_cooling_curves()

Arguments

None