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