data TableBody = TableBody {
  tableBodyRows :: [TableRow]
} deriving Eq
