1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
S9 LIB (random integer) ==> integer
(random-state integer) ==> procedure
(load-from-library "random.scm")
RANDOM returns a random number in the range [0;INTEGER], where
INTEGER may not be any larger than 2**19 = 524288.
RANDOM-STATE returns a procedure that resembles RANDOM but uses
a user-supplied seed instead of a default one. RANDOM can be passed
a different seed by running:
(set! random (random-state SEED))
RANDOM-STATE uses a 19-bit linear feedback shift register. Hence
its limited range.
(let* ((a (random 100))
(b (random 100))
(c (random 100)))
(list a b c)) ==> (5 47 68)
|
