.The_default_taxonomy = new.env(parent = emptyenv())

#' @export
set_default_taxonomy <- function(taxonomy) {
  .The_default_taxonomy$taxonomy <- taxonomy
  invisible(taxonomy)
}

#' @export
get_default_taxonomy <- function() {
  .The_default_taxonomy$taxonomy
}