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;
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;
}
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 );