|
|
1.1 root 1: .pa 1
2: .he 'RAND (III)'1/15/73'RAND (III)'
3: .ti 0
4: NAME rand -- random number generator
5: .sp
6: .ti 0
7: SYNOPSIS jsr pc,srand /to initialize
8: .br
9: jsr pc,rand /to get a random number
10: .sp
11: .ti 0
12: DESCRIPTION The routine uses a multiplicative congruential
13: random number generator to return successive pseudo-random
14: numbers in r0 in the range from 1 to 2^15-1.
15: .sp
16: The generator is reinitialized by calling srand with 1 in r0.
17: .sp
18: It can be set to a random starting point by calling
19: srand with whatever you like in r0,
20: for example the result left in r1 from sys___ time____.
21: .sp
22: .ti 0
23: FILES kept in /lib/liba.a
24: .sp
25: .ti 0
26: SEE ALSO --
27: .sp
28: .ti 0
29: DIAGNOSTICS --
30: .sp
31: .ti 0
32: BUGS --
33: .sp
34: .ti 0
35: WARNING The author of this routine has been writing
36: random-number generators for many years and has never been
37: known to write one that worked.
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.