_RL SEAICE_waterAlbedo, SEAICE_strength, SEAICE_eccen
& SEAICE_waterAlbedo, SEAICE_strength, SEAICE_eccen,
ECCEN=SEAICE_eccen
IF ( SEAICE_eccen .NE. 0. _d 0 ) ecm2=ONE/(SEAICE_eccen**2)
ecc2=SEAICE_eccen**2
ETA(i,j,bi,bj) = ZETA(i,j,bi,bj)/SEAICE_eccen**2
SEAICE_eccen = 2. _d 0