sig
  val adjust_bounds : ([> `range ], float -> unit) GtkSignal.t
  val move_slider : ([> `range ], GtkEnums.scroll_type -> unit) GtkSignal.t
  val value_changed : ([> `range ], unit -> unit) GtkSignal.t
end