let
get_attribute name node =
try
node >>> get name >>> as_string
with
_
->
failwith
"get_attribute"