3 |
|
/* SCCSid "$SunId$ LBL" */ |
4 |
|
|
5 |
|
/* |
6 |
< |
* random.h - header file for random(3) function. |
6 |
> |
* random.h - header file for random(3) and urand() function. |
7 |
|
* |
8 |
|
* 10/1/85 |
9 |
|
*/ |
10 |
|
|
11 |
+ |
#ifdef BSD |
12 |
+ |
|
13 |
|
extern long random(); |
14 |
|
|
15 |
|
#define frandom() (random()*(1./2147483648.)) |
16 |
+ |
|
17 |
+ |
#else |
18 |
+ |
|
19 |
+ |
extern long lrand48(); |
20 |
+ |
extern double drand48(); |
21 |
+ |
|
22 |
+ |
#define random() lrand48() |
23 |
+ |
#define frandom() drand48() |
24 |
+ |
|
25 |
+ |
#endif |
26 |
+ |
|
27 |
+ |
#define urand(i) ((urperm[(i)&urmask]+frandom())/(urmask+1)) |
28 |
+ |
|
29 |
+ |
extern short *urperm; |
30 |
+ |
extern int urmask; |