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