let add_node_to_select select (node,z_opt) m =
  add_to_select select (mk_select_node ~z_opt node) m