Symbol Description Uses
wlmean 8



File Line number Procedure Code
./pkg/ecco/ecco_cost.h 153 NO PROCEDURE
      _RL   wlmean(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 156 NO PROCEDURE
      _RL   wlmean
./pkg/ecco/ecco_cost.h 78 NO PROCEDURE
     &                    wlmean,
./pkg/ecco/cost_driftw.F 117 COST_DRIFTW
                wlmean(i,j,k,bi,bj) = 0.0
./pkg/ecco/cost_driftw.F 167 COST_DRIFTW
                  wlmean(i,j,k,bi,bj) = wlmean(i,j,k,bi,bj) + 
./pkg/ecco/cost_driftw.F 193 COST_DRIFTW
     &          (wlmean(i,j,k,bi,bj)/nl - wfmean(i,j,k,bi,bj)/nf)*
./pkg/ecco/cost_driftw.F 194 COST_DRIFTW
     &          (wlmean(i,j,k,bi,bj)/nl - wfmean(i,j,k,bi,bj)/nf))