Multiply-with-carry pseudorandom number generator

In computer science, multiply-with-carry (MWC) is a method invented by George Marsaglia[1] for generating sequences of random integers based on an initial set from two to many thousands of randomly chosen seed values. The main advantages of the MWC method are that it invokes simple computer integer arithmetic and leads to very fast generation of sequences of random numbers with immense periods, ranging from around to .

As with all pseudorandom number generators, the resulting sequences are functions of the supplied seed values.

General theory

edit

An MWC generator is a special form of Lehmer random number generator   which allows efficient implementation of a prime modulus   much larger than the machine word size.

Normal Lehmer generator implementations choose a modulus close to the machine word size. An MWC generator instead maintains its state in base  , so multiplying by   is done implicitly by shifting one word. The base   is typically chosen to equal the computer's word size, as this makes arithmetic modulo   trivial. This may vary from   for a microcontroller to  . (This article uses   for examples.)

The initial state ("seed") values are arbitrary, except that they must not be all zero, nor all at the maximum permitted values (  and   ). (This is commonly done by choosing   between 1 and  .). The MWC sequence is then a sequence of pairs   determined by

 

This is called a lag-1 MWC sequence. Sometimes an odd base is preferred, in which case   can be used, which is almost as simple to implement. A lag-  sequence is a generalization of the lag-1 sequence allowing longer periods[2]. The lag-  MWC sequence is then a sequence of pairs   (for  ) determined by

 

and the MWC generator output is the sequence of  's,

 

In this case, the initial state ("seed") values must not be all zero nor   and  .

The MWC multiplier   and lag   determine the modulus  . In practice,   is chosen so the modulus is prime and the sequence has long period. If the modulus is prime, the period of a lag-  MWC generator is the order of   in the multiplicative group of numbers modulo  . While it is theoretically possible to choose a non-prime modulus, a prime modulus eliminates the possibility of the initial seed sharing a common divisor with the modulus, which would reduce the generator's period.

Because 2 is a quadratic residue of numbers of the form  ,   cannot be a primitive root of  . Therefore, MWC generators with base   have their parameters chosen so their period is (abr−1)/2. This is one of the difficulties that use of b = 2k − 1 overcomes.

The basic form of an MWC generator has parameters a, b and r, and r+1 words of state. The state consists of r residues modulo b

0 ≤ x0, x1, x2,..., xr−1 < b,

and a carry cr−1 < a.

Although the theory of MWC generators permits a > b, a is almost always chosen smaller for convenience of implementation.

The state transformation function of an MWC generator is one step of Montgomery reduction modulo p. The state is a large integer with most significant word cn−1 and least significant word xnr. Each step, xnr·(abr−1) is added to this integer. This is done in two parts: −1·xnr is added to xnr, resulting in a least significant word of zero. And second, a·xnr is added to the carry. This makes the integer one word longer, producing two new most significant words xn and cn.

So far, this has simply added a multiple of p to the state, resulting in a different representative of the same residue class modulo p. But finally, the state is shifted down one word, dividing by b. This discards the least significant word of zero (which, in practice, is never computed at all) and effectively multiplies the state by b−1 (mod p).

Thus, a multiply-with-carry generator is a Lehmer generator with modulus p and multiplier b−1 (mod p). This is the same as a generator with multiplier b, but producing output in reverse order, which does not affect the quality of the resultant pseudorandom numbers.

Couture and L'Ecuyer[3] have proved the surprising result that the lattice associated with a multiply-with-carry generator is very close to the lattice associated with the Lehmer generator it simulates. Thus, the mathematical techniques developed for Lehmer generators (such as the spectral test) can be applied to multiply-with-carry generators.

Efficiency

edit

A linear congruential generator with base b = 232 is implemented as

 

where c is a constant. If a ≡ 1 (mod 4) and c is odd, the resulting base-232 congruential sequence will have period 232.[4]

This can be computed using only the low 32 bits of the product of a and the current x. However, many microprocessors can compute a full 64-bit product in almost the same time as the low 32 bits. Indeed, many compute the 64-bit product and then ignore the high half.

A lag-1 multiply-with-carry generator allows us to make the period nearly 263 by using almost the same computer operations, except that the top half of the 64-bit product is not ignored after the product is computed. Instead, a 64-bit sum is computed, and the top half is used as a new carry value c rather than the fixed additive constant of the standard congruential sequence: Compute ax+c in 64 bits, then use the top half as the new c, and bottom half as the new x.

