Progress_bar.Displayval reporters : ('a, unit) t -> ('a, unit) Reporter.listval tick : ('a, 'b) t -> unitval add_line : ?above:int -> ('b, 'c) t -> 'a Line.t -> 'a Reporter.tval remove_line : ('a, 'b) t -> 'c Reporter.t -> unitval pause : ('a, 'b) t -> unitval resume : ('a, 'b) t -> unitval finalise : ('a, 'b) t -> unit