4273 theta =
eraGst06a(2400000.5, 53736.0, 2400000.5, 53736.0);
4275 vvd(theta, 1.754166137675019159, 1e-12,
"eraGst06a",
"", status);
double eraGst06a(double uta, double utb, double tta, double ttb)
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)