& SEAICE_useMultDimSnow, SEAICEuseFlooding, SEAICEheatConsFix,
IF ( SEAICE_useMultDimSnow ) pFacSnow=pFac
& SEAICEheatConsFix, SEAICE_multDim, SEAICE_useMultDimSnow,
SEAICE_useMultDimSnow = .FALSE.