| File |
Line number |
Procedure |
Code |
|
./pkg/dic/car_flux.F |
37 |
CAR_FLUX |
_RL cflux(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/dic/car_flux.F |
83 |
CAR_FLUX |
cflux(i,j,ko)=cflux(i,j,ko) + |
|
./pkg/dic/car_flux.F |
87 |
CAR_FLUX |
if (ko.eq.k+1) cflux(i,j,k)=cflux(i,j,k) |
|
./pkg/dic/car_flux.F |
8 |
CAR_FLUX |
SUBROUTINE CAR_FLUX( bioac, cflux, |
|
./pkg/dic/dic_biotic_forcing.F |
108 |
DIC_BIOTIC_FORCING |
cflux(i,j,k)=0.d0 |
|
./pkg/dic/dic_biotic_forcing.F |
154 |
DIC_BIOTIC_FORCING |
CALL CAR_FLUX( bioac, cflux, |
|
./pkg/dic/dic_biotic_forcing.F |
165 |
DIC_BIOTIC_FORCING |
& (1.0-DOPfraction)+cflux(i,j,k) |
|
./pkg/dic/dic_biotic_forcing.F |
86 |
DIC_BIOTIC_FORCING |
_RL cflux(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |