.packageName <- "xtrhomology"
xtrhomology <- function() cat(xtrhomologyQC)
.no_S3_generics = TRUE
ns <- asNamespace("xtrhomology")
xtrhomologyLOCUSIDfunc <- function() {
	xtrhomologyLOCUSID <- function(){
		.Deprecated("xtrhomologyENTREZID")
	}
	xtrhomologyLOCUSID()
	xtrhomologyENTREZID
}
makeActiveBinding("xtrhomologyLOCUSID", xtrhomologyLOCUSIDfunc, ns)

