FACT++  1.0
static void t_preces ( int *  status)
static

Definition at line 1155 of file palTest.c.

References palPreces(), and vvd().

Referenced by main().

1155  {
1156  double ra;
1157  double dc;
1158  ra = 6.28;
1159  dc = -1.123;
1160  palPreces ( "FK4", 1925, 1950, &ra, &dc );
1161  vvd ( ra, 0.002403604864728447, 1e-12, "palPreces",
1162  "R", status );
1163  vvd ( dc, -1.120570643322045, 1e-12, "palPreces",
1164  "D", status );
1165 
1166  /* This is the SLA test but PAL now uses the IAU 2006
1167  precession model so we need to loosen the comparison */
1168  ra = 0.0123;
1169  dc = 1.0987;
1170  palPreces ( "FK5", 2050, 1990, &ra, &dc );
1171  vvd ( ra, 6.282003602708382, 1e-6, "palPreces",
1172  "R", status );
1173  vvd ( dc, 1.092870326188383, 1e-6, "palPreces",
1174  "D", status );
1175 
1176 }
vvd
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
Definition: palTest.c:99
palPreces
void palPreces(const char sys[3], double ep0, double ep1, double *ra, double *dc)
Definition: palPreces.c:91

+ Here is the call graph for this function:

+ Here is the caller graph for this function: