let
append_children children obj =
List
.iter (
fun
c
->
obj >>>
AXOJs
.
Node
.append c) children