| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ephemeris_class), | intent(inout) | :: | me | |||
| real(kind=wp), | intent(in) | :: | et |
ephemeris time [sec] |
||
| type(celestial_body), | intent(in) | :: | targ |
target body |
||
| type(celestial_body), | intent(in) | :: | obs |
observer body |
||
| real(kind=wp), | intent(out), | dimension(6) | :: | rv |
state of targ w.r.t. obs |
|
| logical, | intent(out) | :: | status_ok |
true if there were no problems |
function to return the state of the targ body relative to
the obs body, in the inertial frame [ICRF].