alea-0.3.3.0: src/Alea/Random.hs

module Alea.Random where

import Crypto.Threefish.Random

randWords :: Int -> Int -> IO [Int]
randWords n k = newSkeinGen >>= return . take k . randomRs (0, n-1)