module NonogramTypes (Nonogram(..)) where


-- Data type for representing a Nonogram puzzle
data Nonogram = Nonogram
  { title   :: String         -- Title of puzzle
  , height  :: Int            -- Height of puzzle grid
  , width   :: Int            -- Width of puzzle grid
  , rows    :: [[Int]]        -- Row constraints (lists of integers)
  , columns :: [[Int]]        -- Column constraints (lists of integers)
  , goal    :: String         -- (Optional) Goal or solution representation as a string
  } deriving (Show)
