11 lines
350 B
Haskell
11 lines
350 B
Haskell
|
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]
|
||
|
|
])
|