sv_component_t Derived Type

type, public :: sv_component_t

Contents

Variables

spline_name name is_initialised custom_spline

Type-Bound Procedures

get_name get_spline_function get_basis_function_name get_default_basis_function set_basis_function set_custom_spline delete spline dspline ddspline

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,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,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,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