module Master: sig .. end
sig
end
val compute : master:(string * 'c -> string -> (string * 'c) list) -> (string * 'c) list -> unit
master:(string * 'c -> string -> (string * 'c) list) -> (string * 'c) list -> unit