Symbol Description Uses
areaN 8



File Line number Procedure Code
./pkg/obcs/obcs_balance_flow.F 185 OBCS_BALANCE_FLOW
      areaN = 0. _d 0
./pkg/obcs/obcs_balance_flow.F 211 OBCS_BALANCE_FLOW
         areaN = areaN + tileArea(bi,bj)
./pkg/obcs/obcs_balance_flow.F 219 OBCS_BALANCE_FLOW
        CALL GLOBAL_SUM_TILE_RL( tileArea, areaN, myThid )
./pkg/obcs/obcs_balance_flow.F 220 OBCS_BALANCE_FLOW
        IF ( areaN.GT.0. ) THEN
./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 50 OBCS_BALANCE_FLOW
      _RL areaOB, areaE, areaW, areaN, areaS, tmpA