|
|
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.