File |
Line number |
Procedure |
Code |
./pkg/dic/dic_biotic_forcing.F |
101 |
DIC_BIOTIC_FORCING |
_RL freefe(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
./pkg/dic/dic_biotic_forcing.F |
198 |
DIC_BIOTIC_FORCING |
O freefe, |
./pkg/dic/dic_biotic_forcing.F |
300 |
DIC_BIOTIC_FORCING |
& -Kscav*freefe(i,j,k) |
./pkg/dic/dic_biotic_forcing.F |
379 |
DIC_BIOTIC_FORCING |
O freefe, |
./pkg/dic/fe_chem.F |
100 |
FE_CHEM |
freefe(i,j,k) = |
./pkg/dic/fe_chem.F |
105 |
FE_CHEM |
freefe(i,j,k) = MIN(freefe(i,j,k),freefemax) |
./pkg/dic/fe_chem.F |
107 |
FE_CHEM |
fe(i,j,k) = FeL+freefe(i,j,k) |
./pkg/dic/fe_chem.F |
12 |
FE_CHEM |
O freefe, |
./pkg/dic/fe_chem.F |
40 |
FE_CHEM |
_RL freefe(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
./pkg/dic/fe_chem.F |
62 |
FE_CHEM |
freefe(i,j,k) = 0. _d 0 |
./pkg/dic/fe_chem.F |
91 |
FE_CHEM |
freefe(i,j,k) = tmpfe -FeL |
./pkg/dic/fe_chem.F |
93 |
FE_CHEM |
freefe(i,j,k) = 0. _d 0 |
./pkg/dic/fe_chem.F |
97 |
FE_CHEM |
thx=freefe(i,j,k) |