# Module `Xml.W`

```ocaml
type 'a t = 'a Xml_shared.W.t
```
```ocaml
val return : 'a -> 'a t
```
```ocaml
type ('a, 'b) ft = ('a, 'b) Xml_shared.W.ft
```
```ocaml
val fmap : ('a, 'b) ft -> 'a t -> 'b t
```
```ocaml
type 'a tlist = 'a Xml_shared.W.tlist
```
```ocaml
val nil : unit -> 'a tlist
```
```ocaml
val singleton : 'a t -> 'a tlist
```
```ocaml
val cons : 'a t -> 'a tlist -> 'a tlist
```
```ocaml
val append : 'a tlist -> 'a tlist -> 'a tlist
```
```ocaml
val map : ('a, 'b) ft -> 'a tlist -> 'b tlist
```