| File |
Line number |
Procedure |
Code |
|
./pkg/dic/dic_biotic_forcing.F |
117 |
DIC_BIOTIC_FORCING |
BIOac(i,j,k) =0. _d 0 |
|
./pkg/dic/dic_biotic_forcing.F |
170 |
DIC_BIOTIC_FORCING |
I BIOac, |
|
./pkg/dic/dic_biotic_forcing.F |
175 |
DIC_BIOTIC_FORCING |
CALL PHOS_FLUX( BIOac, pflux, exportflux, |
|
./pkg/dic/dic_biotic_forcing.F |
183 |
DIC_BIOTIC_FORCING |
CAR_S(i,j,k)=BIOac(i,j,k)*R_CP*rain_ratio(i,j,bi,bj)* |
|
./pkg/dic/dic_biotic_forcing.F |
201 |
DIC_BIOTIC_FORCING |
CALL CAR_FLUX_OMEGA_TOP( BIOac, cflux, |
|
./pkg/dic/dic_biotic_forcing.F |
221 |
DIC_BIOTIC_FORCING |
GPO4(i,j,k)=-BIOac(i,j,k)+pflux(i,j,k) + RDOP(i,j,k) |
|
./pkg/dic/dic_biotic_forcing.F |
225 |
DIC_BIOTIC_FORCING |
GDOP(i,j,k)=+BIOac(i,j,k)*DOPfraction - RDOP(i,j,k) |
|
./pkg/dic/dic_biotic_forcing.F |
302 |
DIC_BIOTIC_FORCING |
& BIOac(i,j,k)*deltaTClock |
|
./pkg/dic/dic_biotic_forcing.F |
342 |
DIC_BIOTIC_FORCING |
CALL DIAGNOSTICS_FILL(BIOac ,'DICBIOA ',0,Nr,2,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
89 |
DIC_BIOTIC_FORCING |
_RL BIOac(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/dic/phos_flux.F |
10 |
PHOS_FLUX |
SUBROUTINE PHOS_FLUX( BIOac, pflux, exportflux, |
|
./pkg/dic/phos_flux.F |
34 |
PHOS_FLUX |
_RL BIOac(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/dic/phos_flux.F |
71 |
PHOS_FLUX |
pflux(i,j,k)=pflux(i,j,k)+BIOac(i,j,k)*(1. _d 0-DOPfraction) |
|
./pkg/dic/phos_flux.F |
73 |
PHOS_FLUX |
pflux(i,j,k)=pflux(i,j,k)+BIOac(i,j,k)*(1. _d 0-DOPfraction) |
|
./pkg/dic/phos_flux.F |
76 |
PHOS_FLUX |
bexport(i,j)=BIOac(i,j,k)*(1. _d 0-DOPfraction) |