Guido van Rossum | c636014 | 1990-10-13 19:23:40 +0000 | [diff] [blame] | 1 | # WICHMANN-HILL RANDOM NUMBER GENERATOR |
| 2 | # |
| 3 | # Wichmann, B. A. & Hill, I. D. (1982) |
| 4 | # Algorithm AS 183: |
| 5 | # An efficient and portable pseudo-random number generator |
| 6 | # Applied Statistics 31 (1982) 188-190 |
| 7 | # |
| 8 | # see also: |
| 9 | # Correction to Algorithm AS 183 |
| 10 | # Applied Statistics 33 (1984) 123 |
| 11 | # |
| 12 | # McLeod, A. I. (1985) |
| 13 | # A remark on Algorithm AS 183 |
| 14 | # Applied Statistics 34 (1985),198-200 |
| 15 | # |
| 16 | # |
| 17 | # USE: |
| 18 | # whrandom.random() yields double precision random numbers |
| 19 | # uniformly distributed between 0 and 1. |
| 20 | # |
Guido van Rossum | 2db9135 | 1992-10-18 17:09:59 +0000 | [diff] [blame] | 21 | # whrandom.seed(x, y, z) must be called before whrandom.random() |
Guido van Rossum | c636014 | 1990-10-13 19:23:40 +0000 | [diff] [blame] | 22 | # to seed the generator |
Guido van Rossum | 2db9135 | 1992-10-18 17:09:59 +0000 | [diff] [blame] | 23 | # |
| 24 | # There is also an interface to create multiple independent |
| 25 | # random generators, and to choose from other ranges. |
Guido van Rossum | c636014 | 1990-10-13 19:23:40 +0000 | [diff] [blame] | 26 | |
| 27 | |
| 28 | # Translated by Guido van Rossum from C source provided by |
| 29 | # Adrian Baddeley. |
| 30 | |
| 31 | |
Guido van Rossum | cc20b76 | 1998-05-29 17:51:59 +0000 | [diff] [blame] | 32 | # Multi-threading note: the random number generator used here is not |
| 33 | # thread-safe; it is possible that nearly simultaneous calls in |
| 34 | # different theads return the same random value. To avoid this, you |
| 35 | # have to use a lock around all calls. (I didn't want to slow this |
| 36 | # down in the serial case by using a lock here.) |
| 37 | |
| 38 | |
Guido van Rossum | 2db9135 | 1992-10-18 17:09:59 +0000 | [diff] [blame] | 39 | class whrandom: |
Guido van Rossum | c636014 | 1990-10-13 19:23:40 +0000 | [diff] [blame] | 40 | # |
Guido van Rossum | 2db9135 | 1992-10-18 17:09:59 +0000 | [diff] [blame] | 41 | # Initialize an instance. |
| 42 | # Without arguments, initialize from current time. |
| 43 | # With arguments (x, y, z), initialize from them. |
Guido van Rossum | c636014 | 1990-10-13 19:23:40 +0000 | [diff] [blame] | 44 | # |
Guido van Rossum | 14a6e3d | 1994-09-14 13:33:57 +0000 | [diff] [blame] | 45 | def __init__(self, x = 0, y = 0, z = 0): |
| 46 | self.seed(x, y, z) |
| 47 | # |
| 48 | # Set the seed from (x, y, z). |
| 49 | # These must be integers in the range [0, 256). |
| 50 | # |
| 51 | def seed(self, x = 0, y = 0, z = 0): |
| 52 | if not type(x) == type(y) == type(z) == type(0): |
| 53 | raise TypeError, 'seeds must be integers' |
Guido van Rossum | 6757748 | 1997-01-02 18:13:35 +0000 | [diff] [blame] | 54 | if not (0 <= x < 256 and 0 <= y < 256 and 0 <= z < 256): |
Guido van Rossum | 14a6e3d | 1994-09-14 13:33:57 +0000 | [diff] [blame] | 55 | raise ValueError, 'seeds must be in range(0, 256)' |
| 56 | if 0 == x == y == z: |
Guido van Rossum | 2db9135 | 1992-10-18 17:09:59 +0000 | [diff] [blame] | 57 | # Initialize from current time |
| 58 | import time |
Guido van Rossum | 9cb018e | 1996-10-21 23:20:03 +0000 | [diff] [blame] | 59 | t = long(time.time() * 256) |
Guido van Rossum | 358473c | 1998-02-16 14:52:42 +0000 | [diff] [blame] | 60 | t = int((t&0xffffff) ^ (t>>24)) |
Guido van Rossum | 2db9135 | 1992-10-18 17:09:59 +0000 | [diff] [blame] | 61 | t, x = divmod(t, 256) |
| 62 | t, y = divmod(t, 256) |
| 63 | t, z = divmod(t, 256) |
Guido van Rossum | d247812 | 1997-07-10 15:14:50 +0000 | [diff] [blame] | 64 | # Zero is a poor seed, so substitute 1 |
| 65 | self._seed = (x or 1, y or 1, z or 1) |
Guido van Rossum | c636014 | 1990-10-13 19:23:40 +0000 | [diff] [blame] | 66 | # |
Guido van Rossum | 2db9135 | 1992-10-18 17:09:59 +0000 | [diff] [blame] | 67 | # Get the next random number in the range [0.0, 1.0). |
Guido van Rossum | c636014 | 1990-10-13 19:23:40 +0000 | [diff] [blame] | 68 | # |
Guido van Rossum | 2db9135 | 1992-10-18 17:09:59 +0000 | [diff] [blame] | 69 | def random(self): |
Guido van Rossum | cc20b76 | 1998-05-29 17:51:59 +0000 | [diff] [blame] | 70 | # This part is thread-unsafe: |
| 71 | # BEGIN CRITICAL SECTION |
Guido van Rossum | 2db9135 | 1992-10-18 17:09:59 +0000 | [diff] [blame] | 72 | x, y, z = self._seed |
| 73 | # |
Guido van Rossum | d247812 | 1997-07-10 15:14:50 +0000 | [diff] [blame] | 74 | x = (171 * x) % 30269 |
| 75 | y = (172 * y) % 30307 |
| 76 | z = (170 * z) % 30323 |
Guido van Rossum | 2db9135 | 1992-10-18 17:09:59 +0000 | [diff] [blame] | 77 | # |
| 78 | self._seed = x, y, z |
Guido van Rossum | cc20b76 | 1998-05-29 17:51:59 +0000 | [diff] [blame] | 79 | # END CRITICAL SECTION |
Guido van Rossum | 2db9135 | 1992-10-18 17:09:59 +0000 | [diff] [blame] | 80 | # |
| 81 | return (x/30269.0 + y/30307.0 + z/30323.0) % 1.0 |
| 82 | # |
| 83 | # Get a random number in the range [a, b). |
| 84 | # |
| 85 | def uniform(self, a, b): |
| 86 | return a + (b-a) * self.random() |
| 87 | # |
| 88 | # Get a random integer in the range [a, b] including both end points. |
| 89 | # |
| 90 | def randint(self, a, b): |
| 91 | return a + int(self.random() * (b+1-a)) |
| 92 | # |
| 93 | # Choose a random element from a non-empty sequence. |
| 94 | # |
| 95 | def choice(self, seq): |
| 96 | return seq[int(self.random() * len(seq))] |
Guido van Rossum | c636014 | 1990-10-13 19:23:40 +0000 | [diff] [blame] | 97 | |
| 98 | |
| 99 | # Initialize from the current time |
| 100 | # |
Guido van Rossum | 7bc817d | 1993-12-17 15:25:27 +0000 | [diff] [blame] | 101 | _inst = whrandom() |
Guido van Rossum | 2db9135 | 1992-10-18 17:09:59 +0000 | [diff] [blame] | 102 | seed = _inst.seed |
| 103 | random = _inst.random |
| 104 | uniform = _inst.uniform |
| 105 | randint = _inst.randint |
| 106 | choice = _inst.choice |