static void t_ld ( int *  status )

static

Definition at line 4523 of file t_erfa_c.c.

References eraLd(), and vvd().

Referenced by main().

{
   double bm, p[3], q[3], e[3], em, dlim, p1[3];


   bm = 0.00028574;
   p[0] = -0.763276255;
   p[1] = -0.608633767;
   p[2] = -0.216735543;
   q[0] = -0.763276255;
   q[1] = -0.608633767;
   q[2] = -0.216735543;
   e[0] = 0.76700421;
   e[1] = 0.605629598;
   e[2] = 0.211937094;
   em = 8.91276983;
   dlim = 3e-10;

   eraLd(bm, p, q, e, em, dlim, p1);

   vvd(p1[0], -0.7632762548968159627, 1e-12,
               "eraLd", "1", status);
   vvd(p1[1], -0.6086337670823762701, 1e-12,
               "eraLd", "2", status);
   vvd(p1[2], -0.2167355431320546947, 1e-12,
               "eraLd", "3", status);

}

Here is the call graph for this function:

Here is the caller graph for this function: