8293 j =
eraTcbtdb(2453750.5, 0.893019599, &b1, &b2);
8295 vvd(b1, 2453750.5, 1e-6,
"eraTcbtdb",
"b1", status);
8296 vvd(b2, 0.8928551362746343397, 1e-12,
"eraTcbtdb",
"b2", status);
8297 viv(j, 0,
"eraTcbtdb",
"j", status);
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
int eraTcbtdb(double tcb1, double tcb2, double *tdb1, double *tdb2)
static void viv(int ival, int ivalok, const char *func, const char *test, int *status)