CHARACTER*(MAX_LEN_FNAM) SHELFICEloadAnomalyFile
& SHELFICEloadAnomalyFile,
CALL WRITE_0D_C( SHELFICEloadAnomalyFile, -1, INDEX_NONE,
IF ( SHELFICEmassFile.NE.' ' .AND. SHELFICEloadAnomalyFile.NE.' '
IF ( SHELFICEloadAnomalyFile .NE. ' ' ) THEN
CALL READ_FLD_XY_RL( SHELFICEloadAnomalyFile, ' ',
SHELFICEloadAnomalyFile = ' '
& SHELFICEmassFile, SHELFICEloadAnomalyFile,