Changeset 3739 in Sophya for trunk/SophyaLib/BaseTools/randr48.cc

Timestamp:

Feb 4, 2010, 7:56:20 PM (16 years ago)

Author:

ansari

Message:

suppression init systematique (setseed) de drand48() ds le contructeur de DR48RandGen, cmv+reza 04/02/2010

File:

• trunk/SophyaLib/BaseTools/randr48.cc (modified) (1 diff)

trunk/SophyaLib/BaseTools/randr48.cc

@@ -10 +10 @@
 namespace SOPHYA {
 
+static bool dr48_first = true;
+DR48RandGen::DR48RandGen()
+{
+  if (dr48_first) {
+    Next();  dr48_first=false;
+  }
+}
+
 DR48RandGen::DR48RandGen(long int  seed)
 {
   srand48(seed);
+  dr48_first=false;
 }