| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/OBCS_PARAMS.h |
135 |
NO PROCEDURE |
& OBCS_balanceFacN, OBCS_balanceFacS, |
|
./pkg/obcs/OBCS_PARAMS.h |
143 |
NO PROCEDURE |
_RL OBCS_balanceFacN, OBCS_balanceFacS |
|
./pkg/obcs/obcs_balance_flow.F |
236 |
OBCS_BALANCE_FLOW |
flag = flag .OR. ( OBCS_balanceFacS.GT.0. ) |
|
./pkg/obcs/obcs_balance_flow.F |
255 |
OBCS_BALANCE_FLOW |
IF ( OBCS_balanceFacS.GE.0. ) THEN |
|
./pkg/obcs/obcs_balance_flow.F |
258 |
OBCS_BALANCE_FLOW |
& + tileArea(bi,bj)*OBCS_balanceFacS |
|
./pkg/obcs/obcs_balance_flow.F |
267 |
OBCS_BALANCE_FLOW |
IF ( OBCS_balanceFacS.LT.0. ) THEN |
|
./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 |
379 |
OBCS_BALANCE_FLOW |
IF ( OBCS_balanceFacS.NE.0. ) THEN |
|
./pkg/obcs/obcs_check.F |
77 |
OBCS_CHECK |
CALL WRITE_0D_RL( OBCS_balanceFacS, INDEX_NONE, |
|
./pkg/obcs/obcs_readparms.F |
172 |
OBCS_READPARMS |
& OBCS_balanceFacN, OBCS_balanceFacS, |
|
./pkg/obcs/obcs_readparms.F |
274 |
OBCS_READPARMS |
OBCS_balanceFacS = 1. _d 0 |