IF ( .NOT. useSEAICE ) THEN
LOGICAL useSEAICE
& useSBO, useSEAICE, useShelfIce, useThSIce, useBulkForce,
IF ( useSEAICE ) THEN
IF (useSEAICE) CALL SEAICE_INIT( myThid )
IF (useSEAICE) CALL SEAICE_READPARMS( myThid )
IF ( .NOT. useSEAICE .AND. .NOT. useEBM ) THEN
useSEAICE = .FALSE.
useSEAICE = .TRUE.
IF ( useOldFreezing .AND. .NOT. useSEAICE
IF (useSEAICE) CALL SEAICE_CHECK( myThid )
IF (useSEAICE) CALL PACKAGES_CHECK_ERROR('SEAICE', myThid)
useSEAICE =.FALSE.
& useSEAICE,
& .AND. .NOT. useSEAICE
ELSEIF ( useRealFreshWaterFlux .AND. .NOT.useSEAICE ) THEN
IF ( useSEAICE ) stressReduction = 0. _d 0
IF ( useSEAICE .AND. stressReduction.NE.0. _d 0 ) THEN