sig
  val find_first_child :
    GTree.tree_store -> Gtk.tree_iter -> Gtk.tree_iter option
  val find_iter_above :
    GTree.model -> Gtk.tree_iter -> GTree.row_reference option
  val find_iter_below :
    GTree.tree_store -> Gtk.tree_iter -> GTree.row_reference option
end