let
create n ?(attrs = []) () =
let
m =
Node
.element n
in
set_attrs m attrs ;
m