FACT++  1.0
double eraGst06 ( double  uta,
double  utb,
double  tta,
double  ttb,
double  rnpb[3][3] 
)

Definition at line 3 of file gst06.c.

References eraAnp(), eraBpn2xy(), eraEors(), eraEra00(), and eraS06().

Referenced by eraGst06a(), and t_gst06().

70 {
71  double x, y, s, era, eors, gst;
72 
73 /* Extract CIP coordinates. */
74  eraBpn2xy(rnpb, &x, &y);
75 
76 /* The CIO locator, s. */
77  s = eraS06(tta, ttb, x, y);
78 
79 /* Greenwich apparent sidereal time. */
80  era = eraEra00(uta, utb);
81  eors = eraEors(rnpb, s);
82  gst = eraAnp(era - eors);
83 
84  return gst;
85 
86 }
void eraBpn2xy(double rbpn[3][3], double *x, double *y)
Definition: bpn2xy.c:3
double eraEra00(double dj1, double dj2)
Definition: era00.c:3
double eraS06(double date1, double date2, double x, double y)
Definition: s06.c:3
double eraAnp(double a)
Definition: anp.c:3
double eraEors(double rnpb[3][3], double s)
Definition: eors.c:3

+ Here is the call graph for this function:

+ Here is the caller graph for this function: