data TableRow = TableRow {
  tableRowCells :: [TableCell]
} deriving Eq
