sig
  type +'a id
  val new_elt_id : ?global:bool -> unit -> 'Eliom_content_core.Html5.Id.id
  val create_named_elt :
    id:'Eliom_content_core.Html5.Id.id ->
    'Eliom_content_core.Html5.elt -> 'Eliom_content_core.Html5.elt
  val create_global_elt :
    'Eliom_content_core.Html5.elt -> 'Eliom_content_core.Html5.elt
  val have_id :
    'Eliom_content_core.Html5.Id.id ->
    'Eliom_content_core.Html5.elt -> bool
end