& SEAICE_no_slip, SEAICE_2ndOrderBC,
IF ( SEAICE_no_slip .AND. SEAICE_2ndOrderBC ) THEN
IF ( SEAICE_no_slip ) noSlipFac = 1. _d 0
IF (.NOT.SEAICE_no_slip) THEN
SEAICE_no_slip = .FALSE.
IF ( .NOT. SEAICE_no_slip ) SEAICE_2ndOrderBC = .FALSE.
CALL WRITE_0D_L ( SEAICE_no_slip, INDEX_NONE,