Module Progress

module Progress: sig .. end

class type progress_indicator = object .. end

class indicator : decimation:int -> label:string -> channel:Pervasives.out_channel -> unit -> progress_indicator

class formatter_indicator : decimation:int -> label:string -> fmt:Format.formatter -> unit -> progress_indicator

val dummy : progress_indicator