.packageName <- "celhomology"
celhomology <- function() cat(celhomologyQC)
.no_S3_generics = TRUE
ns <- asNamespace("celhomology")
celhomologyLOCUSIDfunc <- function() {
	celhomologyLOCUSID <- function(){
		.Deprecated("celhomologyENTREZID")
	}
	celhomologyLOCUSID()
	celhomologyENTREZID
}
makeActiveBinding("celhomologyLOCUSID", celhomologyLOCUSIDfunc, ns)

