FACT++  1.0
void eraC2txy ( double  tta,
double  ttb,
double  uta,
double  utb,
double  x,
double  y,
double  xp,
double  yp,
double  rc2t[3][3] 
)

Definition at line 3 of file c2txy.c.

References eraC2ixy(), eraC2tcio(), eraEra00(), eraPom00(), and eraSp00().

Referenced by t_c2txy().

85 {
86  double rc2i[3][3], era, sp, rpom[3][3];
87 
88 /* Form the celestial-to-intermediate matrix for this TT. */
89  eraC2ixy(tta, ttb, x, y, rc2i);
90 
91 /* Predict the Earth rotation angle for this UT1. */
92  era = eraEra00(uta, utb);
93 
94 /* Estimate s'. */
95  sp = eraSp00(tta, ttb);
96 
97 /* Form the polar motion matrix. */
98  eraPom00(xp, yp, sp, rpom);
99 
100 /* Combine to form the celestial-to-terrestrial matrix. */
101  eraC2tcio(rc2i, era, rpom, rc2t);
102 
103  return;
104 
105 }
double eraSp00(double date1, double date2)
Definition: sp00.c:3
double eraEra00(double dj1, double dj2)
Definition: era00.c:3
void eraC2ixy(double date1, double date2, double x, double y, double rc2i[3][3])
Definition: c2ixy.c:3
void eraPom00(double xp, double yp, double sp, double rpom[3][3])
Definition: pom00.c:3
void eraC2tcio(double rc2i[3][3], double era, double rpom[3][3], double rc2t[3][3])
Definition: c2tcio.c:3

+ Here is the call graph for this function:

+ Here is the caller graph for this function: