| File |
Line number |
Procedure |
Code |
|
./pkg/bling/bling_dvm.F |
288 |
BLING_DVM |
fdvmfe_vint = fdvmfe_vint + Fe_dvm(i,j,k) * drf(k) |
|
./pkg/bling/bling_dvm.F |
54 |
BLING_DVM |
_RL Fe_dvm(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/bling/bling_dvm.F |
8 |
BLING_DVM |
I N_dvm,P_dvm,Fe_dvm, |
|
./pkg/bling/bling_production.F |
188 |
BLING_PROD |
_RL Fe_dvm(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/bling/bling_production.F |
233 |
BLING_PROD |
Fe_dvm(i,j,k) = 0. _d 0 |
|
./pkg/bling/bling_production.F |
639 |
BLING_PROD |
Fe_dvm(i,j,k) = frac_exp * Fe_uptake(i,j,k) - |
|
./pkg/bling/bling_production.F |
648 |
BLING_PROD |
Fe_dvm(i,j,k) = 0 |
|
./pkg/bling/bling_production.F |
670 |
BLING_PROD |
& - Fe_spm(i,j,k) - Fe_dvm(i,j,k) |
|
./pkg/bling/bling_production.F |
694 |
BLING_PROD |
I N_dvm,P_dvm,Fe_dvm, |
|
./pkg/bling/bling_production.F |
872 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(Fe_dvm, 'BLGFEDVM',0,Nr,2,bi,bj,myThid) |