grid_t Derived Type

type, public :: grid_t

Components

Type	Visibility	Attributes		Name		Initial
real(kind=dp),	public,	allocatable	::	base_grid(:)
real(kind=dp),	public,	allocatable	::	gaussian_grid(:)
real(kind=dp),	public,	allocatable	::	ef_grid(:)
procedure(dx_func_i),	private,	pointer, nopass	::	dx_func	=>	null()
type(settings_t),	private,	pointer	::	settings
logical,	private		::	is_initialised
logical,	private		::	uses_custom_base_grid
logical,	private		::	uses_custom_dx

Type-Bound Procedures

procedure, private :: set_base_grid

private subroutine set_base_grid(this)

Arguments

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

procedure, private :: set_gaussian_grid

private pure subroutine set_gaussian_grid(this)

Arguments

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

procedure, private :: set_ef_grid

private pure subroutine set_ef_grid(this)

Arguments

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

procedure, private :: generate_grid

private subroutine generate_grid(this)

Arguments

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

procedure, public :: initialise

private subroutine initialise(this)

Arguments

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

procedure, public :: set_custom_grid

private subroutine set_custom_grid(this, custom)

Arguments

Type	Intent	Optional	Attributes		Name
class(grid_t),	intent(inout)			::	this
real(kind=dp),	intent(in)			::	custom(:)

procedure, public :: set_spacing_function

private subroutine set_spacing_function(this, dx_func)

Arguments

Type	Intent	Optional	Attributes		Name
class(grid_t),	intent(inout)			::	this
procedure(dx_func_i)				::	dx_func

procedure, public :: get_eps

private impure elemental function get_eps(this, x)

Arguments

Type	Intent	Optional	Attributes		Name
class(grid_t),	intent(in)			::	this
real(kind=dp),	intent(in)			::	x

Return Value real(kind=dp)

procedure, public :: get_deps

private impure elemental function get_deps(this)

Arguments

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

Return Value real(kind=dp)

procedure, public :: delete

private pure subroutine delete(this)

Arguments

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