# | Line 10 | Line 10 | |
---|---|---|
10 | ||
11 | #ifdef MSDOS | |
12 | ||
13 | < | #define random rand |
13 | > | #define random() ((long)rand()<<16^(long)rand()<<6^(long)rand()>>4) |
14 | ||
15 | #define frandom() (rand()*(1./32768.)) | |
16 | ||
# | Line 32 | Line 32 | extern double drand48(); | |
32 | #endif | |
33 | #endif | |
34 | ||
35 | + | #ifdef MC |
36 | + | #define urand(i) frandom() |
37 | + | #else |
38 | #define urand(i) ((urperm[(i)&urmask]+frandom())/(urmask+1)) | |
39 | + | #endif |
40 | ||
41 | extern short *urperm; | |
42 | extern int urmask; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |