Fix rand_generate

Author: AndreySokolovSC

utest/test_extensions/common.c

@@ -40,14 +40,14 @@ void srand_generate(float *alpha, blasint n)
 {
     blasint i;
     for (i = 0; i < n; i++)
-        alpha[i] = (float)rand() / (float)RAND_MAX * 5.0f;
+        alpha[i] = (float)rand() / (float)RAND_MAX;
 }
 
 void drand_generate(double *alpha, blasint n)
 {
     blasint i;
     for (i = 0; i < n; i++)
-        alpha[i] = (double)rand() / (double)RAND_MAX * 5.0;
+        alpha[i] = (double)rand() / (double)RAND_MAX;
 }
 
 /**

utest/test_extensions/test_zgeadd.c

@@ -103,8 +103,8 @@ static double check_zgeadd(char api, OPENBLAS_CONST enum CBLAS_ORDER order,
     }
 
     // Fill matrix A, C
-    srand_generate(data_zgeadd.a_test, lda * rows * 2);
-    srand_generate(data_zgeadd.c_test, ldc * rows * 2);
+    drand_generate(data_zgeadd.a_test, lda * rows * 2);
+    drand_generate(data_zgeadd.c_test, ldc * rows * 2);
 
     // Copy matrix C for zgeadd
     for (i = 0; i < ldc * rows * 2; i++)

utest/test_extensions/test_ztrmv.c

@@ -66,8 +66,8 @@ static double check_ztrmv(char uplo, char trans, char diag, blasint n, blasint l
 	double alpha_conj[] = {1.0, 0.0}; 
 	char trans_verify = trans;
 
-	srand_generate(data_ztrmv.a_test, n * lda * 2);
-	srand_generate(data_ztrmv.x_test, n * incx * 2);
+	drand_generate(data_ztrmv.a_test, n * lda * 2);
+	drand_generate(data_ztrmv.x_test, n * incx * 2);
 
 	for (i = 0; i < n * lda * 2; i++)
 		data_ztrmv.a_verify[i] = data_ztrmv.a_test[i];

utest/test_extensions/test_ztrsv.c

@@ -66,8 +66,8 @@ static double check_ztrsv(char uplo, char trans, char diag, blasint n, blasint l
 	double alpha_conj[] = {1.0, 0.0}; 
 	char trans_verify = trans;
 
-	srand_generate(data_ztrsv.a_test, n * lda * 2);
-	srand_generate(data_ztrsv.x_test, n * incx * 2);
+	drand_generate(data_ztrsv.a_test, n * lda * 2);
+	drand_generate(data_ztrsv.x_test, n * incx * 2);
 
 	for (i = 0; i < n * lda * 2; i++)
 		data_ztrsv.a_verify[i] = data_ztrsv.a_test[i];