cooling_settings_t Derived Type

type, public :: cooling_settings_t

Components

Type	Visibility	Attributes		Name		Initial
integer,	private		::	n_interp
character(len=:),	private,	allocatable	::	cooling_curve
logical,	private		::	has_cooling

Type-Bound Procedures

procedure, public :: enable

private pure subroutine enable(this)

Arguments

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

procedure, public :: disable

private pure subroutine disable(this)

Arguments

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

procedure, public :: is_enabled

private pure function is_enabled(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(cooling_settings_t),	intent(in)			::	this

Return Value logical

procedure, public :: set_interpolation_points

private pure subroutine set_interpolation_points(this, n_interp)

Arguments

Type	Intent	Optional	Attributes		Name
class(cooling_settings_t),	intent(inout)			::	this
integer,	intent(in)			::	n_interp

procedure, public :: get_interpolation_points

private pure function get_interpolation_points(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(cooling_settings_t),	intent(in)			::	this

Return Value integer

procedure, public :: set_cooling_curve

private pure subroutine set_cooling_curve(this, cooling_curve)

Arguments

Type	Intent	Optional	Attributes		Name
class(cooling_settings_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	cooling_curve

procedure, public :: get_cooling_curve

private pure function get_cooling_curve(this) result(cooling_curve)

Arguments

Type	Intent	Optional	Attributes		Name
class(cooling_settings_t),	intent(in)			::	this

Return Value character(len=:), allocatable