banbh · April 13, 2009 00:45
diff --git a/Birthdays.hs b/Birthdays.hs
 import System.Random

 rollDice = getStdRandom (randomR (1,6))

 main = do roll <- rollDice
          print roll
          sg <- getStdGen
          let rl = randomRs (1,6) sg
          print $ take 5 rl
	import System.Random

	rollDice = getStdRandom (randomR (1,6))

	main = do roll <- rollDice
	print roll
	sg <- getStdGen
	let rl = randomRs (1,6) sg
	print $ take 5 rl
No results found