.packageName <- "scehomology"
scehomology <- function() cat(scehomologyQC)
.no_S3_generics = TRUE
ns <- asNamespace("scehomology")
scehomologyLOCUSIDfunc <- function() {
	scehomologyLOCUSID <- function(){
		.Deprecated("scehomologyENTREZID")
	}
	scehomologyLOCUSID()
	scehomologyENTREZID
}
makeActiveBinding("scehomologyLOCUSID", scehomologyLOCUSIDfunc, ns)

