sig
  type xml_elt
  val print_list :
    output:(string -> unit) ->
    ?encode:(string -> string) ->
    Xml_sigs.Simple_printer.xml_elt list -> unit
end