Initial commit

This commit is contained in:
Paul-Henri Froidmont 2019-11-24 02:49:57 +01:00 committed by Paul-Henri Froidmont
commit 4e77f37a5f
9 changed files with 289 additions and 0 deletions

10
app/Main.hs Normal file
View file

@ -0,0 +1,10 @@
module Main where
import Lib
main :: IO ()
main = putStrLn $ printBoard (Board
[ [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]
])