& SEAICE_no_slip, SEAICE_maskRHS,
IF ( SEAICE_maskRHS ) THEN
SEAICE_maskRHS = .FALSE.
& SEAICE_clipVelocities, SEAICE_maskRHS, SEAICE_no_slip,
CALL WRITE_0D_L ( SEAICE_maskRHS, INDEX_NONE,