& SEAICErestoreUnderIce, SEAICE_growMeltByConv,
IF ( useSEAICE .AND. (.NOT. SEAICErestoreUnderIce) ) THEN
SEAICErestoreUnderIce = .FALSE.
CALL WRITE_0D_L ( SEAICErestoreUnderIce, INDEX_NONE,