& SEAICEuseEVPpickup, SEAICEuseFlooding,
IF ( SEAICEuseFlooding ) THEN
IF(SEAICEuseFlooding) THEN
SEAICEuseFlooding = .TRUE.
SEAICEuseFlooding = .FALSE.
& useHB87stressCoupling, SEAICEuseFlooding, usePW79thermodynamics,
CALL WRITE_0D_L ( SEAICEuseFlooding, INDEX_NONE,