Symbol Description Uses
wrunoff 20



File Line number Procedure Code
./pkg/ecco/ecco_cost_weights.F 147 ECCO_COST_WEIGHTS
              wrunoff (i,j,bi,bj) = 0. _d 0
./pkg/ecco/ecco_cost_weights.F 1488 ECCO_COST_WEIGHTS
     &      nnz, wrunoff, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 1496 ECCO_COST_WEIGHTS
              if (wrunoff(i,j,bi,bj) .lt. -9900.) then
./pkg/ecco/ecco_cost_weights.F 1497 ECCO_COST_WEIGHTS
                wrunoff(i,j,bi,bj) = 0. _d 0
./pkg/ecco/ecco_cost_weights.F 1500 ECCO_COST_WEIGHTS
              wrunoff(i,j,bi,bj) = wrunoff(i,j,bi,bj)
./pkg/ecco/ecco_cost_weights.F 1501 ECCO_COST_WEIGHTS
              wrunoff(i,j,bi,bj) = max(wrunoff(i,j,bi,bj),wrunoff0)
./pkg/ecco/ecco_cost_weights.F 1852 ECCO_COST_WEIGHTS
              if (wrunoff(i,j,bi,bj) .ne. 0.) then
./pkg/ecco/ecco_cost_weights.F 1853 ECCO_COST_WEIGHTS
                wrunoff(i,j,bi,bj) =
./pkg/ecco/ecco_cost_weights.F 1854 ECCO_COST_WEIGHTS
     &                1./wrunoff(i,j,bi,bj)/wrunoff(i,j,bi,bj)
./pkg/ecco/ecco_cost_weights.F 1856 ECCO_COST_WEIGHTS
                wrunoff(i,j,bi,bj) = 0.0 _d 0
./pkg/ecco/ecco_cost_weights.F 2088 ECCO_COST_WEIGHTS
      call ACTIVE_WRITE_XY_LOC( 'wrunoff', wrunoff, 1, 0, mythid, dummy)
./pkg/ctrl/ctrl.h 267 NO PROCEDURE
     &                      wrunoff,
./pkg/ctrl/ctrl.h 286 NO PROCEDURE
      _RL wrunoff (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
./pkg/ctrl/ctrl_init.F 969 CTRL_INIT
          wrunoff   (i,j,bi,bj) = maskC(i,j,1,bi,bj)
./pkg/ecco/cost_forcing.F 404 COST_FORCING
     &     wrunoff, dodimensionalcost2D,
./pkg/ecco/ecco_cost.h 1026 NO PROCEDURE
      _RL wrunoff (1-olx:snx+olx,1-oly:sny+oly,   nsx,nsy)
./pkg/ecco/ecco_cost.h 980 NO PROCEDURE
     &                      wevap,wapressure,wrunoff,