|
|
1.1 root 1: /* Copyright (c) 1979 Regents of the University of California */
2:
3: static char sccsid[] = "@(#)RANDOM.c 1.1 10/29/80";
4:
5: double
6: RANDOM()
7: {
8: /*
9: * div by maxint to get 0..1
10: */
11: return (rand() / 2.147483647e+09);
12: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.