/***************************************************************
 *  mersenne.h   
 *  for the inline version of the mersenne generator
 */

#define MERSENNE_N 624

extern int mersenne_i;
extern double mersenne_array[MERSENNE_N];

#define mersenne() ( mersenne_i > 0 ? mersenne_array[--mersenne_i] : mersenne_generate(&mersenne_i) )

void seed_mersenne(long a);
double mersenne_generate(int *);
