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