| File |
Line number |
Procedure |
Code |
|
./pkg/bling/bling_airseaflux.F |
119 |
BLING_AIRSEAFLUX |
surfphos(i,j) = PTR_PO4(i,j,1) |
|
./pkg/bling/bling_airseaflux.F |
165 |
BLING_AIRSEAFLUX |
I surfdic(i,j), surfphos(i,j), |
|
./pkg/bling/bling_airseaflux.F |
86 |
BLING_AIRSEAFLUX |
_RL surfphos (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/dic/dic_surfforcing.F |
100 |
DIC_SURFFORCING |
surfphos(i,j) = PTR_PO4(i,j,klev) |
|
./pkg/dic/dic_surfforcing.F |
106 |
DIC_SURFFORCING |
surfphos(i,j) = 5.1225 _d -4 * maskC(i,j,kLev,bi,bj) |
|
./pkg/dic/dic_surfforcing.F |
161 |
DIC_SURFFORCING |
I surfdic(i,j), surfphos(i,j), |
|
./pkg/dic/dic_surfforcing.F |
58 |
DIC_SURFFORCING |
_RL surfphos(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/dic/dic_surfforcing.F |
94 |
DIC_SURFFORCING |
surfphos(i,j) = max(1.0 _d -11, |
|
./pkg/dic/dic_surfforcing_init.F |
177 |
DIC_SURFFORCING_INIT |
surfphos(i,j) = max(1.0 _d -11, |
|
./pkg/dic/dic_surfforcing_init.F |
183 |
DIC_SURFFORCING_INIT |
surfphos(i,j)= PTRACER(i,j,kLev,bi,bj,3) |
|
./pkg/dic/dic_surfforcing_init.F |
189 |
DIC_SURFFORCING_INIT |
surfphos(i,j)= 5.1225 _d -4 * maskC(i,j,kLev,bi,bj) |
|
./pkg/dic/dic_surfforcing_init.F |
231 |
DIC_SURFFORCING_INIT |
I surfdic(i,j), surfphos(i,j), |
|
./pkg/dic/dic_surfforcing_init.F |
251 |
DIC_SURFFORCING_INIT |
& surfdic(iprt,jprt), surfphos(iprt,jprt), |
|
./pkg/dic/dic_surfforcing_init.F |
46 |
DIC_SURFFORCING_INIT |
_RL surfphos(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |