FACT++  1.0
static void t_p2pv ( int *  status)
static

Definition at line 5106 of file t_erfa_c.c.

References eraP2pv(), and vvd().

Referenced by main().

5121 {
5122  double p[3], pv[2][3];
5123 
5124 
5125  p[0] = 0.25;
5126  p[1] = 1.2;
5127  p[2] = 3.0;
5128 
5129  pv[0][0] = 0.3;
5130  pv[0][1] = 1.2;
5131  pv[0][2] = -2.5;
5132 
5133  pv[1][0] = -0.5;
5134  pv[1][1] = 3.1;
5135  pv[1][2] = 0.9;
5136 
5137  eraP2pv(p, pv);
5138 
5139  vvd(pv[0][0], 0.25, 0.0, "eraP2pv", "p1", status);
5140  vvd(pv[0][1], 1.2, 0.0, "eraP2pv", "p2", status);
5141  vvd(pv[0][2], 3.0, 0.0, "eraP2pv", "p3", status);
5142 
5143  vvd(pv[1][0], 0.0, 0.0, "eraP2pv", "v1", status);
5144  vvd(pv[1][1], 0.0, 0.0, "eraP2pv", "v2", status);
5145  vvd(pv[1][2], 0.0, 0.0, "eraP2pv", "v3", status);
5146 
5147 }
vvd
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
Definition: t_erfa_c.c:58
eraP2pv
void eraP2pv(double p[3], double pv[2][3])
Definition: p2pv.c:3

+ Here is the call graph for this function:

+ Here is the caller graph for this function: