path: root/Main.hs

import System.Random (getStdGen)
import Card (fullDecks, shuffle)

main = do
    gen <- getStdGen
    print $ shuffle gen $ fullDecks 1