sig
  module Infix : sig val ( +| ) : int array -> int array -> int array end
  val mkdirs : ?perm:Unix.file_perm -> string -> unit
  val split : ('-> 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