Choice of multiplier

edit

With multiplier a specified, each pair of input values x, c is converted to a new pair,

 

If x and c are not both zero, then the period of the resulting multiply-with-carry sequence will be the order of b = 232 in the multiplicative group of residues modulo abr − 1, that is, the smallest n such that bn ≡ 1 (mod abr − 1).

If p = abr − 1 is prime, then Fermat's little theorem guarantees that the order of any element must divide p − 1 = abr − 2, so one way to ensure a large order is to choose a such that p is a "safe prime", that is both p and (p − 1)/2 = abr/2 − 1 are prime. In such a case, for b= 232 and r = 1, the period will be abr/2 − 1, approaching 263, which in practice may be an acceptably large subset of the number of possible 32-bit pairs (x, c).

More specifically, in such a case, the order of any element divides p − 1, and there are only four possible divisors: 1, 2, abr/2 − 1, or abr − 2. The first two apply only to the elements 1 and −1, and quadratic reciprocity arguments show that the fourth option cannot apply to b, so only the third option remains.

Following are some maximal values of a for computer applications which satisfy the above safe prime condition, for lag-1 generators:

Bits in a b Maximum a such that ab−1 is a safe prime Period
15 216 215−50 = 32,718 1,072,103,423
16 216 216−352 = 65,184 2,135,949,311
31 232 231−563 = 2,147,483,085 4,611,684,809,394,094,079
32 232 232−178 = 4,294,967,118 9,223,371,654,602,686,463
64 264 264−742 = 18,446,744,073,709,550,874 263(264−742)−1 ≈ 1.701×10^38
128 2128 2128−10,408 2127(2128−10,408)−1 ≈ 5.790×10^76
256 2256 2256−9166 2255(2256−9166)−1 ≈ 6.704×10^153
512 2512 2512−150,736 2511(2512−150,736)−1 ≈ 8.988×10^307

While a safe prime ensures that almost any element of the group has a large order, the period of the generator is specifically the order of b. For small moduli, more computationally expensive methods can be used to find multipliers a where the period is ab/2 − 1. The following are again maximum values of a of various sizes.

Bits in a br Maximum a such that
b has order abr/2−1
Period
8 28 28−7 = 249 31,871
8 (28)2 = 216 28−32 = 224 7,340,031
15 216 215−29 = 32,739 1,072,791,551
16 216 216−22 = 65,514 2,146,762,751
8 (28)4 = 232 28−64 = 192 412,316,860,415
15 (216)2 = 232 215−26 = 32,742 70,312,909,602,815
16 (216)2 = 232 216−2 = 65,534 140,733,193,388,031
31 232 231−68 = 2,147,483,580 4,611,685,872,398,499,839
32 232 232−76 = 4,294,967,220 9,223,371,873,646,018,559
8 (28)8 = 264 28−41 = 215 263(28−41)−1 ≈ 1.983×10^21
15 (216)4 = 264 215−50 = 32,718 263(215−50)−1 ≈ 3.018×10^23
16 (216)4 = 264 216−56 = 65,480 263(216−56)−1 ≈ 6.039×10^23
31 (232)2 = 264 231−38 = 2,147,483,610 263(231−38)−1 ≈ 1.981×10^28
32 (232)2 = 264 232−43 = 4,294,967,253 263(232−43)−1 ≈ 3.961×10^28
63 264 263−140 = 9,223,372,036,854,775,668 263(263−140)−1 ≈ 8.507×10^37
64 264 264−116 = 18,446,744,073,709,551,500 263(264−116)−1 ≈ 1.701×10^38

MWC generators as repeating decimals

edit

The output of a multiply-with-carry generator is equivalent to the radix-b expansion of a fraction with denominator p = abr − 1. Here is an example for the simple case of b = 10 and r = 1, so the result is a repeating decimal.

Starting with  , the MWC sequence

 

produces this sequence of states:

10,01,07,49,67,55,40,04,28,58,61,13,22,16,43,25,37,52,19,64,34,31, 10,01,07,...

with period 22. Consider just the sequence of xi:

0,1,7,9,7,5,0,4,8,8,1,3,2,6,3,5,7,2,9,4,4,1, 0,1,7,9,7,5,0,...

Notice that if those repeated segments of x values are put in reverse order:

 

