| File |
Line number |
Procedure |
Code |
|
./pkg/opps/opps_interface.F |
120 |
OPPS_INTERFACE |
DO itr = 3, nTracerInUse |
|
./pkg/opps/opps_interface.F |
122 |
OPPS_INTERFACE |
tracerLoc(K,itr) = ptracer(I,J,K,bi,bj,itr-2) |
|
./pkg/opps/opps_interface.F |
176 |
OPPS_INTERFACE |
DO itr = 3, nTracerInUse |
|
./pkg/opps/opps_interface.F |
178 |
OPPS_INTERFACE |
ptracer(I,J,K,bi,bj,itr-2) = tracerLoc(K,itr) |
|
./pkg/opps/opps_interface.F |
65 |
OPPS_INTERFACE |
INTEGER itr |
|
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
47 |
PTRACERS_CALC_WSURF_TR |
INTEGER i,j,bi,bj,ks,itr |
|
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
55 |
PTRACERS_CALC_WSURF_TR |
DO itr=1,PTRACERS_numInUse |
|
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
56 |
PTRACERS_CALC_WSURF_TR |
wT_Tile(bi,bj,itr) = 0. |
|
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
61 |
PTRACERS_CALC_WSURF_TR |
wT_Tile(bi,bj,itr) = wT_Tile(bi,bj,itr) |
|
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
72 |
PTRACERS_CALC_WSURF_TR |
DO itr=1,PTRACERS_numInUse |
|
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
74 |
PTRACERS_CALC_WSURF_TR |
CALL GLOBAL_SUM_TILE_RL( wT_Tile(1,1,itr), totSurfCorPTr(iTr), |