
132
Chapter 7
for (i=0 ; i<TABLE_LENGTH ; i++) {// Fill entire table
seed = (IA * seed + IC) % IM ; // Make a random number
table[i] = seed ; // Put it in the table
}
seed = (IA * seed + IC) % IM ; // One more random number
randout = seed ; // for upcoming first use
}
i = (int) ((double) TABLEJ_ENGTH * (double) randout / (double) IM) ;
randout = table[i] ; // This output comes from table
seed = (IA * seed + IC) % IM ; // Make new random number
table[i] = seed ; // to replace used entry
return randout ; // then return old entry
}
As was previously pointed out, the local linear congruential
random number generator does not need to be used in