CHARACTER*(MAX_LEN_FNAM) atmPhys_QflxFile
& atmPhys_SSTFile, atmPhys_QflxFile
CALL WRITE_0D_C( atmPhys_QflxFile, -1, INDEX_NONE,
IF ( atmPhys_QflxFile .NE. ' ' ) THEN
CALL READ_FLD_XY_RL( atmPhys_QflxFile,' ',
atmPhys_QflxFile = ' '