sig
type attr = string * string
type xml = Tag of string * Xml.attr list * Xml.xml list | PCData of string
val show : Xml.xml -> string
val parse_ch : Pervasives.in_channel -> Xml.xml
val parse_file : string -> Xml.xml
val parse_string : string -> Xml.xml
val getname : Xml.xml -> string
val getchild : string -> Xml.xml -> Xml.xml
val ( %% ) : Xml.xml -> string -> Xml.xml
val getchildren : Xml.xml -> Xml.xml list
val pcdata : Xml.xml -> string
val childpc : Xml.xml -> string
val ( %%% ) : Xml.xml -> string -> string
val ( %%< ) : Xml.xml -> string -> Xml.xml list
val attr : string -> Xml.xml -> string
end