| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/obcs_balance_flow.F |
109 |
OBCS_BALANCE_FLOW |
tileInFlow(bi,bj) = tileInFlow(bi,bj) - tileFlow(bi,bj) |
|
./pkg/obcs/obcs_balance_flow.F |
158 |
OBCS_BALANCE_FLOW |
tileInFlow(bi,bj) = tileInFlow(bi,bj) + tileFlow(bi,bj) |
|
./pkg/obcs/obcs_balance_flow.F |
207 |
OBCS_BALANCE_FLOW |
tileInFlow(bi,bj) = tileInFlow(bi,bj) - tileFlow(bi,bj) |
|
./pkg/obcs/obcs_balance_flow.F |
256 |
OBCS_BALANCE_FLOW |
tileInFlow(bi,bj) = tileInFlow(bi,bj) + tileFlow(bi,bj) |
|
./pkg/obcs/obcs_balance_flow.F |
288 |
OBCS_BALANCE_FLOW |
CALL GLOBAL_SUM_TILE_RL( tileInFlow, inFlow, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
55 |
OBCS_BALANCE_FLOW |
_RL tileInFlow(nSx,nSy) |
|
./pkg/obcs/obcs_balance_flow.F |
82 |
OBCS_BALANCE_FLOW |
tileInFlow(bi,bj) = 0. |
|
./pkg/obcs/obcs_diag_balance.F |
100 |
OBCS_DIAG_BALANCE |
tileInFlow(bi,bj,n) = tileInFlow(bi,bj,n) |
|
./pkg/obcs/obcs_diag_balance.F |
123 |
OBCS_DIAG_BALANCE |
tileInFlow(bi,bj,n) = tileInFlow(bi,bj,n) |
|
./pkg/obcs/obcs_diag_balance.F |
145 |
OBCS_DIAG_BALANCE |
tileInFlow(bi,bj,n) = tileInFlow(bi,bj,n) |
|
./pkg/obcs/obcs_diag_balance.F |
168 |
OBCS_DIAG_BALANCE |
tileInFlow(bi,bj,n) = tileInFlow(bi,bj,n) |
|
./pkg/obcs/obcs_diag_balance.F |
185 |
OBCS_DIAG_BALANCE |
CALL GLOBAL_SUM_TILE_RL( tileInFlow(1,1,n), inFlow(n), myThid ) |
|
./pkg/obcs/obcs_diag_balance.F |
68 |
OBCS_DIAG_BALANCE |
_RL tileInFlow(nSx,nSy,OBCS_maxConnect) |
|
./pkg/obcs/obcs_diag_balance.F |
83 |
OBCS_DIAG_BALANCE |
tileInFlow(bi,bj,n) = 0. |