1 /*
2  *  - - - - - - - - - - -
3  *   g a l _ t a i 2 t t
4  *  - - - - - - - - - - -
5  *
6  *  This routine is part of the General Astrodynamics Library
7  *
8  *  Description:
9  *
10  *     This routine converts a TAI jd date to a TT jd date.
11  *
12  *  Status:
13  *
14  *     support routine.
15  *
16  *  Given:
17  *
18  *     tai1                d        TAI date part 1 ( see Note 1 )
19  *     tai2                d        TAI date part 2 ( see Note 1 )
20  *
21  *  Returned:
22  *
23  *     *tt1                d        TT date part 1 ( see Note 1 )
24  *     *tt2                d        TT date part 2 ( see Note 1 )
25  *
26  *  Notes:
27  *
28  *  1) The Julian Date is apportioned in any convenient way between
29  *     the arguments tai1 and tai2.  For example, JD=2450123.7 could
30  *     be expressed in any of these ways, among others:
31  *
32  *              tai1         tai2
33  *
34  *         2450123.7          0.0   (JD method)
35  *         2451545.0      -1421.3   (J2000 method)
36  *         2400000.5      50123.2   (MJD method)
37  *         2450123.5          0.2   (date & time method)
38  *
39  *  References:
40  *
41  *     Explantory Supplement to the Astronomical Supplement
42  *     Seidelmann P. Kenneth 1992
43  *     Pages 47-48
44  *
45  *  This revision:
46  *
47  *     2008 April 13
48  *
49  *  Copyright (C) 2008 Paul C. L. Willmott. See notes at end.
50  *
51  *-----------------------------------------------------------------------
52  */
53 
54 #include "gal_tai2tt.h"
55 #include "gal_const.h"
56 
57 void
gal_tai2tt(double tai1,double tai2,double * tt1,double * tt2)58 gal_tai2tt
59  (
60     double tai1,
61     double tai2,
62     double *tt1,
63     double *tt2
64  )
65 
66 {
67 
68 /*
69  * - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
70  */
71 
72   *tt1 = tai1 ;
73   *tt2 = tai2 + 32.184 / GAL_D2S ;
74 
75 /*
76  * Finished.
77  */
78 
79 }
80 
81 /*
82  *  gal - General Astrodynamics Library
83  *  Copyright (C) 2008 Paul C. L. Willmott
84  *
85  *  This program is free software; you can redistribute it and/or modify
86  *  it under the terms of the GNU General Public License as published by
87  *  the Free Software Foundation; either version 2 of the License, or
88  *  (at your option) any later version.
89  *
90  *  This program is distributed in the hope that it will be useful,
91  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
92  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
93  *  GNU General Public License for more details.
94  *
95  *  You should have received a copy of the GNU General Public License along
96  *  with this program; if not, write to the Free Software Foundation, Inc.,
97  *  51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
98  *
99  *  Contact:
100  *
101  *  Paul Willmott
102  *  vp9mu@amsat.org
103  */
104 
105