sig
  val css : string list
  type state
  val make_state : unit -> Tables.state
  val begin_table : Tables.state -> unit
  val end_table : Tables.state -> unit
  val begin_row : Tables.state -> unit
  val end_row : Tables.state -> unit
  val add_cell : Tables.state -> unit
  val add_cells : int -> Tables.state -> unit
end