# Module GtkRangeProps.ProgressBar

    module ProgressBar: sig .. end

    val cast : 'a Gobject.obj -> Gtk.progress_bar Gtk.obj

    module P: sig .. end

    val create : Gtk.progress_bar Gobject.param list -> Gtk.progress_bar Gtk.obj

    val pulse : [> `progressbar ] Gtk.obj -> unit

    val make_params : cont:(([> `progressbar ] as 'a) Gobject.param list -> 'b) ->
           'a Gobject.param list ->
           ?orientation:GtkEnums.progress_bar_orientation -> ?pulse_step:float -> 'b