2705 j =
eraCal2jd(2003, 06, 01, &djm0, &djm);
2707 vvd(djm0, 2400000.5, 0.0,
"eraCal2jd",
"djm0", status);
2708 vvd(djm, 52791.0, 0.0,
"eraCal2jd",
"djm", status);
2710 viv(j, 0,
"eraCal2jd",
"j", status);
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
int eraCal2jd(int iy, int im, int id, double *djm0, double *djm)
static void viv(int ival, int ivalok, const char *func, const char *test, int *status)