static void t_pvu ( int *  status )

static

Definition at line 7098 of file t_erfa_c.c.

References eraPvu(), and vvd().

Referenced by main().

{
   double pv[2][3], upv[2][3];


   pv[0][0] =  126668.5912743160734;
   pv[0][1] =  2136.792716839935565;
   pv[0][2] = -245251.2339876830229;

   pv[1][0] = -0.4051854035740713039e-2;
   pv[1][1] = -0.6253919754866175788e-2;
   pv[1][2] =  0.1189353719774107615e-1;

   eraPvu(2920.0, pv, upv);

   vvd(upv[0][0], 126656.7598605317105, 1e-12,
       "eraPvu", "p1", status);
   vvd(upv[0][1], 2118.531271155726332, 1e-12,
       "eraPvu", "p2", status);
   vvd(upv[0][2], -245216.5048590656190, 1e-12,
       "eraPvu", "p3", status);

   vvd(upv[1][0], -0.4051854035740713039e-2, 1e-12,
       "eraPvu", "v1", status);
   vvd(upv[1][1], -0.6253919754866175788e-2, 1e-12,
       "eraPvu", "v2", status);
   vvd(upv[1][2], 0.1189353719774107615e-1, 1e-12,
       "eraPvu", "v3", status);

}

Here is the call graph for this function:

Here is the caller graph for this function: