diff options
| author | Taru Karttunen <taruti@taruti.net> | 2011-03-30 15:46:40 +0300 |
|---|---|---|
| committer | Taru Karttunen <taruti@taruti.net> | 2011-03-30 15:46:40 +0300 |
| commit | e5888a1ffdae813d7575f5fb02275c6bb07e5199 (patch) | |
| tree | d8d51eac403f07814b9e936eed0c9a79195e2450 /sys/src/libc/port/frand.c | |
Import sources from 2011-03-30 iso image
Diffstat (limited to 'sys/src/libc/port/frand.c')
| -rwxr-xr-x | sys/src/libc/port/frand.c | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/sys/src/libc/port/frand.c b/sys/src/libc/port/frand.c new file mode 100755 index 000000000..e13e1d860 --- /dev/null +++ b/sys/src/libc/port/frand.c @@ -0,0 +1,17 @@ +#include <u.h> +#include <libc.h> + +#define MASK 0x7fffffffL +#define NORM (1.0/(1.0+MASK)) + +double +frand(void) +{ + double x; + + do { + x = lrand() * NORM; + x = (x + lrand()) * NORM; + } while(x >= 1); + return x; +} |