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