let insert_before new_child ref_child node = node >>> call_method "insertBefore" [| new_child ; ref_child |] >>> ignore