IF (useSeaice.AND.(iWhen.EQ.3)) THEN
IF ( balanceEmPmR .AND. (.NOT.useSeaice .OR. useThSIce) ) THEN
IF ( balanceQnet .AND. (.NOT.useSeaice .OR. useThSIce) ) THEN
IF ( useSeaice) THEN