| File |
Line number |
Procedure |
Code |
|
./pkg/bling/bling_production.F |
174 |
BLING_PROD |
_RL Fe_uptake(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/bling/bling_production.F |
230 |
BLING_PROD |
Fe_uptake(i,j,k) = 0. _d 0 |
|
./pkg/bling/bling_production.F |
507 |
BLING_PROD |
Fe_uptake(i,j,k) = (N_uptake(i,j,k) + |
|
./pkg/bling/bling_production.F |
631 |
BLING_PROD |
& Fe_uptake(i,j,k) |
|
./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 |
644 |
BLING_PROD |
Fe_spm(i,j,k) = frac_exp * Fe_uptake(i,j,k) |
|
./pkg/bling/bling_production.F |
669 |
BLING_PROD |
Fe_recycle(i,j,k) = Fe_uptake(i,j,k) |
|
./pkg/bling/bling_production.F |
773 |
BLING_PROD |
G_FE(i,j,k) = -Fe_uptake(i,j,k) + Fe_reminsum(i,j,k) |
|
./pkg/bling/bling_production.F |
878 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(Fe_uptake,'BLGFEUP ',0,Nr,2,bi,bj,myThid) |