sig val output : (string -> unit) -> string -> int -> string -> (string -> string option) -> (string, int array) Stdlib.Hashtbl.t -> (string, string) Stdlib.Hashtbl.t -> unit end