Module type XML_sigs.TypedPrinter module type TypedPrinter = sig..endtype 'a elttype doctype outval print_list : ?encode:(string -> string) -> 'a elt list -> outval print : ?encode:(string -> string) -> ?advert:string -> doc -> out