IF ( ocnCpl_exchange_DIC ) THEN
& (.NOT.ocnCpl_exchange_DIC) ) THEN
& ( ocnCpl_exchange_DIC .OR. apply2AllFields ) )
IF ( useImportSLP . AND. ocnCpl_exchange_DIC)
LOGICAL ocnCpl_exchange_DIC
PARAMETER( ocnCpl_exchange_DIC = .FALSE.)
IF ( ocnCpl_exchange_DIC ) oFluxCO2(i,j) = fluxCO2_ocn(i,j)