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

Definition at line 803 of file palTest.c.

References palFk5hz(), palHfk5z(), and vvd().

Referenced by main().

803  {
804  double r5, d5, dr5, dd5, rh, dh;
805 
806  palFk5hz ( 1.234, -0.987, 1980, &rh, &dh );
807  vvd ( rh, 1.234000136713611301, 1e-13, "palFk5hz",
808  "R", status );
809  vvd ( dh, -0.9869999702020807601, 1e-13, "palFk5hz",
810  "D", status );
811  palHfk5z ( rh, dh, 1980, &r5, &d5, &dr5, &dd5 );
812  vvd ( r5, 1.234, 1e-13, "palHfk5z", "R", status );
813  vvd ( d5, -0.987, 1e-13, "palHfk5z", "D", status );
814  vvd ( dr5, 0.000000006822074, 1e-13, "palHfk5z",
815  "DR", status );
816  vvd ( dd5, -0.000000002334012, 1e-13, "palHfk5z",
817  "DD", status );
818 
819 }
void palHfk5z(double rh, double dh, double epoch, double *r5, double *d5, double *dr5, double *dd5)
Definition: palOne2One.c:1419
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
Definition: palTest.c:99
void palFk5hz(double r5, double d5, double epoch, double *rh, double *dh)
Definition: palOne2One.c:1289

+ Here is the call graph for this function:

+ Here is the caller graph for this function: