(* TEST
   * ocamldoc with html
*)

type ul
type li
type amp
type 'a t = <ul: <li:[<`A of &amp] as 'a> >