static void t_apci13 ( int *  status )

static

Definition at line 492 of file t_erfa_c.c.

References eraASTROM::bm1, eraASTROM::bpn, eraASTROM::eb, eraASTROM::eh, eraASTROM::em, eraApci13(), eraASTROM::pmt, eraASTROM::v, and vvd().

Referenced by main().

{
   double date1, date2, eo;
   eraASTROM astrom;


   date1 = 2456165.5;
   date2 = 0.401182685;

   eraApci13(date1, date2, &astrom, &eo);

   vvd(astrom.pmt, 12.65133794027378508, 1e-11,
                   "eraApci13", "pmt", status);
   vvd(astrom.eb[0], 0.9013108747340644755, 1e-12,
                     "eraApci13", "eb(1)", status);
   vvd(astrom.eb[1], -0.4174026640406119957, 1e-12,
                     "eraApci13", "eb(2)", status);
   vvd(astrom.eb[2], -0.1809822877867817771, 1e-12,
                     "eraApci13", "eb(3)", status);
   vvd(astrom.eh[0], 0.8940025429255499549, 1e-12,
                     "eraApci13", "eh(1)", status);
   vvd(astrom.eh[1], -0.4110930268331896318, 1e-12,
                     "eraApci13", "eh(2)", status);
   vvd(astrom.eh[2], -0.1782189006019749850, 1e-12,
                     "eraApci13", "eh(3)", status);
   vvd(astrom.em, 1.010465295964664178, 1e-12,
                  "eraApci13", "em", status);
   vvd(astrom.v[0], 0.4289638897157027528e-4, 1e-16,
                    "eraApci13", "v(1)", status);
   vvd(astrom.v[1], 0.8115034002544663526e-4, 1e-16,
                    "eraApci13", "v(2)", status);
   vvd(astrom.v[2], 0.3517555122593144633e-4, 1e-16,
                    "eraApci13", "v(3)", status);
   vvd(astrom.bm1, 0.9999999951686013498, 1e-12,
                   "eraApci13", "bm1", status);
   vvd(astrom.bpn[0][0], 0.9999992060376761710, 1e-12,
                         "eraApci13", "bpn(1,1)", status);
   vvd(astrom.bpn[1][0], 0.4124244860106037157e-7, 1e-12,
                         "eraApci13", "bpn(2,1)", status);
   vvd(astrom.bpn[2][0], 0.1260128571051709670e-2, 1e-12,
                         "eraApci13", "bpn(3,1)", status);
   vvd(astrom.bpn[0][1], -0.1282291987222130690e-7, 1e-12,
                         "eraApci13", "bpn(1,2)", status);
   vvd(astrom.bpn[1][1], 0.9999999997456835325, 1e-12,
                         "eraApci13", "bpn(2,2)", status);
   vvd(astrom.bpn[2][1], -0.2255288829420524935e-4, 1e-12,
                         "eraApci13", "bpn(3,2)", status);
   vvd(astrom.bpn[0][2], -0.1260128571661374559e-2, 1e-12,
                         "eraApci13", "bpn(1,3)", status);
   vvd(astrom.bpn[1][2], 0.2255285422953395494e-4, 1e-12,
                         "eraApci13", "bpn(2,3)", status);
   vvd(astrom.bpn[2][2], 0.9999992057833604343, 1e-12,
                         "eraApci13", "bpn(3,3)", status);
   vvd(eo, -0.2900618712657375647e-2, 1e-12,
           "eraApci13", "eo", status);

}

Here is the call graph for this function:

Here is the caller graph for this function: