Module Xml.W
val return : 'a -> 'a Xml.W.tval nil : unit -> 'a Xml.W.tlistval singleton : 'a Xml.W.t -> 'a Xml.W.tlistval cons : 'a Xml.W.t -> 'a Xml.W.tlist -> 'a Xml.W.tlistval append : 'a Xml.W.tlist -> 'a Xml.W.tlist -> 'a Xml.W.tlistval map : ('a, 'b) Xml.W.ft -> 'a Xml.W.tlist -> 'b Xml.W.tlist