sig
  type t
  type kind = Horizontal | HBar | Vertical | Circular
  val triggers : Bogue.Trigger.t list
  val size : Bogue.Slider.t -> int * int
  val value : Bogue.Slider.t -> int
  val get_max : Bogue.Slider.t -> int
  val set : Bogue.Slider.t -> int -> unit
end