CHARACTER*(MAX_LEN_FNAM) airPotTempFile
& airPotTempFile
IF ( airPotTempFile .NE. ' ' ) THEN
CALL READ_REC_XY_RS( airPotTempFile, thAir0, intime0,
CALL READ_REC_XY_RS( airPotTempFile, thAir1, intime1,
airPotTempFile=' '
& EmPFile, CloudFile, airPotTempFile