void eraPfw06	(	double	date1,
		double	date2,
		double *	gamb,
		double *	phib,
		double *	psib,
		double *	epsa
	)

Definition at line 3 of file pfw06.c.

References eraObl06(), ERFA_DAS2R, ERFA_DJ00, ERFA_DJC, and t.

Referenced by eraBp06(), eraPmat06(), eraPn06(), eraPnm06a(), and t_pfw06().

{
   double t;

/* Interval between fundamental date J2000.0 and given date (JC). */
   t = ((date1 - ERFA_DJ00) + date2) / ERFA_DJC;

/* P03 bias+precession angles. */
   *gamb = (    -0.052928     +
           (    10.556378     +
           (     0.4932044    +
           (    -0.00031238   +
           (    -0.000002788  +
           (     0.0000000260 )
           * t) * t) * t) * t) * t) * ERFA_DAS2R;
   *phib = ( 84381.412819     +
           (   -46.811016     +
           (     0.0511268    +
           (     0.00053289   +
           (    -0.000000440  +
           (    -0.0000000176 )
           * t) * t) * t) * t) * t) * ERFA_DAS2R;
   *psib = (    -0.041775     +
           (  5038.481484     +
           (     1.5584175    +
           (    -0.00018522   +
           (    -0.000026452  +
           (    -0.0000000148 )
           * t) * t) * t) * t) * t) * ERFA_DAS2R;
   *epsa =  eraObl06(date1, date2);

   return;

}

Here is the call graph for this function:

Here is the caller graph for this function: