Changeset 50d592b in git

Timestamp:

Jun 29, 1999, 6:57:46 PM (25 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '2a584933abf2a2d3082034c7586d38bb6de1a30a')

Children:

82af190ed0eb202d8e5ec3fa3cbdd1c484ab01fa

Parents:

a97e04ed1d1c861bf4bcd335a5d9baa9fcc17445

Message:

*hannes: rand -> siRand


git-svn-id: file:///usr/local/Singular/svn/trunk@3186 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• Singular/mpr_base.cc (modified) (4 diffs)

Singular/mpr_base.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: mpr_base.cc,v 1.3 1999-06-29 09:03:43 wenk Exp $ */
+/* $Id: mpr_base.cc,v 1.4 1999-06-29 16:57:46 hannes Exp $ */
 
 /*
@@ -1458 +1458 @@
   time_t *tp = NULL;
 
-  srand((long)(((int)time(tp) % MAXSEED)+MAXSEED*18));
+  //srand((long)(((int)time(tp) % MAXSEED)+MAXSEED*18));
 
   while ( i <= dim )
   {
-    shift[i]= (mprfloat) (RVMULT*rand()/(RAND_MAX+1.0));
+    //shift[i]= (mprfloat) (RVMULT*rand()/(RAND_MAX+1.0));
+    shift[i]= (mprfloat) (RVMULT*siRand()/(INT_MAX+1.0));
     i++;
     for ( j= 1; j < i-1; j++ )
@@ -2933 +2934 @@
         else if ( i <= uvar + 2 )
         {
-          pevpoint[i]=nInit(IsPrime(1+(int) (MAXEVPOINT*rand()/(RAND_MAX+1.0))));
+//          pevpoint[i]=nInit(IsPrime(1+(int) (MAXEVPOINT*rand()/(RAND_MAX+1.0))));
+          pevpoint[i]=nInit(IsPrime(1+(int) (MAXEVPOINT*siRand()/(INT_MAX+1.0))));
           //pevpoint[i]=nInit(383);
         }
@@ -3053 +3055 @@
         if ( i <= uvar + 2 )
         {
-          pevpoint[i]=nInit(IsPrime(1+(int) (MAXEVPOINT*rand()/(RAND_MAX+1.0))));
+          pevpoint[i]=nInit(IsPrime(1+(int) (MAXEVPOINT*siRand()/(INT_MAX+1.0))));
           //pevpoint[i]=nInit(383);
         } else pevpoint[i]=nInit(0);