| File |
Line number |
Procedure |
Code |
|
./pkg/bling/bling_production.F |
177 |
BLING_PROD |
_RL DON_prod(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/bling/bling_production.F |
235 |
BLING_PROD |
DON_prod(i,j,k) = 0. _d 0 |
|
./pkg/bling/bling_production.F |
654 |
BLING_PROD |
DON_prod(i,j,k) = phi_DOM2d(i,j,bi,bj)*(N_uptake(i,j,k) |
|
./pkg/bling/bling_production.F |
662 |
BLING_PROD |
& - N_spm(i,j,k) - DON_prod(i,j,k) |
|
./pkg/bling/bling_production.F |
779 |
BLING_PROD |
G_DON(i,j,k) = DON_prod(i,j,k) + phi_DOM2d(i,j,bi,bj) |
|
./pkg/bling/bling_production.F |
885 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(DON_prod, 'BLGDONP ',0,Nr,2,bi,bj,myThid) |