/* Test for rand: rand */
#define NX 16
#define FNAME "t3"
#define MAXERROR 5.000000e-004

DATA x[NX] = {
17177,
-2853,
-31555,
21064,
-3624,
7565,
19132,
27644,
15611,
-21216,
-6180,
28539,
27322,
-5881,
25798,
-28974,
};

float xf[NX] = {
5.241937e-001,
-8.706467e-002,
-9.629927e-001,
6.428143e-001,
-1.105933e-001,
2.308647e-001,
5.838741e-001,
8.436259e-001,
4.764145e-001,
-6.474677e-001,
-1.885876e-001,
8.709394e-001,
8.338089e-001,
-1.794596e-001,
7.872991e-001,
-8.842174e-001,
};

float rtest[NX] = {
1.907692e+000,
-1.148572e+001,
-1.038429e+000,
1.555659e+000,
-9.042141e+000,
4.331541e+000,
1.712698e+000,
1.185359e+000,
2.099013e+000,
-1.544479e+000,
-5.302576e+000,
1.148186e+000,
1.199316e+000,
-5.572285e+000,
1.270165e+000,
-1.130944e+000,
};