How to do links to other pages?

Examples:

(* Link to a service without parameter: *)
Html5.D.a coucou [pcdata "coucou"] ();

(* Link to a service with parameters of type (int * (int * string)): *)
Html5.D.a coucou_params
  [pcdata "coucou_params"] (42, (22, "ciao"));

(* Link to an external service: *)
Html5.D.a
  (external_service
    ~prefix:"http://fr.wikipedia.org"
    ~path:["wiki";""]
    ~get_params:(suffix (all_suffix "suff"))
    ())
  [pcdata "OCaml on wikipedia"]
  ["OCaml"];

(* Low level interface for links: *)
Html5.F.Raw.a
  ~a:[a_href (Xml.uri_of_string "http://en.wikipedia.org/wiki/OCaml")]
  [pcdata "OCaml on wikipedia"]