Changeset 4876

Timestamp:

Aug 25, 2005, 12:52:29 PM (21 years ago)

Author:

gusciora

Message:

Removed GSL code.

File:

• trunk/psLib/src/math/psFunctions.c (modified) (2 diffs)

trunk/psLib/src/math/psFunctions.c

@@ -7 +7 @@
 *  polynomials.  It also contains a Gaussian functions.
 *
-*  @version $Revision: 1.7 $ $Name: not supported by cvs2svn $
-*  @date $Date: 2005-08-23 23:23:05 $
+*  @version $Revision: 1.8 $ $Name: not supported by cvs2svn $
+*  @date $Date: 2005-08-25 22:52:29 $
 *
 *  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
@@ -686 +686 @@
  specified size and type F32 and fills it with a random Gaussian distribution
  of numbers with the specified mean and sigma.
+ 
+XXX: It's possible to have a different seed everutime.  However, for now,
+for testability, we use a common seed.
  *****************************************************************************/
+#define PS_XXX_GAUSSIAN_SEED 1995
 psVector* p_psGaussianDev(psF32 mean, psF32 sigma, psS32 Npts)
 {
     PS_ASSERT_INT_NONNEGATIVE(Npts, NULL);
 
-    psRandom *r = psRandomAlloc(PS_RANDOM_TAUS, p_psRandomGetSystemSeed());
+    //    psRandom *r = psRandomAlloc(PS_RANDOM_TAUS, p_psRandomGetSystemSeed());
+    psRandom *r = psRandomAlloc(PS_RANDOM_TAUS, PS_XXX_GAUSSIAN_SEED);
     psVector* gauss = psVectorAlloc(Npts, PS_TYPE_F32);
     for (psS32 i = 0; i < Npts; i++) {