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 Feb. 7, 2023, 1:11 a.m.