module Terminal.Game.Random ( R.StdGen,
Random,
R.getStdGen,
R.mkStdGen,
getRandom,
getRandomList )
where
import System.Random as R
getRandom :: Random a => (a, a) -> StdGen -> (a, StdGen)
getRandom :: (a, a) -> StdGen -> (a, StdGen)
getRandom (a, a)
bs StdGen
sg = (a, a) -> StdGen -> (a, StdGen)
forall a g. (Random a, RandomGen g) => (a, a) -> g -> (a, g)
randomR (a, a)
bs StdGen
sg
getRandomList :: Random a => (a, a) -> StdGen -> [a]
getRandomList :: (a, a) -> StdGen -> [a]
getRandomList (a, a)
bs StdGen
sg = (a, a) -> StdGen -> [a]
forall a g. (Random a, RandomGen g) => (a, a) -> g -> [a]
randomRs (a, a)
bs StdGen
sg