Xml_print.Make_typed_simple
module Xml : Xml_sigs.Iterable
module Typed_xml : Xml_sigs.Typed_xml with module Xml := Xml
val print_list : output:(string -> unit) -> ?encode:(string -> string) ->
'a Typed_xml.elt list -> unit
val print : output:(string -> unit) -> ?encode:(string -> string) -> ?advert:string ->
Typed_xml.doc -> unit