| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/obcs_balance_flow.F |
235 |
OBCS_BALANCE_FLOW |
flowS = 0. _d 0 |
|
./pkg/obcs/obcs_balance_flow.F |
261 |
OBCS_BALANCE_FLOW |
flowS = flowS + tileFlow(bi,bj) |
|
./pkg/obcs/obcs_balance_flow.F |
270 |
OBCS_BALANCE_FLOW |
CALL GLOBAL_SUM_TILE_RL( tileFlow, flowS, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
273 |
OBCS_BALANCE_FLOW |
& myIter, ' ) correct OBSv:', flowS, -flowS/areaS |
|
./pkg/obcs/obcs_balance_flow.F |
277 |
OBCS_BALANCE_FLOW |
flowS = -flowS/areaS |
|
./pkg/obcs/obcs_balance_flow.F |
300 |
OBCS_BALANCE_FLOW |
IF ( OBCS_balanceFacS.GE.0. ) flowS = -inFlow*OBCS_balanceFacS |
|
./pkg/obcs/obcs_balance_flow.F |
308 |
OBCS_BALANCE_FLOW |
& 'OBCS_balance correction to OBNv,OBSv:', flowN, flowS |
|
./pkg/obcs/obcs_balance_flow.F |
388 |
OBCS_BALANCE_FLOW |
& + flowS*maskS(i,1+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 |
238 |
OBCS_DIAG_BALANCE |
flowS = 0. _d 0 |
|
./pkg/obcs/obcs_diag_balance.F |
261 |
OBCS_DIAG_BALANCE |
flowS = flowS + tileFlow(bi,bj) |
|
./pkg/obcs/obcs_diag_balance.F |
270 |
OBCS_DIAG_BALANCE |
CALL GLOBAL_SUM_TILE_RL( tileFlow, flowS, myThid ) |
|
./pkg/obcs/obcs_diag_balance.F |
273 |
OBCS_DIAG_BALANCE |
& myIter, ' ) correct OBSv:', flowS, -flowS/areaS |
|
./pkg/obcs/obcs_diag_balance.F |
277 |
OBCS_DIAG_BALANCE |
flowS = -flowS/areaS |
|
./pkg/obcs/obcs_diag_balance.F |
300 |
OBCS_DIAG_BALANCE |
IF ( OBCS_balanceFacS.GE.0. ) flowS = -inFlow*OBCS_balanceFacS |
|
./pkg/obcs/obcs_diag_balance.F |
308 |
OBCS_DIAG_BALANCE |
& 'OBCS_DIAG_balance correction to vTrans:', flowN, flowS |
|
./pkg/obcs/obcs_diag_balance.F |
382 |
OBCS_DIAG_BALANCE |
& + flowS*drF(k)*hFacS(i,jB,k,bi,bj) |
|
./pkg/obcs/obcs_diag_balance.F |
65 |
OBCS_DIAG_BALANCE |
_RL inFlow, flowE, flowW, flowN, flowS |