we get the expansion j/(ab−1) with a=7, b=10, j=10:

 

This is true in general: The sequence of xs produced by a lag-r MWC generator:

 

when put in reverse order, will be the radix-b expansion of a fraction j/(abr − 1) for some 0 < j < abr.

Equivalence to linear congruential generator

edit

Continuing the above example, if we start with  , and generate the ordinary congruential sequence

 ,

we get the period 22 sequence

31,10,1,7,49,67,55,40,4,28,58,61,13,22,16,43,25,37,52,19,64,34, 31,10,1,7,...

and that sequence, reduced mod 10, is

1,0,1,7,9,7,5,0,4,8,8,1,3,2,6,3,5,7,2,9,4,4, 1,0,1,7,9,7,5,0,...

the same sequence of x's resulting from the MWC sequence.

This is true in general, (but apparently only for lag-1 MWC sequences[citation needed]):

Given initial values  , the sequence   resulting from the lag-1 MWC sequence

 

is exactly the Lehmer random number generator output sequence yn = ayn − 1 mod (ab − 1), reduced modulo b.

Choosing a different initial value y0 merely rotates the cycle of x's.

Complementary-multiply-with-carry generators

edit

Establishing the period of a lag-r MWC generator usually entails choosing multiplier a so that p = abr − 1 is prime. Then p − 1 will have to be factored in order to find the order of b mod p. If p is a safe prime, then this is simple, and the order of b will be either p − 1 or (p − 1)/2. In other cases, p − 1 may be difficult to factor.

However, the algorithm also permits a negative multiplier. This leads to a slight modification of the MWC procedure, and produces a modulus p = |abr − 1| = abr + 1. This makes p − 1 = abr easy to factor, making it practical to establish the period of very large generators.

The modified procedure is called complementary-multiply-with-carry (CMWC), and the setup is the same as that for lag-r MWC: multiplier a, base b, and r + 1 seeds,

x0, x1, x2, ..., xr−1, and cr−1.

The modification is to the generation of a new pair (x, c). Rearranging the computation to avoid negative numbers, the new x value is complemented by subtracting it from b − 1:

 

The resulting sequence of x's produced by the CMWC RNG will have period the order of b in the multiplicative group of residues modulo abr+1, and the output x's, in reverse order, will form the base b expansion of j/(abr+1) for some 0 < j < abr.

Use of lag-r CMWC makes it much easier to find periods for r's as large as 512, 1024, 2048, etc. (Making r a power of 2 makes it slightly simpler to access elements in the array containing the r most recent x's.)

Another advantage of this modified procedure is that the period is a multiple of b, so the output is exactly equidistributed mod b.[3] (The ordinary MWC, over its full period, produces each possible output an equal number of times except that zero is produced one time less, a bias which is negligible if the period is long enough.)

One disadvantage of the CMWC construction is that, with a power-of-two base, the maximum achievable period is less than for a similar-sized MWC generator; you lose several bits. Thus, an MWC generator is usually preferable for small lags. This can remedied by using b = 2k−1, or choosing a lag one word longer to compensate.

Some examples: With b = 232, and a = 109111 or 108798 or 108517, the period of the lag-1024 CMWC

 

will be a·232762 = ab1024/64, about 109867.

With b = 232 and a = 3636507990, p = ab1359 − 1 is a safe prime, so the MWC sequence based on that a has period 3636507990·243487 ≈ 1013101.

With b = 232, a CMWC RNG with near record period may be based on the prime p = 15455296b42658 + 1. The order of b for that prime is 241489·21365056 ≈ 10410928.

More general moduli

edit

The MWC modulus of abr−1 is chosen to make computation particularly simple, but brings with it some disadvantages, notably that the period is at most half the modulus. There are several ways to generalize this, at the cost of more multiplications per iteration.

First, it is possible to add additional terms to the product, producing a modulus of the form arbr+asbs−1. This requires computing cnb + xn = arxnr + asxns. (The carry is limited to one word if ar + asb.)

However, this does not fix the period issue, which depends on the low bits of the modulus. Fortunately, the Montgomery reduction algorithm permits other moduli, as long as they are relatively prime to the base b, and this can be applied to permit a modulus of the form arbra0, for a wide range of values a0. Goresky and Klapper[5] developed the theory of these generalized multiply-with-carry generators, proving, in particular, that choosing a negative a0 and ara0 < b the carry value is always smaller than b, making the implementation efficient. The more general form of the modulus improves also the quality of the generator, albeit one cannot always get full period.

