R/addSensuStricto.R

Defines functions addSensuStricto

Documented in addSensuStricto

addSensuStricto <- function (x) {
	if (!isSensuStricto(x)) {
		r <- paste(x, "s.str.")
	} else {
		r <- x
	}
	return(r)
}
kardinal-eros/linktaxa documentation built on May 18, 2017, 3:26 p.m.