Minesweeper/src/Main.hs

module Main where

import Minesweeper
import System.Random

main :: IO ()
main = do
    rng <- newStdGen 
    putStrLn (printBoard $ createBoard 20 0.1 rng)
init 2021-01-28 14:17:59 +00:00			`module Main where`

working nicely now, split func into module 2021-01-28 14:45:23 +00:00			`import Minesweeper`
init 2021-01-28 14:17:59 +00:00			`import System.Random`

			`main :: IO ()`
			`main = do`
			`rng <- newStdGen`
working nicely now, split func into module 2021-01-28 14:45:23 +00:00			`putStrLn (printBoard $ createBoard 20 0.1 rng)`