| File |
Line number |
Procedure |
Code |
|
./pkg/dic/dic_biotic_forcing.F |
100 |
DIC_BIOTIC_FORCING |
_RL freefe(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/dic/dic_biotic_forcing.F |
160 |
DIC_BIOTIC_FORCING |
CALL FE_CHEM( bi,bj,iMin,iMax,jMin,jMax, PTR_FE, freefe, |
|
./pkg/dic/dic_biotic_forcing.F |
240 |
DIC_BIOTIC_FORCING |
& -Kscav*freefe(i,j,k) |
|
./pkg/dic/dic_biotic_forcing.F |
289 |
DIC_BIOTIC_FORCING |
CALL FE_CHEM( bi,bj,iMin,iMax,jMin,jMax, PTR_FE, 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) |