let
get_element_by_tag tag root =
root >>> call_method
"getElementByTagName"
[| string tag |]