2845 int j, iy, im,
id, ihmsf[4];
2848 j =
eraD2dtf(
"UTC", 5, 2400000.5, 49533.99999, &iy, &im, &
id, ihmsf);
2850 viv(iy, 1994,
"eraD2dtf",
"y", status);
2851 viv(im, 6,
"eraD2dtf",
"mo", status);
2852 viv(
id, 30,
"eraD2dtf",
"d", status);
2853 viv(ihmsf[0], 23,
"eraD2dtf",
"h", status);
2854 viv(ihmsf[1], 59,
"eraD2dtf",
"m", status);
2855 viv(ihmsf[2], 60,
"eraD2dtf",
"s", status);
2856 viv(ihmsf[3], 13599,
"eraD2dtf",
"f", status);
2857 viv(j, 0,
"eraD2dtf",
"j", status);
int eraD2dtf(const char *scale, int ndp, double d1, double d2, int *iy, int *im, int *id, int ihmsf[4])
static void viv(int ival, int ivalok, const char *func, const char *test, int *status)