FACT++  1.0
static void t_jd2cal ( int *  status)
static

Definition at line 4456 of file t_erfa_c.c.

References eraJd2cal(), id, viv(), and vvd().

Referenced by main().

4471 {
4472  double dj1, dj2, fd;
4473  int iy, im, id, j;
4474 
4475 
4476  dj1 = 2400000.5;
4477  dj2 = 50123.9999;
4478 
4479  j = eraJd2cal(dj1, dj2, &iy, &im, &id, &fd);
4480 
4481  viv(iy, 1996, "eraJd2cal", "y", status);
4482  viv(im, 2, "eraJd2cal", "m", status);
4483  viv(id, 10, "eraJd2cal", "d", status);
4484  vvd(fd, 0.9999, 1e-7, "eraJd2cal", "fd", status);
4485  viv(j, 0, "eraJd2cal", "j", status);
4486 
4487 }
vvd
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
Definition: t_erfa_c.c:58
id
char id[4]
Definition: FITS.h:71
eraJd2cal
int eraJd2cal(double dj1, double dj2, int *iy, int *im, int *id, double *fd)
Definition: jd2cal.c:3
viv
static void viv(int ival, int ivalok, const char *func, const char *test, int *status)
Definition: t_erfa_c.c:24

+ Here is the call graph for this function:

+ Here is the caller graph for this function: