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

Definition at line 1114 of file t_erfa_c.c.

References eraAtci13(), and vvd().

Referenced by main().

1129 {
1130  double rc, dc, pr, pd, px, rv, date1, date2, ri, di, eo;
1131 
1132 
1133  rc = 2.71;
1134  dc = 0.174;
1135  pr = 1e-5;
1136  pd = 5e-6;
1137  px = 0.1;
1138  rv = 55.0;
1139  date1 = 2456165.5;
1140  date2 = 0.401182685;
1141 
1142  eraAtci13(rc, dc, pr, pd, px, rv, date1, date2, &ri, &di, &eo);
1143 
1144  vvd(ri, 2.710121572969038991, 1e-12,
1145  "eraAtci13", "ri", status);
1146  vvd(di, 0.1729371367218230438, 1e-12,
1147  "eraAtci13", "di", status);
1148  vvd(eo, -0.002900618712657375647, 1e-14,
1149  "eraAtci13", "eo", status);
1150 
1151 }
vvd
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
Definition: t_erfa_c.c:58
eraAtci13
void eraAtci13(double rc, double dc, double pr, double pd, double px, double rv, double date1, double date2, double *ri, double *di, double *eo)
Definition: atci13.c:3

+ Here is the call graph for this function:

+ Here is the caller graph for this function: