.packageName <- "taehomology"
taehomology <- function() cat(taehomologyQC)
.no_S3_generics = TRUE
ns <- asNamespace("taehomology")
taehomologyLOCUSIDfunc <- function() {
	taehomologyLOCUSID <- function(){
		.Deprecated("taehomologyENTREZID")
	}
	taehomologyLOCUSID()
	taehomologyENTREZID
}
makeActiveBinding("taehomologyLOCUSID", taehomologyLOCUSIDfunc, ns)

