& mnthNam(mnthIndex), aim_MMsufx(1:aim_MMsufxLength)
CHARACTER*3 mnthNam(12)
DATA mnthNam /
SAVE mnthNam