INTEGER SEAICEadjMODE
& SEAICEadjMODE
if ( SEAICEadjMODE.GE.1 ) then
if ( SEAICEadjMODE.EQ.0 ) then
if ( SEAICEadjMODE.GE.3 ) then
if ( SEAICEadjMODE.GE.2 ) tmpscal2 = 0. _d 0
SEAICEadjMODE = 0
if ( SEAICEadjMODE.GE.2 ) then