| File |
Line number |
Procedure |
Code |
|
./pkg/bling/bling_production.F |
147 |
BLING_PROD |
_RL Phy_lg_local(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/bling/bling_production.F |
280 |
BLING_PROD |
Phy_lg_local(i,j,k) = PTR_PHY(i,j,k)*phyto_lg(i,j,k,bi,bj) |
|
./pkg/bling/bling_production.F |
284 |
BLING_PROD |
Phy_lg_local(i,j,k) = phyto_lg(i,j,k,bi,bj) |
|
./pkg/bling/bling_production.F |
331 |
BLING_PROD |
tmp_p_lg_ML = tmp_p_lg_ML+Phy_lg_local(i,j,k)*drF(k) |
|
./pkg/bling/bling_production.F |
347 |
BLING_PROD |
Phy_lg_local(i,j,k) = max(1. _d -8,tmp_p_lg_ML/tmp_ML) |
|
./pkg/bling/bling_production.F |
500 |
BLING_PROD |
& + Phy_lg_local(i,j,k)) |
|
./pkg/bling/bling_production.F |
531 |
BLING_PROD |
Phy_lg_local(i,j,k) = Phy_lg_local(i,j,k) + |
|
./pkg/bling/bling_production.F |
532 |
BLING_PROD |
& Phy_lg_local(i,j,k)*(mu(i,j,k) - lambda_0 |
|
./pkg/bling/bling_production.F |
534 |
BLING_PROD |
& (Phy_lg_local(i,j,k)/pivotal)**(1. / 3.)) |
|
./pkg/bling/bling_production.F |
565 |
BLING_PROD |
PTR_PHY(i,j,k) = Phy_lg_local(i,j,k) + Phy_sm_local(i,j,k) |
|
./pkg/bling/bling_production.F |
568 |
BLING_PROD |
phyto_lg(i,j,k,bi,bj) = Phy_lg_local(i,j,k)/PTR_PHY(i,j,k) |
|
./pkg/bling/bling_production.F |
573 |
BLING_PROD |
phyto_lg(i,j,k,bi,bj) = Phy_lg_local(i,j,k) |
|
./pkg/bling/bling_production.F |
583 |
BLING_PROD |
& (Phy_lg_local(i,j,k) + Phy_sm_local(i,j,k) |
|
./pkg/bling/bling_production.F |
829 |
BLING_PROD |
Phy_lg_local(i,j,k) = Phy_lg_local(i,j,k) * CtoN |
|
./pkg/bling/bling_production.F |
835 |
BLING_PROD |
poc(i,j,k,bi,bj) = (Phy_lg_local(i,j,k) + Phy_sm_local(i,j,k) + |
|
./pkg/bling/bling_production.F |
853 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(Phy_lg_local,'BLGPLG ',0,Nr,1,bi,bj, |