Wrapper for Clustal Omega.
[jabaws.git] / binaries / src / clustalo / src / squid / sre_random.h
1 /* sre_random.h
2  * Header file for sre_random.c
3  *
4  * SRE, Tue Oct  1 15:24:29 2002
5  * CVS $Id: sre_random.h,v 1.1 2002/10/09 14:26:09 eddy Exp)
6  */
7
8 extern double sre_random(void);
9 extern void   sre_srandom(int seed);
10 extern double sre_random_positive(void);
11 extern double ExponentialRandom(void);
12 extern double Gaussrandom(double mean, double stddev);
13 extern int    DChoose(double *p, int N);
14 extern int    FChoose(float *p, int N);
15
16 #define CHOOSE(a)   ((int) (sre_random() * (a)))
17
18