[Haskell-cafe] [random-fu] sampleRVar with StdGen in RWS?