& ocn_cplExch1W_sIce, ocn_cplExch2W_sIce, ocn_cplExch_SaltPl,
LOGICAL ocn_cplExch2W_sIce
& .OR. ocn_cplExch2W_sIce ) THEN
IF ( ocn_cplExch2W_sIce ) THEN
ocn_cplExch2W_sIce = MOD(parBuf(4),2).EQ.1
IF ( useImportThSIce .AND. .NOT.ocn_cplExch2W_sIce ) THEN
CALL WRITE_0D_L( ocn_cplExch2W_sIce, INDEX_NONE,
IF ( useThSIce .AND. ocn_cplExch2W_sIce ) THEN