{-# LANGUAGE TemplateHaskell #-}

module Types where

import Control.Lens

data MaxProdConfig = MaxProdConfig
  { _prodsize :: Int
  }

data MaxProdState = MaxProdState
  { _currentmax :: Integer
  , _rowidx :: Int
  , _colidx :: Int
  }

$(makeLenses ''MaxProdConfig)
$(makeLenses ''MaxProdState)
