& SEAICE_doOpenWaterGrowth, SEAICE_doOpenWaterMelt,
IF ( (.NOT.SEAICE_doOpenWaterGrowth)
& (.NOT.SEAICE_doOpenWaterGrowth) ) THEN
IF (SEAICE_doOpenWaterGrowth) facOpenGrow = 1. _d 0
SEAICE_doOpenWaterGrowth=.TRUE.
CALL WRITE_0D_L ( SEAICE_doOpenWaterGrowth , INDEX_NONE,