General Purpose Geodetic Library
SgTidalUt1_Tables.cpp
Go to the documentation of this file.
1 /*
2  *
3  * This file is a part of Space Geodetic Library. The library is used by
4  * nuSolve, a part of CALC/SOLVE system, and designed to make analysis of
5  * geodetic VLBI observations.
6  * Copyright (C) 2010-2020 Sergei Bolotin.
7  *
8  * This program is free software: you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation, either version 3 of the License, or
11  * (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program. If not, see <http://www.gnu.org/licenses/>.
20  *
21  */
22 
23 
24 
25 #include <SgTidalUt1.h>
26 
27 
28 /*=====================================================================================================*/
29 //
30 // constants:
31 //
32 /*=====================================================================================================*/
34 {
35  // this is `cut-and-copy' from ut1cm.f:
36  //
37  // TABLE OF MULTIPLES OF ARGUMENTS AND COEFFICIENTS
38  //
39  // MULTIPLE OF DUT DLOD DOMEGA
40  // L L' F D OMEGA COEFF. OF SIN COEFF. OF COS
41  {{ 1, 0, 2, 2, 2}, -0.02, 0.3, -0.2},
42  {{ 2, 0, 2, 0, 1}, -0.04, 0.4, -0.3},
43  {{ 2, 0, 2, 0, 2}, -0.10, 0.9, -0.8},
44  {{ 0, 0, 2, 2, 1}, -0.05, 0.4, -0.4},
45  {{ 0, 0, 2, 2, 2}, -0.12, 1.1, -0.9},
46  //
47  {{ 1, 0, 2, 0, 0}, -0.04, 0.3, -0.2},
48  {{ 1, 0, 2, 0, 1}, -0.41, 2.8, -2.4},
49  {{ 1, 0, 2, 0, 2}, -0.99, 6.8, -5.8},
50  {{ 3, 0, 0, 0, 0}, -0.02, 0.1, -0.1},
51  {{-1, 0, 2, 2, 1}, -0.08, 0.5, -0.5},
52  //
53  {{-1, 0, 2, 2, 2}, -0.20, 1.3, -1.1},
54  {{ 1, 0, 0, 2, 0}, -0.08, 0.5, -0.4},
55  {{ 2, 0, 2, -2, 2}, 0.02, -0.1, 0.1},
56  {{ 0, 1, 2, 0, 2}, 0.03, -0.1, 0.1},
57  {{ 0, 0, 2, 0, 0}, -0.30, 1.4, -1.2},
58  //
59  {{ 0, 0, 2, 0, 1}, -3.21, 14.8, -12.5},
60  {{ 0, 0, 2, 0, 2}, -7.76, 35.7, -30.1},
61  {{ 2, 0, 0, 0, -1}, 0.02, -0.1, 0.1},
62  {{ 2, 0, 0, 0, 0}, -0.34, 1.5, -1.3},
63  {{ 2, 0, 0, 0, 1}, 0.02, -0.1, 0.1},
64  //
65  {{ 0, -1, 2, 0, 2}, -0.02, 0.1, -0.1},
66  {{ 0, 0, 0, 2, -1}, 0.05, -0.2, 0.2},
67  {{ 0, 0, 0, 2, 0}, -0.73, 3.1, -2.6},
68  {{ 0, 0, 0, 2, 1}, -0.05, 0.2, -0.2},
69  {{ 0, -1, 0, 2, 0}, -0.05, 0.2, -0.2},
70  //
71  {{ 1, 0, 2, -2, 1}, 0.05, -0.1, 0.1},
72  {{ 1, 0, 2, -2, 2}, 0.10, -0.3, 0.2},
73  {{ 1, 1, 0, 0, 0}, 0.04, -0.1, 0.1},
74  {{-1, 0, 2, 0, 0}, 0.05, -0.1, 0.1},
75  {{-1, 0, 2, 0, 1}, 0.18, -0.4, 0.3},
76  //
77  {{-1, 0, 2, 0, 2}, 0.44, -1.0, 0.9},
78  {{ 1, 0, 0, 0, -1}, 0.53, -1.2, 1.0},
79  {{ 1, 0, 0, 0, 0}, -8.26, 18.8, -15.9},
80  {{ 1, 0, 0, 0, 1}, 0.54, -1.2, 1.0},
81  {{ 0, 0, 0, 1, 0}, 0.05, -0.1, 0.1},
82  //
83  {{ 1, -1, 0, 0, 0}, -0.06, 0.1, -0.1},
84  {{-1, 0, 0, 2, -1}, 0.12, -0.2, 0.2},
85  {{-1, 0, 0, 2, 0}, -1.82, 3.6, -3.0},
86  {{-1, 0, 0, 2, 1}, 0.13, -0.3, 0.2},
87  {{ 1, 0, -2, 2, -1}, 0.02, 0.0, 0.0},
88  //
89  {{-1, -1, 0, 2, 0}, -0.09, 0.2, -0.1},
90 };
92 
93 
94 
95 
97 {
98  //his is `cut-and-copy' from ut1s2k.f:
99  // Multiple of DUT DLOD DOMEGA
100  // l l' F D OMEGA sin cos cos sin cos sin
101  {{ 1, 0, 2, 2, 2}, -0.02, 0.00, 0.26, 0.00, -0.22, .00},
102  {{ 2, 0, 2, 0, 1}, -0.04, 0.00, 0.38, 0.00, -0.32, .00},
103  {{ 2, 0, 2, 0, 2}, -0.10, 0.00, 0.91, 0.00, -0.76, .00},
104  {{ 0, 0, 2, 2, 1}, -0.05, 0.00, 0.45, 0.00, -0.38, .00},
105  {{ 0, 0, 2, 2, 2}, -0.12, 0.00, 1.09, 0.01, -0.92,-.01},
106  //
107  {{ 1, 0, 2, 0, 0}, -0.04, 0.00, 0.27, 0.00, -0.22, .0 },
108  {{ 1, 0, 2, 0, 1}, -0.40, 0.00, 2.84, 0.02, -2.40,-.01},
109  {{ 1, 0, 2, 0, 2}, -1.00, 0.01, 6.85, 0.04, -5.78,-.03},
110  {{ 3, 0, 0, 0, 0}, -0.02, 0.00, 0.12, 0.00, -0.11, .00},
111  {{-1, 0, 2, 2, 1}, -0.08, 0.00, 0.54, 0.00, -0.46, .00},
112  //
113  {{-1, 0, 2, 2, 2}, -0.20, 0.00, 1.30, 0.01, -1.10,-.01},
114  {{ 1, 0, 0, 2, 0}, -0.08, 0.00, 0.50, 0.00, -0.42, .00},
115  {{ 2, 0, 2, -2, 2}, 0.02, 0.00, -0.11, 0.00, 0.09, .00},
116  {{ 0, 1, 2, 0, 2}, 0.03, 0.00, -0.12, 0.00, 0.10, .00},
117  {{ 0, 0, 2, 0, 0}, -0.30, 0.00, 1.39, 0.01, -1.17,-.01},
118  //
119  {{ 0, 0, 2, 0, 1}, -3.22, 0.02, 14.86, 0.09, -12.54,-.08},
120  {{ 0, 0, 2, 0, 2}, -7.79, 0.05, 35.84, 0.22, -30.25,-.18},
121  {{ 2, 0, 0, 0, -1}, 0.02, 0.00, -0.10, 0.00, 0.08, .00},
122  {{ 2, 0, 0, 0, 0}, -0.34, 0.00, 1.55, 0.01, -1.31,-.01},
123  {{ 2, 0, 0, 0, 1}, 0.02, 0.00, -0.08, 0.00, 0.07, .00},
124  //
125  //
126  {{ 0, -1, 2, 0, 2}, -0.02, 0.00, 0.11, 0.00, -0.09, .00},
127  {{ 0, 0, 0, 2, -1}, 0.05, 0.00, -0.20, 0.00, 0.17, .00},
128  {{ 0, 0, 0, 2, 0}, -0.74, 0.00, 3.14, 0.02, -2.65,-.02},
129  {{ 0, 0, 0, 2, 1}, -0.05, 0.00, 0.22, 0.00, -0.19, .00},
130  {{ 0, -1, 0, 2, 0}, -0.05, 0.00, 0.21, 0.00, -0.17, .00},
131  //
132  {{ 1, 0, 2, -2, 1}, 0.05, 0.00, -0.13, 0.00, 0.11, .00},
133  {{ 1, 0, 2, -2, 2}, 0.10, 0.00, -0.26, 0.00, 0.22, .00},
134  {{ 1, 1, 0, 0, 0}, 0.04, 0.00, -0.10, 0.00, 0.08, .00},
135  {{-1, 0, 2, 0, 0}, 0.05, 0.00, -0.11, 0.00, 0.09, .00},
136  {{-1, 0, 2, 0, 1}, 0.18, 0.00, -0.41, 0.00, 0.35, .00},
137  //
138  {{-1, 0, 2, 0, 2}, 0.44, 0.00, -1.02,-0.01, 0.86, .01},
139  {{ 1, 0, 0, 0, -1}, 0.54, 0.00, -1.23,-0.01, 1.04, .01},
140  {{ 1, 0, 0, 0, 0}, -8.33, 0.06, 18.99, 0.13, -16.03,-.11},
141  {{ 1, 0, 0, 0, 1}, 0.55, 0.00, -1.25,-0.01, 1.05, .01},
142  {{ 0, 0, 0, 1, 0}, 0.05, 0.00, -0.11, 0.00, 0.09, .00},
143  //
144  {{ 1, -1, 0, 0, 0}, -0.06, 0.00, 0.12, 0.00, -0.10, .00},
145  {{-1, 0, 0, 2, -1}, 0.12, 0.00, -0.24, 0.00, 0.20, .00},
146  {{-1, 0, 0, 2, 0}, -1.84, 0.01, 3.63, 0.02, -3.07,-.02},
147  {{-1, 0, 0, 2, 1}, 0.13, 0.00, -0.26, 0.00, 0.22, .00},
148  {{ 1, 0, -2, 2, -1}, 0.02, 0.00, -0.04, 0.00, 0.03, .03},
149  //
150  //
151  {{-1, -1, 0, 2, 0}, -0.09, 0.00, 0.16, 0.00, -0.13, .00},
152  {{ 0, 2, 2, -2, 2}, -0.06, 0.00, 0.04, 0.00, -0.03, .00},
153  {{ 0, 1, 2, -2, 1}, 0.03, 0.00, -0.02, 0.00, 0.01, .00},
154  {{ 0, 1, 2, -2, 2}, -1.91, 0.02, 0.98, 0.01, -0.83,-.01},
155  {{ 0, 0, 2, -2, 0}, 0.26, 0.00, -0.09, 0.00, 0.08, .00},
156  //
157  {{ 0, 0, 2, -2, 1}, 1.18, -0.01, -0.42, 0.00, 0.35, .00},
158  {{ 0, 0, 2, -2, 2}, -49.06, 0.43, 16.88, 0.15, -14.25,-.13},
159  {{ 0, 2, 0, 0, 0}, -0.20, 0.00, 0.07, 0.00, -0.06, .00},
160  {{ 2, 0, 0, -2, -1}, 0.05, 0.00, -0.02, 0.00, 0.01, .00},
161  {{ 2, 0, 0, -2, 0}, -0.56, 0.01, 0.17, 0.00, -0.14, .00},
162  //
163  {{ 2, 0, 0, -2, 1}, 0.04, 0.00, -0.01, 0.00, 0.01, .00},
164  {{ 0, -1, 2, -2, 1}, -0.05, 0.00, 0.01, 0.00, -0.01, .00},
165  {{ 0, 1, 0, 0, -1}, 0.09, 0.00, -0.02, 0.00, 0.01, .00},
166  {{ 0, -1, 2, -2, 2}, 0.82, -0.01, -0.14, 0.00, 0.12, .00},
167  {{ 0, 1, 0, 0, 0}, -15.65, 0.15, 2.69, 0.03, -2.27,-.02},
168  //
169  {{ 0, 1, 0, 0, 1}, -0.14, 0.00, 0.02, 0.00, -0.02, .00},
170  {{ 1, 0, 0, -1, 0}, 0.03, 0.00, 0.00, 0.00, 0.0 , .00},
171  {{ 2, 0, -2, 0, 0}, -0.14, 0.00, -0.01, 0.00, 0.01, .00},
172  {{-2, 0, 2, 0, 1}, 0.43, -0.01, -0.02, 0.00, 0.02, .00},
173  {{-1, 1, 0, 1, 0}, -0.04, 0.00, 0.00, 0.00, 0.00, .00},
174  //
175  //
176  {{ 0, 0, 0, 0, 2}, 8.20, 0.11, 0.15, 0.00, -0.13, .00},
177  {{ 0, 0, 0, 0, 1}, -1689.54,-25.04, -15.62, 0.23, 13.18,-.20},
178 };
180 
181 
182 
183 
185 {
186  // Table of multiples of arguments and coefficients
187  //
188  // Multiple of DUT DLOD DOMEGA
189  // l l' F D OMEGA sin cos cos sin cos sin
190  {{ 1, 0, 2, 2, 2}, -0.02, 0.00, 0.3, 0.0, -0.2, 0.0},
191  {{ 2, 0, 2, 0, 1}, -0.04, 0.00, 0.4, 0.0, -0.3, 0.0},
192  {{ 2, 0, 2, 0, 2}, -0.10, 0.00, 0.9, 0.0, -0.8, 0.0},
193  {{ 0, 0, 2, 2, 1}, -0.05, 0.00, 0.4, 0.0, -0.4, 0.0},
194  {{ 0, 0, 2, 2, 2}, -0.12, 0.00, 1.1, 0.0, -0.9, 0.0},
195  //
196  {{ 1, 0, 2, 0, 0}, -0.04, 0.00, 0.3, 0.0, -0.2, 0.0},
197  {{ 1, 0, 2, 0, 1}, -0.40, 0.01, 2.7, 0.1, -2.3, -0.1},
198  {{ 1, 0, 2, 0, 2}, -0.98, 0.03, 6.7, 0.2, -5.7, -0.2},
199  {{ 3, 0, 0, 0, 0}, -0.02, 0.00, 0.1, 0.0, -0.1, 0.0},
200  {{-1, 0, 2, 2, 1}, -0.08, 0.00, 0.5, 0.0, -0.5, 0.0},
201  //
202  {{-1, 0, 2, 2, 2}, -0.20, 0.00, 1.3, 0.0, -1.1, 0.0},
203  {{ 1, 0, 0, 2, 0}, -0.08, 0.00, 0.5, 0.0, -0.4, 0.0},
204  {{ 2, 0, 2,-2, 2}, 0.02, 0.00, -0.1, 0.0, 0.1, 0.0},
205  {{ 0, 1, 2, 0, 2}, 0.03, 0.00, -0.1, 0.0, 0.1, 0.0},
206  {{ 0, 0, 2, 0, 0}, -0.30, 0.00, 1.4, 0.0, -1.2, 0.0},
207  //
208  {{ 0, 0, 2, 0, 1}, -3.20, 0.09, 14.7, 0.4,-12.4, -0.4},
209  {{ 0, 0, 2, 0, 2}, -7.73, 0.21, 35.6, 1.0,-30.0, -0.8},
210  {{ 2, 0, 0, 0,-1}, 0.02, 0.00, -0.1, 0.0, 0.1, 0.0},
211  {{ 2, 0, 0, 0, 0}, -0.34, 0.00, 1.5, 0.0, -1.3, 0.0},
212  {{ 2, 0, 0, 0, 1}, 0.02, 0.00, -0.1, 0.0, 0.1, 0.0},
213  //
214  {{ 0,-1, 2, 0, 2}, -0.02, 0.00, 0.1, 0.0, -0.1, 0.0},
215  {{ 0, 0, 0, 2,-1}, 0.05, 0.00, -0.2, 0.0, 0.2, 0.0},
216  {{ 0, 0, 0, 2, 0}, -0.72, 0.02, 3.1, 0.1, -2.6, -0.1},
217  {{ 0, 0, 0, 2, 1}, -0.05, 0.00, 0.2, 0.0, -0.2, 0.0},
218  {{ 0,-1, 0, 2, 0}, -0.05, 0.00, 0.2, 0.0, -0.2, 0.0},
219  //
220  {{ 1, 0, 2,-2, 1}, 0.05, 0.00, -0.1, 0.0, 0.1, 0.0},
221  {{ 1, 0, 2,-2, 2}, 0.10, 0.00, -0.3, 0.0, 0.2, 0.0},
222  {{ 1, 1, 0, 0, 0}, 0.04, 0.00, -0.1, 0.0, 0.1, 0.0},
223  {{-1, 0, 2, 0, 0}, 0.05, 0.00, -0.1, 0.0, 0.1, 0.0},
224  {{-1, 0, 2, 0, 1}, 0.18, 0.00, -0.4, 0.0, 0.3, 0.0},
225  //
226  {{-1, 0, 2, 0, 2}, 0.44, 0.00, -1.0, 0.0, 0.9, 0.0},
227  {{ 1, 0, 0, 0,-1}, 0.53, 0.00, -1.2, 0.0, 1.0, 0.0},
228  {{ 1, 0, 0, 0, 0}, -8.33, 0.12, 19.0, 0.3,-16.0, -0.2},
229  {{ 1, 0, 0, 0, 1}, 0.54, 0.00, -1.2, 0.0, 1.0, 0.0},
230  {{ 0, 0, 0, 1, 0}, 0.05, 0.00, -0.1, 0.0, 0.1, 0.0},
231  //
232  {{ 1,-1, 0, 0, 0}, -0.06, 0.00, 0.1, 0.0, -0.1, 0.0},
233  {{-1, 0, 0, 2,-1}, 0.12, 0.00, -0.2, 0.0, 0.2, 0.0},
234  {{-1, 0, 0, 2, 0}, -1.84, 0.02, 3.6, 0.0, -3.0, 0.0},
235  {{-1, 0, 0, 2, 1}, 0.13, 0.00, -0.3, 0.0, 0.2, 0.0},
236  {{ 1, 0,-2, 2,-1}, 0.02, 0.00, 0.0, 0.0, 0.0, 0.0},
237  //
238  {{-1,-1, 0, 2, 0}, -0.09, 0.00, 0.2, 0.0, -0.1, 0.0},
239  {{ 0, 2, 2,-2, 2}, -0.06, 0.00, 0.0, 0.0, -0.0, 0.0},
240  {{ 0, 1, 2,-2, 1}, 0.03, 0.00, -0.0, 0.0, 0.0, 0.0},
241  {{ 0, 1, 2,-2, 2}, -1.88, 0.00, 1.0, 0.0, -0.8, 0.0},
242  {{ 0, 0, 2,-2, 0}, 0.25, 0.00, -0.1, 0.0, 0.1, 0.0},
243  //
244  {{ 0, 0, 2,-2, 1}, 1.17, 0.00, -0.4, 0.0, 0.3, 0.0},
245  {{ 0, 0, 2,-2, 2}, -48.84, 0.11, 16.8, 0.0,-14.2, 0.0},
246  {{ 0, 2, 0, 0, 0}, -0.19, 0.00, 0.1, 0.0, -0.1, 0.0},
247  {{ 2, 0, 0,-2,-1}, 0.05, 0.00, -0.0, 0.0, 0.0, 0.0},
248  {{ 2, 0, 0,-2, 0}, -0.55, 0.00, 0.2, 0.0, -0.1, 0.0},
249  //
250  {{ 2, 0, 0,-2, 1}, 0.04, 0.00, -0.0, 0.0, 0.0, 0.0},
251  {{ 0,-1, 2,-2, 1}, -0.05, 0.00, 0.0, 0.0, -0.0, 0.0},
252  {{ 0, 1, 0, 0,-1}, 0.09, 0.00, -0.0, 0.0, 0.0, 0.0},
253  {{ 0,-1, 2,-2, 2}, 0.83, 0.00, -0.1, 0.0, 0.1, 0.0},
254  {{ 0, 1, 0, 0, 0}, -15.55, 0.02, 2.6, 0.0, -2.2, 0.0},
255  //
256  {{ 0, 1, 0, 0, 1}, -0.14, 0.00, 0.0, 0.0, -0.0, 0.0},
257  {{ 1, 0, 0,-1, 0}, 0.03, 0.00, -0.0, 0.0, 0.0, 0.0},
258  {{ 2, 0,-2, 0, 0}, -0.14, 0.00, -0.0, 0.0, 0.0, 0.0},
259  {{-2, 0, 2, 0, 1}, 0.42, 0.00, -0.0, 0.0, 0.0, 0.0},
260  {{-1, 1, 0, 1, 0}, 0.04, 0.00, -0.0, 0.0, 0.0, 0.0},
261  //
262  {{ 0, 0, 0, 0, 2}, 7.90, 0.00, 0.1, 0.0, -0.1, 0.0},
263  {{ 0, 0, 0, 0, 1}, -1637.68, 0.10,-10.4, 0.0, 8.8, 0.0},
264 };
266 
267 
268 
269 
271 {
272  // Table of multiples of arguments and coefficients
273  //
274  // Multiple of DUT
275  // l l' F D OMEGA sin cos
276  {{ 1, 0, 2, 2, 2}, -0.02, 0.00},
277  {{ 2, 0, 2, 0, 1}, -0.04, 0.00},
278  {{ 2, 0, 2, 0, 2}, -0.10, 0.00},
279  {{ 0, 0, 2, 2, 1}, -0.05, 0.00},
280  {{ 0, 0, 2, 2, 2}, -0.12, 0.00},
281  {{ 1, 0, 2, 0, 0}, -0.04, 0.00},
282  {{ 1, 0, 2, 0, 1}, -0.40, 0.01},
283  {{ 1, 0, 2, 0, 2}, -0.98, 0.03},
284  {{ 3, 0, 0, 0, 0}, -0.02, 0.00},
285  {{-1, 0, 2, 2, 1}, -0.08, 0.00},
286  {{-1, 0, 2, 2, 2}, -0.20, 0.00},
287  {{ 1, 0, 0, 2, 0}, -0.08, 0.00},
288  {{ 2, 0, 2,-2, 2}, 0.02, 0.00},
289  {{ 0, 1, 2, 0, 2}, 0.03, 0.00},
290  {{ 0, 0, 2, 0, 0}, -0.30, 0.00},
291  {{ 0, 0, 2, 0, 1}, -3.20, 0.09},
292  {{ 0, 0, 2, 0, 2}, -7.73, 0.21},
293  {{ 2, 0, 0, 0,-1}, 0.02, 0.00},
294  {{ 2, 0, 0, 0, 0}, -0.34, 0.00},
295  {{ 2, 0, 0, 0, 1}, 0.02, 0.00},
296  {{ 0,-1, 2, 0, 2}, -0.02, 0.00},
297  {{ 0, 0, 0, 2,-1}, 0.05, 0.00},
298  {{ 0, 0, 0, 2, 0}, -0.72, 0.02},
299  {{ 0, 0, 0, 2, 1}, -0.05, 0.00},
300  {{ 0,-1, 0, 2, 0}, -0.05, 0.00},
301  {{ 1, 0, 2,-2, 1}, 0.05, 0.00},
302  {{ 1, 0, 2,-2, 2}, 0.10, 0.00},
303  {{ 1, 1, 0, 0, 0}, 0.04, 0.00},
304  {{-1, 0, 2, 0, 0}, 0.05, 0.00},
305  {{-1, 0, 2, 0, 1}, 0.18, 0.00},
306  {{-1, 0, 2, 0, 2}, 0.44, 0.00},
307  {{ 1, 0, 0, 0,-1}, 0.53, 0.00},
308  {{ 1, 0, 0, 0, 0}, -8.33, 0.12},
309  {{ 1, 0, 0, 0, 1}, 0.54, 0.00},
310  {{ 0, 0, 0, 1, 0}, 0.05, 0.00},
311  {{ 1,-1, 0, 0, 0}, -0.06, 0.00},
312  {{-1, 0, 0, 2,-1}, 0.12, 0.00},
313  {{-1, 0, 0, 2, 0}, -1.84, 0.02},
314  {{-1, 0, 0, 2, 1}, 0.13, 0.00},
315  {{ 1, 0,-2, 2,-1}, 0.02, 0.00},
316  {{-1,-1, 0, 2, 0}, -0.09, 0.00},
317  {{ 0, 2, 2,-2, 2}, -0.06, 0.00},
318  {{ 0, 1, 2,-2, 1}, 0.03, 0.00},
319  {{ 0, 1, 2,-2, 2}, -1.88, 0.00},
320  {{ 0, 0, 2,-2, 0}, 0.25, 0.00},
321  {{ 0, 0, 2,-2, 1}, 1.17, 0.00},
322  {{ 0, 0, 2,-2, 2}, -48.84, 0.11},
323  {{ 0, 2, 0, 0, 0}, -0.19, 0.00},
324  {{ 2, 0, 0,-2,-1}, 0.05, 0.00},
325  {{ 2, 0, 0,-2, 0}, -0.55, 0.00},
326  {{ 2, 0, 0,-2, 1}, 0.04, 0.00},
327  {{ 0,-1, 2,-2, 1}, -0.05, 0.00},
328  {{ 0, 1, 0, 0,-1}, 0.09, 0.00},
329  {{ 0,-1, 2,-2, 2}, 0.83, 0.00},
330  {{ 0, 1, 0, 0, 0}, -15.55, 0.02},
331  {{ 0, 1, 0, 0, 1}, -0.14, 0.00},
332  {{ 1, 0, 0,-1, 0}, 0.03, 0.00},
333  {{ 2, 0,-2, 0, 0}, -0.14, 0.00},
334  {{-2, 0, 2, 0, 1}, 0.42, 0.00},
335  {{-1, 1, 0, 1, 0}, 0.04, 0.00},
336  {{ 0, 0, 0, 0, 2}, 7.90, 0.00},
337  {{ 0, 0, 0, 0, 1}, -1637.68,-0.10},
338  // !
339  // ! Note: The last line contains corrected term for DUT1: "-0.10"
340  // ! Previous versions contained misprint: "0.10"
341 };
343 
344 
345 
346 /*=====================================================================================================*/
const int numOfRecs_Ut1s83
const int numOfRecs_Ut1s82
const int numOfRecs_Ut1s2k
const SgUt1TidalTableEntry_Standard ut1Ttable_Ut1s82[]
const SgUt1TidalTableEntry_Clipped ut1Ttable_Ut1s83[]
const SgUt1TidalTableEntry_Simplified ut1Ttable_Ut1cm[]
const SgUt1TidalTableEntry_Standard ut1Ttable_Ut1s2k[]
const int numOfRecs_Ut1cm