double ran1(long* seed);
"Minimal" random number generator of Park and Miller with Bays-Durham shuffle and added safeguards. Returns a uniform random deviate between 0.0 and 1.0 (exclusive of the endpoint values). Call with idum a negative integer to initialize; thereafter, do not alter idum between successive deviates in a sequence.
Parameters:
seed | Random number generator seed. |
---|
Returns:
The next random number from the generator.
Usage:
long seed = -1L; /* Initialize generator */
double r = ran1(&seed);
Header:
#include "deviate.h"