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

Definition at line 3 of file c2t00b.c.

References eraC2i00b(), eraC2tcio(), eraEra00(), and eraPom00().

Referenced by t_c2t00b().

79 {
80  double rc2i[3][3], era, rpom[3][3];
81 
82 /* Form the celestial-to-intermediate matrix for this TT (IAU 2000B). */
83  eraC2i00b(tta, ttb, rc2i);
84 
85 /* Predict the Earth rotation angle for this UT1. */
86  era = eraEra00(uta, utb);
87 
88 /* Form the polar motion matrix (neglecting s'). */
89  eraPom00(xp, yp, 0.0, rpom);
90 
91 /* Combine to form the celestial-to-terrestrial matrix. */
92  eraC2tcio(rc2i, era, rpom, rc2t);
93 
94  return;
95 
96 }
void eraC2i00b(double date1, double date2, double rc2i[3][3])
Definition: c2i00b.c:3
double eraEra00(double dj1, double dj2)
Definition: era00.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: