5717 double p[3], r, u[3];
5726 vvd(r, 2.789265136196270604, 1e-12,
"eraPn",
"r", status);
5728 vvd(u[0], 0.1075552109073112058, 1e-12,
"eraPn",
"u1", status);
5729 vvd(u[1], 0.4302208436292448232, 1e-12,
"eraPn",
"u2", status);
5730 vvd(u[2], -0.8962934242275933816, 1e-12,
"eraPn",
"u3", status);
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
void eraPn(double p[3], double *r, double u[3])