`sig
val cast : 'a Gobject.obj -> Gtk.ruler Gtk.obj
module P :
sig
val lower : ([> `ruler ], float) Gobject.property
val upper : ([> `ruler ], float) Gobject.property
val max_size : ([> `ruler ], float) Gobject.property
val position : ([> `ruler ], float) Gobject.property
end
val create :
Gtk.Tags.orientation -> Gtk.ruler Gobject.param list -> Gtk.ruler Gtk.obj
external set_metric : [> `ruler ] Gtk.obj -> Gtk.Tags.metric_type -> unit
= "ml_gtk_ruler_set_metric"
val make_params :
cont:(([> `ruler ] as 'a) Gobject.param list -> 'b) ->
'a Gobject.param list ->
?lower:float -> ?upper:float -> ?max_size:float -> ?position:float -> 'b
end`