Module that defines a global orbit object that can be used to pass information between different equations using the save_globals/load_globals mechanism.
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| type(g_orbit), | public | :: | orbit_info | The global g_orbit object that is available by use association. |
|||
| type(tdc_orbit), | public | :: | tdc_info | The global tdc_orbit object that is available by use association. |
A global orbit type.
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| real(kind=wp), | private | :: | r | The radial coordinate, (in Schwarzschild coordinates). |
|||
| real(kind=wp), | private | :: | phi | The azimuthal angle, . |
|||
| real(kind=wp), | private | :: | ur | The radial component of the 4-velocity, . |
|||
| real(kind=wp), | private | :: | En | The energy per unit mass of the orbit, . |
|||
| real(kind=wp), | private | :: | Lz | The angular momentum per unit mass of the orbit, . |
|||
| real(kind=wp), | private | :: | chi | The osculaing orbits parameter, that changes by over a full radial cycle. |
| procedure, public :: set_orbit | Routine to set the g_orbit values. |
| procedure, public :: get_orbit | Routine to get the g_orbit values. |
| procedure, public :: get_chi | Routine to get alone. |
A global type with information needed by the time dependent coordinate transformation object.
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| real(kind=wp), | private | :: | r | The radial coordinate, (in Schwarzschild coordinates). |
|||
| real(kind=wp), | private | :: | drdt | The time derivative of the radial coordinate, . |
|||
| real(kind=wp), | private | :: | d2rdt2 | The second time derivative of the radial coordinate, . |
| procedure, public :: set_tdc | Routine to set the tdc_orbit values. |
| procedure, public :: get_tdc | Routine to get the tdc_orbit values. |
Routine that sets all the orbit variables.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(g_orbit), | intent(inout) | :: | this | The routine is called on this g_orbit object. |
||
| real(kind=wp), | intent(in) | :: | r | The radial coordinate, (in Schwarzschild coordinates). |
||
| real(kind=wp), | intent(in) | :: | phi | The azimuthal angle, . |
||
| real(kind=wp), | intent(in) | :: | ur | The radial component of the 4-velocity, . |
||
| real(kind=wp), | intent(in) | :: | En | The energy per unit mass of the orbit, . |
||
| real(kind=wp), | intent(in) | :: | Lz | The angular momentum per unit mass of the orbit, . |
||
| real(kind=wp), | intent(in) | :: | chi | The osculaing orbits parameter, that changes by over a full radial cycle. |
Routine that gets all the orbit variables except for .
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(g_orbit), | intent(inout) | :: | this | The routine is called on this g_orbit object. |
||
| real(kind=wp), | intent(out) | :: | r | The radial coordinate, (in Schwarzschild coordinates). |
||
| real(kind=wp), | intent(out) | :: | phi | The azimuthal angle, . |
||
| real(kind=wp), | intent(out) | :: | ur | The radial component of the 4-velocity, . |
||
| real(kind=wp), | intent(out) | :: | En | The energy per unit mass of the orbit, . |
||
| real(kind=wp), | intent(out) | :: | Lz | The angular momentum per unit mass of the orbit, . |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(tdc_orbit), | intent(inout) | :: | this | The routine is called on this tdc_orbit object. |
||
| real(kind=wp), | intent(in) | :: | r | The radial coordinate, (in Schwarzschild coordinates). |
||
| real(kind=wp), | intent(in) | :: | drdt | The time derivative of the radial coordinate, . |
||
| real(kind=wp), | intent(in) | :: | d2rdt2 | The second time derivative of the radial coordinate, . |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(tdc_orbit), | intent(inout) | :: | this | The routine is called on this tdc_orbit object. |
||
| real(kind=wp), | intent(out) | :: | r | The radial coordinate, (in Schwarzschild coordinates). |
||
| real(kind=wp), | intent(out) | :: | drdt | The time derivative of the radial coordinate, . |
||
| real(kind=wp), | intent(out) | :: | d2rdt2 | The second time derivative of the radial coordinate, . |