velengel/Main.hs

Created July 17, 2015 08:16

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/velengel/645c17999c1b96c817ef.js"></script>
Save velengel/645c17999c1b96c817ef to your computer and use it in GitHub Desktop.

Download ZIP

Raw

Main.hs

	module Main where
	import Cards
	import Random.Shuffle
	import Data.List

	main :: IO ()
	main = do
	shuffled <- shuffleM allCards
	print . sort . take 5 shuffled

Author

velengel commented Jul 17, 2015

http://tune.hateblo.jp/entry/2015/05/12/023112

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment