| /dports/astro/p5-Starlink-AST/Starlink-AST-1.05/extsrc/erfa/ |
| H A D | taitt.c | 3 int eraTaitt(double tai1, double tai2, double *tt1, double *tt2) in eraTaitt() argument
46 if ( tai1 > tai2 ) { in eraTaitt()
48 *tt2 = tai2 + dtat; in eraTaitt()
51 *tt2 = tai2; in eraTaitt()
|
| H A D | taiut1.c | 3 int eraTaiut1(double tai1, double tai2, double dta, in eraTaiut1() argument
47 if ( tai1 > tai2 ) { in eraTaiut1()
49 *ut12 = tai2 + dtad; in eraTaiut1()
52 *ut12 = tai2; in eraTaiut1()
|
| H A D | taiutc.c | 3 int eraTaiutc(double tai1, double tai2, double *utc1, double *utc2) in eraTaiutc() argument
69 big1 = ( tai1 >= tai2 ); in eraTaiutc()
72 a2 = tai2; in eraTaiutc()
74 a1 = tai2; in eraTaiutc()
|
| H A D | tttai.c | 3 int eraTttai(double tt1, double tt2, double *tai1, double *tai2) in eraTttai() argument
48 *tai2 = tt2 - dtat; in eraTttai()
51 *tai2 = tt2; in eraTttai()
|
| H A D | ut1tai.c | 4 double *tai1, double *tai2) in eraUt1tai() argument
49 *tai2 = ut12 - dtad; in eraUt1tai()
52 *tai2 = ut12; in eraUt1tai()
|
| H A D | utcut1.c | 71 double w, dat, dta, tai1, tai2; in eraUtcut1() local
83 jw = eraUtctai(utc1, utc2, &tai1, &tai2); in eraUtcut1()
89 if ( eraTaiut1(tai1, tai2, dta, ut11, ut12) ) return -1; in eraUtcut1()
|
| /dports/astro/p5-Astro-PAL/Astro-PAL-1.09/erfasrc/src/ |
| H A D | taitt.c | 3 int eraTaitt(double tai1, double tai2, double *tt1, double *tt2) in eraTaitt() argument
46 if ( fabs(tai1) > fabs(tai2) ) { in eraTaitt()
48 *tt2 = tai2 + dtat; in eraTaitt()
51 *tt2 = tai2; in eraTaitt()
|
| H A D | taiut1.c | 3 int eraTaiut1(double tai1, double tai2, double dta, in eraTaiut1() argument
47 if ( fabs(tai1) > fabs(tai2) ) { in eraTaiut1()
49 *ut12 = tai2 + dtad; in eraTaiut1()
52 *ut12 = tai2; in eraTaiut1()
|
| H A D | taiutc.c | 3 int eraTaiutc(double tai1, double tai2, double *utc1, double *utc2) in eraTaiutc() argument
69 big1 = ( fabs(tai1) >= fabs(tai2) ); in eraTaiutc()
72 a2 = tai2; in eraTaiutc()
74 a1 = tai2; in eraTaiutc()
|
| H A D | tttai.c | 3 int eraTttai(double tt1, double tt2, double *tai1, double *tai2) in eraTttai() argument
48 *tai2 = tt2 - dtat; in eraTttai()
51 *tai2 = tt2; in eraTttai()
|
| H A D | ut1tai.c | 4 double *tai1, double *tai2) in eraUt1tai() argument
49 *tai2 = ut12 - dtad; in eraUt1tai()
52 *tai2 = ut12; in eraUt1tai()
|
| H A D | utcut1.c | 71 double w, dat, dta, tai1, tai2; in eraUtcut1() local
83 jw = eraUtctai(utc1, utc2, &tai1, &tai2); in eraUtcut1()
89 if ( eraTaiut1(tai1, tai2, dta, ut11, ut12) ) return -1; in eraUtcut1()
|
| /dports/astro/sofa/sofa/20210512/c/src/ |
| H A D | taitt.c | 4 int iauTaitt(double tai1, double tai2, double *tt1, double *tt2) in iauTaitt() argument
55 if ( fabs(tai1) > fabs(tai2) ) { in iauTaitt()
57 *tt2 = tai2 + dtat; in iauTaitt()
60 *tt2 = tai2; in iauTaitt()
|
| H A D | taiut1.c | 4 int iauTaiut1(double tai1, double tai2, double dta, in iauTaiut1() argument
57 if ( fabs(tai1) > fabs(tai2) ) { in iauTaiut1()
59 *ut12 = tai2 + dtad; in iauTaiut1()
62 *ut12 = tai2; in iauTaiut1()
|
| H A D | taiutc.c | 3 int iauTaiutc(double tai1, double tai2, double *utc1, double *utc2) in iauTaiutc() argument
77 big1 = ( fabs(tai1) >= fabs(tai2) ); in iauTaiutc()
80 a2 = tai2; in iauTaiutc()
82 a1 = tai2; in iauTaiutc()
|
| H A D | tttai.c | 4 int iauTttai(double tt1, double tt2, double *tai1, double *tai2) in iauTttai() argument
57 *tai2 = tt2 - dtat; in iauTttai()
60 *tai2 = tt2; in iauTttai()
|
| H A D | ut1tai.c | 5 double *tai1, double *tai2) in iauUt1tai() argument
58 *tai2 = ut12 - dtad; in iauUt1tai()
61 *tai2 = ut12; in iauUt1tai()
|
| /dports/astro/py-pyerfa/pyerfa-2.0.0/liberfa/erfa/src/ |
| H A D | taitt.c | 4 int eraTaitt(double tai1, double tai2, double *tt1, double *tt2) in eraTaitt() argument
49 if ( fabs(tai1) > fabs(tai2) ) { in eraTaitt()
51 *tt2 = tai2 + dtat; in eraTaitt()
54 *tt2 = tai2; in eraTaitt()
|
| H A D | taiut1.c | 4 int eraTaiut1(double tai1, double tai2, double dta, in eraTaiut1() argument
50 if ( fabs(tai1) > fabs(tai2) ) { in eraTaiut1()
52 *ut12 = tai2 + dtad; in eraTaiut1()
55 *ut12 = tai2; in eraTaiut1()
|
| H A D | taiutc.c | 3 int eraTaiutc(double tai1, double tai2, double *utc1, double *utc2) in eraTaiutc() argument
71 big1 = ( fabs(tai1) >= fabs(tai2) ); in eraTaiutc()
74 a2 = tai2; in eraTaiutc()
76 a1 = tai2; in eraTaiutc()
|
| H A D | tttai.c | 4 int eraTttai(double tt1, double tt2, double *tai1, double *tai2) in eraTttai() argument
51 *tai2 = tt2 - dtat; in eraTttai()
54 *tai2 = tt2; in eraTttai()
|
| H A D | ut1tai.c | 5 double *tai1, double *tai2) in eraUt1tai() argument
52 *tai2 = ut12 - dtad; in eraUt1tai()
55 *tai2 = ut12; in eraUt1tai()
|
| /dports/astro/libgal/libgal-0.5.0/date_time/ |
| H A D | gal_utc2tai_test.c | 42 double tai1, tai2 ; in gal_utc2tai_test() local
50 j = gal_utc2tai ( 2451545.0, 0.0, &tai1, &tai2 ) ; in gal_utc2tai_test()
52 gal_vdv ( tai2, 32.0 / GAL_D2S, 0.0, "gal_utc2tai", "tai2" ) ; in gal_utc2tai_test()
|
| H A D | gal_utc2tt.c | 84 double tai1, tai2 ; in gal_utc2tt() local
90 j = gal_utc2tai ( utc1, utc2, &tai1, &tai2 ) ; in gal_utc2tt()
93 gal_tai2tt ( tai1, tai2, tt1, tt2 ) ; in gal_utc2tt()
|
| H A D | gal_utc2tai.c | 77 double *tai2 in gal_utc2tai() argument
94 *tai2 = 0.0 ; in gal_utc2tai()
98 *tai2 = utc2 + deltat / GAL_D2S ; in gal_utc2tai()
|