type origin = | Core| Netscape
val is_void : string -> boolval is_head_element : string -> boolval is_block : string -> boolval closes : string -> string -> boolval stops : string -> string -> boolval element_origin : string -> originval attribute_origin : string -> (string * string) -> origin