RosettaCodeData/Task/Random-numbers/Haskell/random-numbers-3.hs

10 lines
196 B
Haskell
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
import Data.Random
import Control.Monad
thousandRandomNumbers :: RVar [Double]
thousandRandomNumbers = replicateM 1000 $ normal 1 0.5
main = do
x <- sample thousandRandomNumbers
print x