sig
  val add : Evas.obj -> Evas.obj
  val addx : Elm_object.t_addx
  val horizontal_set : Evas.obj -> bool -> unit
  val horizontal_get : Evas.obj -> bool
end