2019-11-24 02:49:57 +01:00
|
|
|
module Main where
|
|
|
|
|
|
|
|
|
|
import Lib
|
|
|
|
|
|
|
|
|
|
main :: IO ()
|
2019-11-24 17:06:51 +01:00
|
|
|
main =
|
|
|
|
|
putStrLn $
|
|
|
|
|
printBoard
|
|
|
|
|
[ [Bomb Revealed, Value 1 Revealed, Value 0 Revealed]
|
|
|
|
|
, [Value 1 Revealed, Value 1 Revealed, Value 0 Revealed]
|
|
|
|
|
, [Value 0 Revealed, Value 0 Revealed, Value 0 Revealed]
|
|
|
|
|
]
|
