void eraAtciq	(	double	rc,
		double	dc,
		double	pr,
		double	pd,
		double	px,
		double	rv,
		eraASTROM *	astrom,
		double *	ri,
		double *	di
	)

Definition at line 3 of file atciq.c.

References eraASTROM::bm1, eraASTROM::bpn, eraASTROM::eb, eraASTROM::eh, eraASTROM::em, eraAb(), eraAnp(), eraC2s(), eraLdsun(), eraPmpx(), eraRxp(), eraASTROM::pmt, and eraASTROM::v.

Referenced by eraAtci13(), eraAtco13(), and t_atciq().

{
   double pco[3], pnat[3], ppr[3], pi[3], w;

/* Proper motion and parallax, giving BCRS coordinate direction. */
   eraPmpx(rc, dc, pr, pd, px, rv, astrom->pmt, astrom->eb, pco);

/* Light deflection by the Sun, giving BCRS natural direction. */
   eraLdsun(pco, astrom->eh, astrom->em, pnat);

/* Aberration, giving GCRS proper direction. */
   eraAb(pnat, astrom->v, astrom->em, astrom->bm1, ppr);

/* Bias-precession-nutation, giving CIRS proper direction. */
   eraRxp(astrom->bpn, ppr, pi);

/* CIRS RA,Dec. */
   eraC2s(pi, &w, di);
   *ri = eraAnp(w);

/* Finished. */

}

Here is the call graph for this function:

Here is the caller graph for this function: