tf-random-0.1: High-quality splittable pseudorandom number generator

Safe HaskellNone



This module provides the TFGen generator and the alternative RandomGen class. TFGen also implements the standard RandomGen class.



data TFGen Source

The generator type

class RandomGen g whereSource

Alternative RandomGen class with a modified next operation, and added splitn and level operations.

Using the generator requires that no more than one operation is called on the same generator state, as the implementation does not guarantee pseudorandomness otherwise. As an exception, calling splitn many times on the same generator state is allowed as long as the 'bits' argument is the same for all the calls.


next :: g -> (Word32, g)Source

next returns a Word32 that appears to have been chosen uniformly at random, and a new generator state.

split :: g -> (g, g)Source

split returns two derived generator states that appear to be independent pseudorandom number generators.



:: g

Original generator state.

-> Int

Number of bits that will be used to index the derived states. Must be between 0 and 32.

-> Word32

Index of the derived state. Call to splitn r n i must satisfy 0 <= i < 2^n.

-> g 

splitn is the n-way split operation used to create many derived generator states in one go. Application of splitn to two first arguments should be shared between different applications of the index argument to avoid unnecessary repeated computations.

The following code creates ten 'independent' generator states. Number '4' comes from the fact that at least four bits are needed to encode ten different indices.

    f :: RandomGen g => g -> [g]
    f r = map (splitn r 4) [0..9]

level :: g -> gSource

level is a 'hint' operation that may cause an iteration of work of the generator be performed prematurely in order to prevent the subsequent operations from being expensive. It is meant to be called before a splitn operation, which is expected to be evaluated a very large number indices. Calling level in such case might decrease the total amount of work performed.


seedTFGen :: (Word64, Word64, Word64, Word64) -> TFGenSource

Create a generator from a random seed.