void palEcleq	(	double	dl,
		double	db,
		double	date,
		double *	dr,
		double *	dd
	)

Definition at line 76 of file palEcleq.c.

References eraAnp(), eraC2s(), eraS2c(), eraTrxp(), palDrange(), palEcmat(), palEpj(), and palPrec().

Referenced by t_ecleq().

                                                                            {
  double v1[3], v2[3];
  double rmat[3][3];

  /* Spherical to Cartesian */
  eraS2c( dl, db, v1 );

  /* Ecliptic to equatorial */
  palEcmat( date, rmat );
  eraTrxp( rmat, v1, v2 );

  /* Mean of date to J2000 */
  palPrec( 2000.0, palEpj(date), rmat );
  eraTrxp( rmat, v2, v1 );

  /* Cartesian to spherical */
  eraC2s( v1, dr, dd );

  /* Express in conventional range */
  *dr = eraAnp( *dr );
  *dd = palDrange( *dd );
}

Here is the call graph for this function:

Here is the caller graph for this function: