analytic_circular_orbit_implementation Submodule

Uses

- Ancestors:
- analytic_circular_orbit
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.

Contents

Functions

acc_r

Module Procedures

co_init co_rhs co_set_to_zero co_update_vars co_save_globals_1 co_save_globals_2 co_load_globals co_output co_print_data

Functions

function acc_r(omega, mass, r)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	omega
real(kind=wp),	intent(in)			::	mass
real(kind=wp),	intent(in)			::	r

Return Value real(kind=wp)

Module Procedures

module procedure co_init module subroutine co_init(this)

Arguments

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

module procedure co_rhs module subroutine co_rhs(this)

Arguments

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

module procedure co_set_to_zero module subroutine co_set_to_zero(this, dest)

Arguments

Type	Intent	Optional	Attributes		Name
class(circular_orbit),	intent(inout)			::	this
integer(kind=ip),	intent(in)			::	dest

module procedure co_update_vars module subroutine co_update_vars(this, source, dest, source2, scalar, scalar2)

Arguments

Type	Intent	Optional	Attributes		Name
class(circular_orbit),	intent(inout),		target	::	this
integer(kind=ip),	intent(in)			::	source
integer(kind=ip),	intent(in)			::	dest
integer(kind=ip),	intent(in),	optional		::	source2
real(kind=wp),	intent(in),	optional		::	scalar
real(kind=wp),	intent(in),	optional		::	scalar2

module procedure co_save_globals_1 module subroutine co_save_globals_1(this)

Arguments

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

module procedure co_save_globals_2 module subroutine co_save_globals_2(this)

Arguments

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

module procedure co_load_globals module subroutine co_load_globals(this)

Arguments

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

module procedure co_output module subroutine co_output(this)

Arguments

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

module procedure co_print_data module subroutine co_print_data(this)

Arguments

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