`sig
val cast : 'a Gobject.obj -> Gtk.adjustment Gtk.obj
module P = GtkBaseProps.Adjustment.P
module S = GtkBaseProps.Adjustment.S
val make_params :
cont:(([> `adjustment ] as 'a) Gobject.param list -> 'b) ->
'a Gobject.param list ->
?lower:float ->
?page_increment:float ->
?page_size:float ->
?step_increment:float -> ?upper:float -> ?value:float -> 'b
external create :
value:float ->
lower:float ->
upper:float ->
step_incr:float ->
page_incr:float -> page_size:float -> Gtk.adjustment Gtk.obj
= "ml_gtk_adjustment_new_bc" "ml_gtk_adjustment_new"
external clamp_page :
[> `adjustment ] Gtk.obj -> lower:float -> upper:float -> unit
= "ml_gtk_adjustment_clamp_page"
end`