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