7387 double phi, r[3][3];
7406 vvd(r[0][0], 2.0, 0.0,
"eraRx",
"11", status);
7407 vvd(r[0][1], 3.0, 0.0,
"eraRx",
"12", status);
7408 vvd(r[0][2], 2.0, 0.0,
"eraRx",
"13", status);
7410 vvd(r[1][0], 3.839043388235612460, 1e-12,
"eraRx",
"21", status);
7411 vvd(r[1][1], 3.237033249594111899, 1e-12,
"eraRx",
"22", status);
7412 vvd(r[1][2], 4.516714379005982719, 1e-12,
"eraRx",
"23", status);
7414 vvd(r[2][0], 1.806030415924501684, 1e-12,
"eraRx",
"31", status);
7415 vvd(r[2][1], 3.085711545336372503, 1e-12,
"eraRx",
"32", status);
7416 vvd(r[2][2], 3.687721683977873065, 1e-12,
"eraRx",
"33", status);
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
void eraRx(double phi, double r[3][3])