FACT++  1.0
void palCaldj ( int  iy,
int  im,
int  id,
double *  djm,
int *  j 
)

Definition at line 87 of file palCaldj.c.

References eraCal2jd().

Referenced by t_caldj().

87  {
88  int adj = 0; /* Year adjustment */
89  double djm0;
90 
91  if (iy >= 0 && iy <= 49) {
92  adj = 2000;
93  } else if (iy >= 50 && iy <= 99) {
94  adj = 1900;
95  }
96  iy += adj;
97 
98  *j = eraCal2jd( iy, im, id, &djm0, djm );
99 }
int eraCal2jd(int iy, int im, int id, double *djm0, double *djm)
Definition: cal2jd.c:3

+ Here is the call graph for this function:

+ Here is the caller graph for this function: