void palDjcal	(	int	ndp,
		double	djm,
		int	iymdf[4],
		int *	j
	)

Definition at line 80 of file palDjcal.c.

References DNINT, eraJd2cal(), and PAL__MJD0.

Referenced by t_djcal().

                                                            {
  double frac = 0.0;
  double nfd;

  *j = eraJd2cal( PAL__MJD0, djm, &(iymdf[0]),
                  &(iymdf[1]), &(iymdf[2]),
                  &frac);

  /* Convert ndp to a power of 10 */
  nfd = pow( 10., (double)ndp );

  /* Multiply the fraction */
  frac *= nfd;

  /* and now we want to round to the nearest integer */
  iymdf[3] = (int)DNINT(frac);

}

Here is the call graph for this function:

Here is the caller graph for this function: