getItem :: Int -> Int -> [[a]] -> a
getItem row col xss = x
  where
    xs = xss !! row
    x  = xs  !! col
getItem :: Int -> Int -> [[a]] -> a
getItem row col xss = x
  where
    xs = xss !! row
    x  = xs  !! col
getItem row col xss = x
  where
    xs = xss !! row
    x  = xs  !! col