Symbol Description Uses
areaE 8



File Line number Procedure Code
./pkg/obcs/obcs_balance_flow.F 113 OBCS_BALANCE_FLOW
         areaE = areaE + tileArea(bi,bj)
./pkg/obcs/obcs_balance_flow.F 121 OBCS_BALANCE_FLOW
        CALL GLOBAL_SUM_TILE_RL( tileArea, areaE, myThid )
./pkg/obcs/obcs_balance_flow.F 122 OBCS_BALANCE_FLOW
        IF ( areaE.GT.0. ) THEN
./pkg/obcs/obcs_balance_flow.F 126 OBCS_BALANCE_FLOW
     &            myIter, ' ) correct OBEu:', flowE, -flowE/areaE
./pkg/obcs/obcs_balance_flow.F 130 OBCS_BALANCE_FLOW
          flowE = -flowE/areaE
./pkg/obcs/obcs_balance_flow.F 50 OBCS_BALANCE_FLOW
      _RL areaOB, areaE, areaW, areaN, areaS, tmpA
./pkg/obcs/obcs_balance_flow.F 87 OBCS_BALANCE_FLOW
      areaE = 0. _d 0