observers_implementation

The implementation of the interfaces defined in observers.

Uses

- Ancestors:
- observers
Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Functions

generate_key

Module Procedures

robs_init robs_extract robs_output close_robserver cobs_init cobs_extract cobs_output close_cobserver find_indices

Functions

function generate_key(rad) result(key)

Function that generates a head key or heading to add to the top of output files for an observer.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in),		dimension(:)	::	rad	The radii for this observer.

Return Value character(len=:), allocatable

The return value is the key.

Module Procedures

module procedure robs_init module subroutine robs_init(this, rad, coord, object)

Arguments

Type	Intent	Attributes		Name
class(robserver),	intent(inout)		::	this	The observer that is being initialized.
real(kind=wp),	intent(in),	dimension(:)	::	rad	A 1d array of real values containing the radii for which observations will be performed.
type(rgf),	intent(in)		::	coord	A real grid function containing the coordinates.
class(*),	intent(in),	target	::	object	The real grid function for which observations will be performed.

module procedure robs_extract module subroutine robs_extract(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(robserver),	intent(inout)			::	this	The routine is called on this observer.

module procedure robs_output module subroutine robs_output(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(robserver),	intent(inout)			::	this	The routine is called on this observer.

module procedure close_robserver module subroutine close_robserver(this)

Arguments

Type	Intent	Optional	Attributes		Name
type(robserver)				::	this	The real grid function observer to be finalized..

module procedure cobs_init module subroutine cobs_init(this, rad, coord, object)

Arguments

Type	Intent	Attributes		Name
class(cobserver),	intent(inout)		::	this	The observer that is being initialized.
real(kind=wp),	intent(in),	dimension(:)	::	rad	A 1d array of real values containing the radii for which observations will be performed.
type(rgf),	intent(in)		::	coord	A real grid function containing the coordinates.
class(*),	intent(in),	target	::	object	The complex grid function for which observations will be performed.

module procedure cobs_extract module subroutine cobs_extract(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(cobserver),	intent(inout)			::	this	The routine is called on this observer.

module procedure cobs_output module subroutine cobs_output(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(cobserver),	intent(inout)			::	this	The routine is called on this observer.

module procedure close_cobserver module subroutine close_cobserver(this)

Arguments

Type	Intent	Optional	Attributes		Name
type(cobserver)				::	this	The routine is called on this observer.

module procedure find_indices module subroutine find_indices(rad, coord, elem_index, node_index)

Arguments

Type	Intent	Attributes		Name
real(kind=wp),	intent(in),	dimension(:)	::	rad	1d array containing the radii to locate.
type(rgf),	intent(in)		::	coord	A real grid function containing the coordinates.
integer(kind=ip),	intent(out),	dimension(:), allocatable	::	elem_index	On output contains the indices of the elements containing the provided radii.
integer(kind=ip),	intent(out),	dimension(:), allocatable	::	node_index	On output contains the indices of the nodes inside the elements containing the provided radii.

observers_implementation Submodule

Contents

Functions

Module Procedures

Uses

Ancestors:

Contents

Functions

Module Procedures

Functions

function generate_key(rad) result(key)

Arguments

Return Value character(len=:), allocatable

Module Procedures

module procedure robs_init module subroutine robs_init(this, rad, coord, object)

Arguments

module procedure robs_extract module subroutine robs_extract(this)

Arguments

module procedure robs_output module subroutine robs_output(this)

Arguments

module procedure close_robserver module subroutine close_robserver(this)

Arguments

module procedure cobs_init module subroutine cobs_init(this, rad, coord, object)

Arguments

module procedure cobs_extract module subroutine cobs_extract(this)

Arguments

module procedure cobs_output module subroutine cobs_output(this)

Arguments

module procedure close_cobserver module subroutine close_cobserver(this)

Arguments

module procedure find_indices module subroutine find_indices(rad, coord, elem_index, node_index)

Arguments

observers_implementation Submodule

Contents

Functions

Module Procedures

Uses

Ancestors:

Contents

Functions

Module Procedures

Functions

function generate_key(rad) result(key)

Arguments

Return Value character(len=:), allocatable

Module Procedures

module procedure robs_init module subroutine robs_init(this, rad, coord, object) Interface →

Arguments

module procedure robs_extract module subroutine robs_extract(this) Interface →

Arguments

module procedure robs_output module subroutine robs_output(this) Interface →

Arguments

module procedure close_robserver module subroutine close_robserver(this) Interface →

Arguments

module procedure cobs_init module subroutine cobs_init(this, rad, coord, object) Interface →

Arguments

module procedure cobs_extract module subroutine cobs_extract(this) Interface →

Arguments

module procedure cobs_output module subroutine cobs_output(this) Interface →

Arguments

module procedure close_cobserver module subroutine close_cobserver(this) Interface →

Arguments

module procedure find_indices module subroutine find_indices(rad, coord, elem_index, node_index) Interface →

Arguments

module procedure robs_init module subroutine robs_init(this, rad, coord, object)

module procedure robs_extract module subroutine robs_extract(this)

module procedure robs_output module subroutine robs_output(this)

module procedure close_robserver module subroutine close_robserver(this)

module procedure cobs_init module subroutine cobs_init(this, rad, coord, object)

module procedure cobs_extract module subroutine cobs_extract(this)

module procedure cobs_output module subroutine cobs_output(this)

module procedure close_cobserver module subroutine close_cobserver(this)

module procedure find_indices module subroutine find_indices(rad, coord, elem_index, node_index)