Index: /branches/eam_branches/ipp-20150625/Ohana/src/opihi/lib.data/gaussian.c
===================================================================
--- /branches/eam_branches/ipp-20150625/Ohana/src/opihi/lib.data/gaussian.c	(revision 38574)
+++ /branches/eam_branches/ipp-20150625/Ohana/src/opihi/lib.data/gaussian.c	(revision 38575)
@@ -20,5 +20,4 @@
  
   int i;
-  long A, B;
   double val, x, dx, dx1, dx2, dx3, df;
   double mean, sigma;
@@ -27,7 +26,6 @@
   if (Ngaussint == Nbin) return;
 
-  A = time(NULL);
-  for (B = 0; A == time(NULL); B++);
-  srand48(B);
+  long A = time(NULL);
+  srand48(A);
  
   Ngaussint = Nbin;