Haskell Zufallszahlen

import System.Random  
randomRIO :: (a, a) -> IO a  

Beispiel

atmost :: Int -> IO a -> IO [a]   
atmost most a =   
	do l <- randomRIO (1, most)   
	sequence (replicate l a)  
  
atmost :: Int -> IO a -> IO [a]   
atmost most a =  
	do l <- randomRIO (1, most)   
	sequence (replicate l a)