& tpTimeMaskFile, ersTimeMaskFile, gfoTimeMaskFile
character*(MAX_LEN_FNAM) tpTimeMaskFile
tpTimeMaskFile = ' '
& topexperiod, topexfile, tpTimeMaskFile,
if ( tpTimeMaskFile .NE. ' ' ) then
ilo = ifnblnk(tpTimeMaskFile)
ihi = ilnblnk(tpTimeMaskFile)
I tpTimeMaskFile(ilo:ihi),