R/addSensuStricto.R

addSensuStricto <- function (x) {
	if (!isSensuStricto(x)) {
		r <- paste(x, "s.str.")
	} else {
		r <- x
	}
	return(r)
}
kardinal-eros/linktaxa documentation built on Jan. 13, 2024, 9:15 p.m.