| File |
Line number |
Procedure |
Code |
|
./pkg/land/land_impl_temp.F |
150 |
LAND_IMPL_TEMP |
dBug = bi.eq.lprt .AND. i.EQ.iprt .AND. j.EQ.jprt |
|
./pkg/land/land_impl_temp.F |
93 |
LAND_IMPL_TEMP |
INTEGER iprt,jprt,lprt |
|
./pkg/land/land_impl_temp.F |
94 |
LAND_IMPL_TEMP |
DATA iprt, jprt , lprt / 19 , 20 , 6 / |
|
./pkg/land/land_stepfwd.F |
163 |
LAND_STEPFWD |
dBug = bi.eq.lprt .AND. i.EQ.iprt .AND. j.EQ.jprt |
|
./pkg/land/land_stepfwd.F |
184 |
LAND_STEPFWD |
dBug = bi.eq.lprt .AND. i.EQ.iprt .AND. j.EQ.jprt |
|
./pkg/land/land_stepfwd.F |
285 |
LAND_STEPFWD |
dBug = bi.eq.lprt .AND. i.EQ.iprt .AND. j.EQ.jprt |
|
./pkg/land/land_stepfwd.F |
85 |
LAND_STEPFWD |
INTEGER iprt,jprt,lprt |
|
./pkg/land/land_stepfwd.F |
86 |
LAND_STEPFWD |
DATA iprt, jprt , lprt / 19 , 20 , 6 / |
|
./pkg/bling/bling_carbonate_init.F |
50 |
BLING_CARBONATE_INIT |
INTEGER iprt,jprt |
|
./pkg/dic/dic_surfforcing_init.F |
247 |
DIC_SURFFORCING_INIT |
jprt = MIN(20,sNy) |
|
./pkg/dic/dic_surfforcing_init.F |
249 |
DIC_SURFFORCING_INIT |
& pH(iprt,jprt,bi,bj), |
|
./pkg/dic/dic_surfforcing_init.F |
250 |
DIC_SURFFORCING_INIT |
& theta(iprt,jprt,1,bi,bj), salt(iprt,jprt,1,bi,bj), |
|
./pkg/dic/dic_surfforcing_init.F |
251 |
DIC_SURFFORCING_INIT |
& surfdic(iprt,jprt), surfphos(iprt,jprt), |
|
./pkg/dic/dic_surfforcing_init.F |
252 |
DIC_SURFFORCING_INIT |
& surfsi(iprt,jprt),surfalk(iprt,jprt) |
|
./pkg/dic/dic_surfforcing_init.F |
51 |
DIC_SURFFORCING_INIT |
INTEGER iprt,jprt |