R/cctbls.R

Defines functions cctbls

cctbls<-function(u){
a<-c("XFe96LotRelease"="xfe96wetqc","XFe24LotRelease"="xfe24wetqc",
     "XFpLotRelease"="xfpwetqc","XF24LotRelease"="xf24legacy")[u]
unname(a)
}
JARS3N/LiveLongAndProsper documentation built on June 21, 2020, 12:49 p.m.