CHARACTER*(MAX_LEN_FNAM) STREAMICEtopogFile
& STREAMICEtopogFile,
IF ( STREAMICEtopogFile .NE. ' ' ) THEN
CALL READ_FLD_XY_RL( STREAMICEtopogFile, '',
STREAMICEtopogFile = ''