To implement a Goresky-Klapper generator one precomputes a−1
0
 (mod b), and changes the iteration as follows:[6]

 

In the common case that b = 2k, a0 must be odd for the inverse to exist.

Implementation

edit

The following is an implementation of the CMWC algorithm in the C programming language. Also, included in the program is a sample initialization function. In this implementation the base is 232−1 and lag r=4096. The period of the resulting generator is about  .

// C99 Complementary Multiply With Carry generator
#include <stdint.h>
#include <stdio.h>
#include <stdlib.h>
#include <time.h>

// How many bits in rand()?
// https://stackoverflow.com/a/27593398
#define LOG_1(n) (((n) >= 2) ? 1 : 0)
#define LOG_2(n) (((n) >= 1<<2) ? (2 + LOG_1((n)>>2)) : LOG_1(n))
#define LOG_4(n) (((n) >= 1<<4) ? (4 + LOG_2((n)>>4)) : LOG_2(n))
#define LOG_8(n) (((n) >= 1<<8) ? (8 + LOG_4((n)>>8)) : LOG_4(n))
#define LOG(n)   (((n) >= 1<<16) ? (16 + LOG_8((n)>>16)) : LOG_8(n))
#define BITS_TO_REPRESENT(n) (LOG(n) + !!((n) & ((n) - 1)))
#if ((RAND_MAX | (RAND_MAX >> 1)) != RAND_MAX) 
#error "expected a RAND_MAX that is 2^n - 1!"
#endif
#define RAND_BITS BITS_TO_REPRESENT(RAND_MAX)

// CMWC working parts
#define CMWC_CYCLE 4096         // as Marsaglia recommends
#define CMWC_C_MAX 809430660    // as Marsaglia recommends
struct cmwc_state {
	uint32_t Q[CMWC_CYCLE];
	uint32_t c;	// must be limited with CMWC_C_MAX
	unsigned i;
};

// Collect 32 bits of rand(). You are encouraged to use a better source instead.
uint32_t rand32(void)
{
	uint32_t result = rand();
    for (int bits = RAND_BITS; bits < 32; bits += RAND_BITS)
        result = result << RAND_BITS | rand();
	return result;
}

// Init the state with seed
void initCMWC(struct cmwc_state *state, unsigned int seed)
{
	srand(seed);        
	for (int i = 0; i < CMWC_CYCLE; i++)
		state->Q[i] = rand32();
	do
		state->c = rand32();
	while (state->c >= CMWC_C_MAX);
	state->i = CMWC_CYCLE - 1;
}

// CMWC engine
uint32_t randCMWC(struct cmwc_state *state)  //EDITED parameter *state was missing
{
	uint64_t const a = 18782;	// as Marsaglia recommends
	uint32_t const m = 0xfffffffe;	// as Marsaglia recommends
	uint64_t t;
	uint32_t x;

	state->i = (state->i + 1) & (CMWC_CYCLE - 1);
	t = a * state->Q[state->i] + state->c;
	/* Let c = t / 0xffffffff, x = t mod 0xffffffff */
	state->c = t >> 32;
	x = t + state->c;
	if (x < state->c) {
		x++;
		state->c++;
	}
	return state->Q[state->i] = m - x;
}

int main()
{
	struct cmwc_state cmwc;
	unsigned int seed = time(NULL);

	initCMWC(&cmwc, seed);
	printf("Random CMWC: %u\n", randCMWC(&cmwc));
}

The following are implementations of small-state MWC generators with 64-bit output using 128-bit multiplications.

// C99 + __uint128_t MWC, 128 bits of state, period approx. 2^127

/* The state must be neither all zero, nor x = 2^64 - 1, c = MWC_A1 -
   1. The condition 0 < c < MWC_A1 - 1 is thus sufficient. */

uint64_t x, c = 1;

#define MWC_A1 0xff3a275c007b8ee6

uint64_t inline next() {
    const __uint128_t t = MWC_A1 * (__uint128_t)x + c;
    c = t >> 64;
    return x = t;
}
// C99 + __uint128_t MWC, 256 bits of state, period approx. 2^255

/* The state must be neither all zero, nor x = y = z = 2^64 - 1, c =
   MWC_A3 - 1. The condition 0 < c < MWC_A3 - 1 is thus sufficient. */

