Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Rework the doc of model-check/replay, and add an example with sthread
[simgrid.git] / examples / smpi / NAS / is.c
index 7314dee222d2e00b62dc9ab77759f50f89b66c78..cccdbf044a58888a9b1ea28fac382c355ebfee46 100644 (file)
@@ -124,7 +124,7 @@ static double  find_my_seed( int  kn,       /* my processor rank, 0<=kn<=num pro
                              double a )     /* Ran num gen mult, try 1220703125.00 */
 {
   long   i;
-  double t1,t2,t3,an;
+  double t1,t2,an;
   long   mq,nq,kk,ik;
 
   nq = nn / np;
@@ -145,13 +145,12 @@ static double  find_my_seed( int  kn,       /* my processor rank, 0<=kn<=num pro
   for( i=1; i<=100; i++ ){
     ik = kk / 2;
     if( 2 * ik !=  kk )
-      t3 = randlc( &t1, &t2 );
+      randlc( &t1, &t2 );
     if( ik == 0 )
       break;
-    t3 = randlc( &t2, &t2 );
+    randlc( &t2, &t2 );
     kk = ik;
   }
-  an=t3;//added to silence paranoid compilers
 
   return t1;
 }
@@ -579,7 +578,7 @@ int main( int argc, char **argv )
              1220703125.00 ),   /* Random number gen mult */
              1220703125.00 );   /* Random number gen mult */
 
-/*  Do one interation for free (i.e., untimed) to guarantee initialization of
+/*  Do one iteration for free (i.e., untimed) to guarantee initialization of
     all data and code pages and respective tables */
   rank(gd, 1 );