FACT++  1.0
void eraC2i06a ( double  date1,
double  date2,
double  rc2i[3][3] 
)

Definition at line 3 of file c2i06a.c.

References eraBpn2xy(), eraC2ixys(), eraPnm06a(), and eraS06().

Referenced by eraC2t06a(), and t_c2i06a().

65 {
66  double rbpn[3][3], x, y, s;
67 
68 /* Obtain the celestial-to-true matrix (IAU 2006/2000A). */
69  eraPnm06a(date1, date2, rbpn);
70 
71 /* Extract the X,Y coordinates. */
72  eraBpn2xy(rbpn, &x, &y);
73 
74 /* Obtain the CIO locator. */
75  s = eraS06(date1, date2, x, y);
76 
77 /* Form the celestial-to-intermediate matrix. */
78  eraC2ixys(x, y, s, rc2i);
79 
80  return;
81 
82 }
void eraPnm06a(double date1, double date2, double rnpb[3][3])
Definition: pnm06a.c:3
void eraBpn2xy(double rbpn[3][3], double *x, double *y)
Definition: bpn2xy.c:3
void eraC2ixys(double x, double y, double s, double rc2i[3][3])
Definition: c2ixys.c:3
double eraS06(double date1, double date2, double x, double y)
Definition: s06.c:3

+ Here is the call graph for this function:

+ Here is the caller graph for this function: