FACT++  1.0
int eraAtio13 ( double  ri,
double  di,
double  utc1,
double  utc2,
double  dut1,
double  elong,
double  phi,
double  hm,
double  xp,
double  yp,
double  phpa,
double  tc,
double  rh,
double  wl,
double *  aob,
double *  zob,
double *  hob,
double *  dob,
double *  rob 
)

Definition at line 3 of file atio13.c.

References eraApio13(), and eraAtioq().

Referenced by t_atio13().

140 {
141  int j;
142  eraASTROM astrom;
143 
144 /* Star-independent astrometry parameters for CIRS->observed. */
145  j = eraApio13(utc1, utc2, dut1, elong, phi, hm, xp, yp,
146  phpa, tc, rh, wl, &astrom);
147 
148 /* Abort if bad UTC. */
149  if ( j < 0 ) return j;
150 
151 /* Transform CIRS to observed. */
152  eraAtioq(ri, di, &astrom, aob, zob, hob, dob, rob);
153 
154 /* Return OK/warning status. */
155  return j;
156 
157 /* Finished. */
158 
159 }
eraApio13
int eraApio13(double utc1, double utc2, double dut1, double elong, double phi, double hm, double xp, double yp, double phpa, double tc, double rh, double wl, eraASTROM *astrom)
Definition: apio13.c:3
eraAtioq
void eraAtioq(double ri, double di, eraASTROM *astrom, double *aob, double *zob, double *hob, double *dob, double *rob)
Definition: atioq.c:3

+ Here is the call graph for this function:

+ Here is the caller graph for this function: