505 palCldj ( 1899, 12, 31, &d, &j );
506 vvd ( d, 15019, 0,
"palCldj",
"D", status );
507 viv ( j, 0,
"palCldj",
"J", status );
void palCldj(int iy, int im, int id, double *djm, int *j)
static void viv(int ival, int ivalok, const char *func, const char *test, int *status)
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)