CHARACTER*(MAX_LEN_FNAM) STREAMICEvShearTimeDepFile
& STREAMICEvShearTimeDepFile,
IF ( STREAMICEvShearTimeDepFile .NE. ' ' ) THEN
CALL READ_REC_XY_RL(STREAMICEvShearTimeDepFile,
STREAMICEvShearTimeDepFile = ' '