git: 9front

ref: 0a8b50a42d13a1e56a8c8b1e966e1946d07431d8
dir: /sys/src/cmd/unix/drawterm/libc/frand.c/

View raw version 
#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;
}