sv_component_t Derived Type

type, public :: sv_component_t

Components

Type	Visibility	Attributes		Name		Initial
character(len=str_len_arr),	private		::	spline_name
character(len=str_len_arr),	private		::	name
logical,	private		::	is_initialised	=	.false.
procedure(basis_function),	private,	pointer, nopass	::	custom_spline

Type-Bound Procedures

procedure, public :: get_name

private pure function get_name(this) result(name)

Arguments

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

Return Value character(len=:), allocatable

procedure, public :: get_spline_function

private subroutine get_spline_function(this, spline_order, spline_func)

Arguments

Type	Intent	Optional	Attributes		Name
class(sv_component_t),	intent(in)			::	this
integer,	intent(in),	optional		::	spline_order
procedure(basis_function),	intent(out),		pointer	::	spline_func

procedure, public :: get_basis_function_name

private function get_basis_function_name(this) result(name)

Arguments

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

Return Value character(len=:), allocatable

procedure, public :: get_default_basis_function

private function get_default_basis_function(this) result(name)

Arguments

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

Return Value character(len=:), allocatable

procedure, public :: set_basis_function

private subroutine set_basis_function(this, spline_name)

Arguments

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

procedure, public :: set_custom_spline

private subroutine set_custom_spline(this, func)

Arguments

Type	Intent	Optional	Attributes		Name
class(sv_component_t),	intent(inout)			::	this
procedure(basis_function)				::	func

procedure, public :: delete

private pure subroutine delete(this)

Arguments

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

procedure, private :: spline

private subroutine spline(this, func)

Arguments

Type	Intent	Optional	Attributes		Name
class(sv_component_t),	intent(in)			::	this
procedure(basis_function),	intent(out),		pointer	::	func

procedure, private :: dspline

private subroutine dspline(this, func)

Arguments

Type	Intent	Optional	Attributes		Name
class(sv_component_t),	intent(in)			::	this
procedure(basis_function),	intent(out),		pointer	::	func

procedure, private :: ddspline

private subroutine ddspline(this, func)

Arguments

Type	Intent	Optional	Attributes		Name
class(sv_component_t),	intent(in)			::	this
procedure(basis_function),	intent(out),		pointer	::	func