void cdelay2 ( int D, int *q );
double *corr ( int n, double x[], int m );
double *cross_corr ( int n, double x[], double y[], int m );
double ran1f ( int B, double u[], int q[] );
double ranh ( int D, double *u, int *q );
void timestamp ( void );
void wrap2 ( int M, int *q );