.packageName <- "ptrhomology"
ptrhomology <- function() cat(ptrhomologyQC)
.no_S3_generics = TRUE
ns <- asNamespace("ptrhomology")
ptrhomologyLOCUSIDfunc <- function() {
	ptrhomologyLOCUSID <- function(){
		.Deprecated("ptrhomologyENTREZID")
	}
	ptrhomologyLOCUSID()
	ptrhomologyENTREZID
}
makeActiveBinding("ptrhomologyLOCUSID", ptrhomologyLOCUSIDfunc, ns)

