| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/obcs_balance_flow.F |
186 |
OBCS_BALANCE_FLOW |
flowN = 0. _d 0 |
|
./pkg/obcs/obcs_balance_flow.F |
212 |
OBCS_BALANCE_FLOW |
flowN = flowN + tileFlow(bi,bj) |
|
./pkg/obcs/obcs_balance_flow.F |
221 |
OBCS_BALANCE_FLOW |
CALL GLOBAL_SUM_TILE_RL( tileFlow, flowN, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
224 |
OBCS_BALANCE_FLOW |
& myIter, ' ) correct OBNv:', flowN, -flowN/areaN |
|
./pkg/obcs/obcs_balance_flow.F |
228 |
OBCS_BALANCE_FLOW |
flowN = -flowN/areaN |
|
./pkg/obcs/obcs_balance_flow.F |
299 |
OBCS_BALANCE_FLOW |
IF ( OBCS_balanceFacN.GE.0. ) flowN = inFlow*OBCS_balanceFacN |
|
./pkg/obcs/obcs_balance_flow.F |
308 |
OBCS_BALANCE_FLOW |
& 'OBCS_balance correction to OBNv,OBSv:', flowN, flowS |
|
./pkg/obcs/obcs_balance_flow.F |
368 |
OBCS_BALANCE_FLOW |
& + flowN*maskS(i,jB,k,bi,bj) |
|
./pkg/obcs/obcs_balance_flow.F |
51 |
OBCS_BALANCE_FLOW |
_RL inFlow, flowE, flowW, flowN, flowS |
|
./pkg/obcs/obcs_diag_balance.F |
193 |
OBCS_DIAG_BALANCE |
flowN = 0. _d 0 |
|
./pkg/obcs/obcs_diag_balance.F |
215 |
OBCS_DIAG_BALANCE |
flowN = flowN + tileFlow(bi,bj) |
|
./pkg/obcs/obcs_diag_balance.F |
224 |
OBCS_DIAG_BALANCE |
CALL GLOBAL_SUM_TILE_RL( tileFlow, flowN, myThid ) |
|
./pkg/obcs/obcs_diag_balance.F |
227 |
OBCS_DIAG_BALANCE |
& myIter, ' ) correct OBNv:', flowN, -flowN/areaN |
|
./pkg/obcs/obcs_diag_balance.F |
231 |
OBCS_DIAG_BALANCE |
flowN = -flowN/areaN |
|
./pkg/obcs/obcs_diag_balance.F |
299 |
OBCS_DIAG_BALANCE |
IF ( OBCS_balanceFacN.GE.0. ) flowN = inFlow*OBCS_balanceFacN |
|
./pkg/obcs/obcs_diag_balance.F |
308 |
OBCS_DIAG_BALANCE |
& 'OBCS_DIAG_balance correction to vTrans:', flowN, flowS |
|
./pkg/obcs/obcs_diag_balance.F |
363 |
OBCS_DIAG_BALANCE |
& + flowN*drF(k)*hFacS(i,jB,k,bi,bj) |
|
./pkg/obcs/obcs_diag_balance.F |
65 |
OBCS_DIAG_BALANCE |
_RL inFlow, flowE, flowW, flowN, flowS |