uint64_t x, y, z, c = 1;

#define MWC_A3 0xff377e26f82da74a

uint64_t inline next() {
    const __uint128_t t = MWC_A3 * (__uint128_t)x + c;
    x = y;
    y = z;
    c = t >> 64;
    return z = t;
}

The following are implementations of small-state Goresky-Klapper's generalized MWC generators with 64-bit output using 128-bit multiplications.

// C99 + __uint128_t Goresky-Klapper GMWC, 128 bits of state, period approx. 2^127

/* The state must be neither all zero, nor x = 2^64 - 1, c = GMWC_A1 +
   GMWC_MINUS_A0. The condition 0 < c < GMWC_A1 + GMWC_MINUS_A0 is thus
   sufficient. */

uint64_t x = 0, c = 1;

#define GMWC_MINUSA0 0x7d084a4d80885f
#define GMWC_A0INV 0x9b1eea3792a42c61
#define GMWC_A1 0xff002aae7d81a646

uint64_t inline next() {
    const __uint128_t t = GMWC_A1 * (__uint128_t)x + c;
    x = GMWC_A0INV * (uint64_t)t;
    c = (t + GMWC_MINUSA0 * (__uint128_t)x) >> 64;
    return x;
}
// C99 + __uint128_t Goresky-Klapper GMWC, 256 bits of state, period approx. 2^255

/* The state must be neither all zero, nor x = y = z = 2^64 - 1, c =
   GMWC_A3 + GMWC_MINUS_A0. The condition 0 < c < GMWC_A3 + GMWC_MINUS_A0
   is thus sufficient. */

uint64_t x, y, z, c = 1; /* The state can be seeded with any set of values, not all zeroes. */

#define GMWC_MINUSA0 0x54c3da46afb70f
#define GMWC_A0INV 0xbbf397e9a69da811
#define GMWC_A3 0xff963a86efd088a2

uint64_t inline next() {
    const __uint128_t t = GMWC_A3 * (__uint128_t)x + c;
    x = y;
    y = z;
    z = GMWC_A0INV * (uint64_t)t;
    c = (t + GMWC_MINUSA0 * (__uint128_t)z) >> 64;
    return z;
}

Usage

edit

Because of simplicity and speed, CMWC is known to be used in game development, particularly in modern roguelike games. It is informally known as the Mother of All PRNGs, a name originally coined by Marsaglia himself.[7] In libtcod, CMWC4096 replaced MT19937 as the default PRNG.[8]

See also

edit

References

edit
  1. ^ Marsaglia, George; Zaman, Arif (August 1995). "The Marsaglia Random Number CDROM including the Diehard Battery of Tests of Randomness".
  2. ^ Marsaglia, George¨ (May 2003). "Random number generators". Journal of Modern Applied Statistical Methods. 2 (1): 2–13. doi:10.22237/jmasm/1051747320.
  3. ^ a b Couture, Raymond; L'Ecuyer, Pierre (April 1997). "Distribution properties of Multiply-with-carry random number generators" (PDF). Mathematics of Computation. 66 (218): 591–607. Bibcode:1997MaCom..66..591C. CiteSeerX 10.1.1.154.331. doi:10.1090/S0025-5718-97-00827-2. We shall see that, for the complementary MWC, each bit of the output value is fair, that is, the two binary digits will appear equally often in a full period, a property not shared by MWC generators.
  4. ^ Hull, T. E.; Dobell, A. R. (July 1962). "Random Number Generators" (PDF). SIAM Review. 4 (3): 230–254. Bibcode:1962SIAMR...4..230H. doi:10.1137/1004061. hdl:1828/3142.
  5. ^ a b Goresky, Mark; Klapper, Andrew (October 2003). "Efficient multiply-with-carry random number generators with maximal period" (PDF). ACM Transactions on Modeling and Computer Simulation. 13 (4): 310–321. CiteSeerX 10.1.1.4.9190. doi:10.1145/945511.945514. S2CID 13334372.
  6. ^ Note that the paper by Goresky and Klapper[5] contains a mistake in equation (4): the last equality is not true—one cannot eliminate the second summand from the computation of the carry.
  7. ^ "Marsaglia's Mother of All Random Number Generators". home.sandiego.edu.
  8. ^ "Random number generator - RogueBasin". www.roguebasin.com. Retrieved 30 November 2016.