FACT++  1.0
int eraUt1tai ( double  ut11,
double  ut12,
double  dta,
double *  tai1,
double *  tai2 
)

Definition at line 3 of file ut1tai.c.

References ERFA_DAYSEC.

Referenced by t_ut1tai().

41 {
42  double dtad;
43 
44 /* Result, safeguarding precision. */
45  dtad = dta / ERFA_DAYSEC;
46  if ( ut11 > ut12 ) {
47  *tai1 = ut11;
48  *tai2 = ut12 - dtad;
49  } else {
50  *tai1 = ut11 - dtad;
51  *tai2 = ut12;
52  }
53 
54 /* Status (always OK). */
55  return 0;
56 
57 }
#define ERFA_DAYSEC
Definition: erfam.h:75

+ Here is the caller graph for this function: