File |
Line number |
Procedure |
Code |
./pkg/bling/bling_production.F |
152 |
BLING_PROD |
_RL Fe_lim(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
./pkg/bling/bling_production.F |
244 |
BLING_PROD |
Fe_lim(i,j,k) = 0. _d 0 |
./pkg/bling/bling_production.F |
408 |
BLING_PROD |
Fe_lim(i,j,k) = PTR_FE(i,j,k) |
./pkg/bling/bling_production.F |
427 |
BLING_PROD |
& * min(NO3_lim(i,j,k), PO4_lim(i,j,k), Fe_lim(i,j,k)) |
./pkg/bling/bling_production.F |
450 |
BLING_PROD |
& (theta_Fe_max_hi-theta_Fe_max_lo)*Fe_lim(i,j,k) |
./pkg/bling/bling_production.F |
865 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(Fe_lim, 'BLGFELIM',0,Nr,2,bi,bj,myThid) |