.packageName <- "ri16cod"
ri16cod <- function() cat(ri16codQC)
.no_S3_generics = TRUE
ns <- asNamespace("ri16cod")
ri16codLOCUSIDfunc <- function() {
	ri16codLOCUSID <- function(){
		.Deprecated("ri16codENTREZID")
	}
	ri16codLOCUSID()
	ri16codENTREZID
}
makeActiveBinding("ri16codLOCUSID", ri16codLOCUSIDfunc, ns)

