| File |
Line number |
Procedure |
Code |
|
./pkg/bling/bling_airseaflux.F |
59 |
BLING_AIRSEAFLUX |
_RL PTR_NO3(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/bling/bling_airseaflux.F |
9 |
BLING_AIRSEAFLUX |
I PTR_DIC, PTR_ALK, PTR_O2, PTR_NO3, PTR_PO4, |
|
./pkg/bling/bling_main.F |
145 |
BLING_MAIN |
I PTR_NO3, PTR_PO4, |
|
./pkg/bling/bling_main.F |
163 |
BLING_MAIN |
I PTR_NO3, PTR_PO4, PTR_FE, |
|
./pkg/bling/bling_main.F |
254 |
BLING_MAIN |
PTR_NO3(i,j,k)=PTR_NO3(i,j,k)+G_NO3(i,j,k)*PTRACERS_dTLev(k) |
|
./pkg/bling/bling_main.F |
66 |
BLING_MAIN |
_RL PTR_NO3(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/bling/bling_main.F |
7 |
BLING_MAIN |
subroutine BLING_MAIN( PTR_DIC, PTR_ALK, PTR_O2, PTR_NO3, |
|
./pkg/bling/bling_production.F |
265 |
BLING_PROD |
CALL BLING_MIN_VAL( PTR_NO3, 1. _d -7 ,bi ,bj) |
|
./pkg/bling/bling_production.F |
402 |
BLING_PROD |
NO3_lim(i,j,k) = PTR_NO3(i,j,k)/(PTR_NO3(i,j,k)+k_NO3) |
|
./pkg/bling/bling_production.F |
682 |
BLING_PROD |
I PTR_NO3, PTR_FE, PTR_O2, irr_inst, |
|
./pkg/bling/bling_production.F |
68 |
BLING_PROD |
_RL PTR_NO3(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/bling/bling_production.F |
728 |
BLING_PROD |
IF (PTR_NO3(i,j,k) .gt. oxic_min) THEN |
|
./pkg/bling/bling_production.F |
805 |
BLING_PROD |
ELSEIF (PTR_NO3(i,j,k) .lt. oxic_min) THEN |
|
./pkg/bling/bling_production.F |
8 |
BLING_PROD |
I PTR_NO3, PTR_PO4, PTR_FE, |
|
./pkg/bling/bling_remineralization.F |
256 |
BLING_REMIN |
& PTR_NO3(i,j,k) / (k_no3 + PTR_NO3(i,j,k)) ) * |
|
./pkg/bling/bling_remineralization.F |
56 |
BLING_REMIN |
_RL PTR_NO3(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/bling/bling_remineralization.F |
8 |
BLING_REMIN |
I PTR_NO3, PTR_FE, PTR_O2, irr_inst, |