File |
Line number |
Procedure |
Code |
./pkg/atm2d/get_ocnvars.F |
120 |
GET_OCNVARS |
oFluxCO2(i,j) = fluxCO2(i,j,1,1) |
./pkg/bling/bling_main.F |
276 |
BLING_MAIN |
CALL DIAGNOSTICS_FILL(fluxCO2 ,'BLGCFLX ',0,1 ,1,bi,bj,myThid) |
./pkg/dic/dic_atmos.F |
107 |
DIC_ATMOS |
& + fluxCO2(i,j,bi,bj)*rA(i,j,bi,bj) |
./pkg/dic/dic_biotic_forcing.F |
418 |
DIC_BIOTIC_FORCING |
& fluxCO2(i,j,bi,bj)*deltaTClock |
./pkg/dic/dic_biotic_forcing.F |
432 |
DIC_BIOTIC_FORCING |
CALL DIAGNOSTICS_FILL(fluxCO2,'DICCFLX ',0,1 ,1,bi,bj,myThid) |
./pkg/dic/dic_store_fluxco2.F |
52 |
DIC_STORE_FLUXCO2 |
fluxCO2cpl(i,j,bi,bj) = fluxCO2(i,j,bi,bj) |