File |
Line number |
Procedure |
Code |
./pkg/obcs/obcs_balance_flow.F |
110 |
OBCS_BALANCE_FLOW |
tileAreaOB(bi,bj) = tileAreaOB(bi,bj) |
./pkg/obcs/obcs_balance_flow.F |
159 |
OBCS_BALANCE_FLOW |
tileAreaOB(bi,bj) = tileAreaOB(bi,bj) |
./pkg/obcs/obcs_balance_flow.F |
208 |
OBCS_BALANCE_FLOW |
tileAreaOB(bi,bj) = tileAreaOB(bi,bj) |
./pkg/obcs/obcs_balance_flow.F |
257 |
OBCS_BALANCE_FLOW |
tileAreaOB(bi,bj) = tileAreaOB(bi,bj) |
./pkg/obcs/obcs_balance_flow.F |
286 |
OBCS_BALANCE_FLOW |
IF ( flag ) CALL GLOBAL_SUM_TILE_RL( tileAreaOB, areaOB, myThid ) |
./pkg/obcs/obcs_balance_flow.F |
54 |
OBCS_BALANCE_FLOW |
_RL tileAreaOB(nSx,nSy) |
./pkg/obcs/obcs_balance_flow.F |
81 |
OBCS_BALANCE_FLOW |
tileAreaOB(bi,bj) = 0. |
./pkg/obcs/obcs_diag_balance.F |
122 |
OBCS_DIAG_BALANCE |
tileAreaOB(bi,bj,n) = tileAreaOB(bi,bj,n) + tmpA |
./pkg/obcs/obcs_diag_balance.F |
144 |
OBCS_DIAG_BALANCE |
tileAreaOB(bi,bj,n) = tileAreaOB(bi,bj,n) + tmpA |
./pkg/obcs/obcs_diag_balance.F |
167 |
OBCS_DIAG_BALANCE |
tileAreaOB(bi,bj,n) = tileAreaOB(bi,bj,n) + tmpA |
./pkg/obcs/obcs_diag_balance.F |
183 |
OBCS_DIAG_BALANCE |
CALL GLOBAL_SUM_TILE_RL( tileAreaOB(1,1,n), areaOB(n), myThid ) |
./pkg/obcs/obcs_diag_balance.F |
67 |
OBCS_DIAG_BALANCE |
_RL tileAreaOB(nSx,nSy,OBCS_maxConnect) |
./pkg/obcs/obcs_diag_balance.F |
82 |
OBCS_DIAG_BALANCE |
tileAreaOB(bi,bj,n) = 0. |
./pkg/obcs/obcs_diag_balance.F |
99 |
OBCS_DIAG_BALANCE |
tileAreaOB(bi,bj,n) = tileAreaOB(bi,bj,n) + tmpA |