sig
module Infix : sig val ( +| ) : int array -> int array -> int array end
val mkdirs : ?perm:Unix.file_perm -> string -> unit
val split : ('a -> bool) -> 'a list -> 'a list * 'a list
val open_both : string -> string -> Stdlib.in_channel * Stdlib.out_channel
val output_strings :
string list -> (string * string) list -> Stdlib.out_channel -> unit
type counts = { mutable visited : int; mutable total : int; }
val make : unit -> Report_utils.counts
val update : Report_utils.counts -> bool -> unit
val add : Report_utils.counts -> Report_utils.counts -> Report_utils.counts
end