val init_naive_contains : t -> string -> unit
val parse_xml_uri : string -> t
val parse_xml_string : string -> t
val save : t -> string -> unit
val init_naive_contains : t -> string -> unit
val parse_xml_uri : string -> t
val parse_xml_string : string -> t
val save : t -> string -> unit
val text_size : t -> int
val doc_ids : t -> [`Tree] node -> [`Text] node * [`Text] node
val subtree_tags : t -> Tag.t -> [`Tree] node -> int
val text_size : t -> int
val doc_ids : t -> [`Tree] node -> [`Text] node * [`Text] node
val subtree_tags : t -> Tag.t -> [`Tree] node -> int