Documentation

input :: Read a => [Command a] #

data Command a #

wrap :: Integral a => a -> a -> a -> a #

run :: (IArray a Bool, Integral z, Ix z) => a (z, z) Bool -> Command z -> a (z, z) Bool #

display :: (IArray a Bool, Ix x, Ix y) => a (y, x) Bool -> String #

main :: IO () #