.packageName <- "cfahomology"
cfahomology <- function() cat(cfahomologyQC)
.no_S3_generics = TRUE
ns <- asNamespace("cfahomology")
cfahomologyLOCUSIDfunc <- function() {
	cfahomologyLOCUSID <- function(){
		.Deprecated("cfahomologyENTREZID")
	}
	cfahomologyLOCUSID()
	cfahomologyENTREZID
}
makeActiveBinding("cfahomologyLOCUSID", cfahomologyLOCUSIDfunc, ns)

