& balanceThetaClimRelax, balanceSaltClimRelax,
LOGICAL balanceSaltClimRelax
IF (balanceThetaClimRelax .OR. balanceSaltClimRelax) THEN
CALL WRITE_0D_L( balanceSaltClimRelax, INDEX_NONE,
IF ( balanceSaltClimRelax ) THEN
& balanceThetaClimRelax, balanceSaltClimRelax
balanceSaltClimRelax = .FALSE.