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