Modify (d/z)rand(s/a) and the tests

1 files changed, 15 insertions, 2 deletions

diff --git a/src/auxiliaryFunctions/rand/zranda.c b/src/auxiliaryFunctions/rand/zranda.c
index 7dd04a16..98cc10cf 100644
--- a/src/auxiliaryFunctions/rand/zranda.c
+++ b/src/auxiliaryFunctions/rand/zranda.c
@@ -11,10 +11,23 @@
  */
 
 #include "rand.h"
-
+#include <stdio.h>
 void zranda(doubleComplex *out, int size) {
   int i = 0;
+  double *Real_randa, *Imag_randa;
+  Real_randa = malloc((uint)size*sizeof(double));
+  Imag_randa = malloc((uint)size*sizeof(double));
+   
   for (i = 0 ; i < size ; ++i) {
-    out[i] = zrands();
+    Real_randa[i]=drands();
+  }
+
+  for (i = 0 ; i < size ; ++i) {  
+    Imag_randa[i]=drands();
   }
+
+  for (i = 0 ; i < size ; ++i) {  
+    out[i]=DoubleComplex(Real_randa[i],Imag_randa[i]);
+  }	
+
 }