static void t_pv2s ( int *  status )

static

Definition at line 6805 of file t_erfa_c.c.

References eraPv2s(), and vvd().

Referenced by main().

{
   double pv[2][3], theta, phi, r, td, pd, rd;


   pv[0][0] = -0.4514964673880165;
   pv[0][1] =  0.03093394277342585;
   pv[0][2] =  0.05594668105108779;

   pv[1][0] =  1.292270850663260e-5;
   pv[1][1] =  2.652814182060692e-6;
   pv[1][2] =  2.568431853930293e-6;

   eraPv2s(pv, &theta, &phi, &r, &td, &pd, &rd);

   vvd(theta, 3.073185307179586515, 1e-12, "eraPv2s", "theta", status);
   vvd(phi, 0.1229999999999999992, 1e-12, "eraPv2s", "phi", status);
   vvd(r, 0.4559999999999999757, 1e-12, "eraPv2s", "r", status);
   vvd(td, -0.7800000000000000364e-5, 1e-16, "eraPv2s", "td", status);
   vvd(pd, 0.9010000000000001639e-5, 1e-16, "eraPv2s", "pd", status);
   vvd(rd, -0.1229999999999999832e-4, 1e-16, "eraPv2s", "rd", status);

}

Here is the call graph for this function:

Here is the caller graph for this function: