/rust/registry/src/index.crates.io-1949cf8c6b5b557f/sofars-0.6.1/src/fundargs/fasa03.rs
Line | Count | Source |
1 | | use crate::consts::D2PI; |
2 | | use std::ops::Rem; |
3 | | |
4 | | /// Fundamental argument, IERS Conventions (2003): |
5 | | /// mean longitude of Saturn. |
6 | | /// |
7 | | /// Status: canonical model. |
8 | | /// |
9 | | /// Given: |
10 | | /// t f64 TDB, Julian centuries since J2000.0 (Note 1) |
11 | | /// |
12 | | /// Returned (function value): |
13 | | /// f64 mean longitude of Saturn, radians (Note 2) |
14 | | /// |
15 | | /// Notes: |
16 | | /// |
17 | | /// 1) Though t is strictly TDB, it is usually more convenient to use |
18 | | /// TT, which makes no significant difference. |
19 | | /// |
20 | | /// 2) The expression used is as adopted in IERS Conventions (2003) and |
21 | | /// comes from Souchay et al. (1999) after Simon et al. (1994). |
22 | | /// |
23 | | /// References: |
24 | | /// |
25 | | /// McCarthy, D. D., Petit, G. (eds.), IERS Conventions (2003), |
26 | | /// IERS Technical Note No. 32, BKG (2004) |
27 | | /// |
28 | | /// Simon, J.-L., Bretagnon, P., Chapront, J., Chapront-Touze, M., |
29 | | /// Francou, G., Laskar, J. 1994, Astron.Astrophys. 282, 663-683 |
30 | | /// |
31 | | /// Souchay, J., Loysel, B., Kinoshita, H., Folgueira, M. 1999, |
32 | | /// Astron.Astrophys.Supp.Ser. 135, 111 |
33 | 0 | pub fn fasa03(t: f64) -> f64 { |
34 | | /* Mean longitude of Saturn (IERS Conventions 2003). */ |
35 | 0 | (0.874016757 + 21.3299104960 * t).rem(D2PI) |
36 | 0 | } |