static void t_pom00 ( int *  status )

static

Definition at line 6588 of file t_erfa_c.c.

References eraPom00(), and vvd().

Referenced by main().

{
   double xp, yp, sp, rpom[3][3];


   xp =  2.55060238e-7;
   yp =  1.860359247e-6;
   sp = -0.1367174580728891460e-10;

   eraPom00(xp, yp, sp, rpom);

   vvd(rpom[0][0], 0.9999999999999674721, 1e-12,
       "eraPom00", "11", status);
   vvd(rpom[0][1], -0.1367174580728846989e-10, 1e-16,
       "eraPom00", "12", status);
   vvd(rpom[0][2], 0.2550602379999972345e-6, 1e-16,
       "eraPom00", "13", status);

   vvd(rpom[1][0], 0.1414624947957029801e-10, 1e-16,
       "eraPom00", "21", status);
   vvd(rpom[1][1], 0.9999999999982695317, 1e-12,
       "eraPom00", "22", status);
   vvd(rpom[1][2], -0.1860359246998866389e-5, 1e-16,
       "eraPom00", "23", status);

   vvd(rpom[2][0], -0.2550602379741215021e-6, 1e-16,
       "eraPom00", "31", status);
   vvd(rpom[2][1], 0.1860359247002414021e-5, 1e-16,
       "eraPom00", "32", status);
   vvd(rpom[2][2], 0.9999999999982370039, 1e-12,
       "eraPom00", "33", status);

}

Here is the call graph for this function:

Here is the caller graph for this function: