Symbol Description Uses
wdiffkrFld 6



File Line number Procedure Code
./pkg/ecco/cost_diffkr.F 111 COST_DIFFKR
     &                 + wdiffkrFld(i,j,k,bi,bj)*cosphi(i,j,bi,bj)
./pkg/ecco/ecco_cost.h 1020 NO PROCEDURE
     &                      wdiffkr,wdiffkr2,wdiffkrFld,
./pkg/ecco/ecco_cost.h 1086 NO PROCEDURE
      _RL wdiffkrFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost_weights.F 183 ECCO_COST_WEIGHTS
                wdiffkrFld(i,j,k,bi,bj) = wdiffkr0
./pkg/ecco/ecco_cost_weights.F 1860 ECCO_COST_WEIGHTS
                wdiffkrFld(i,j,k,bi,bj) = wdiffkr2(i,j,k,bi,bj)
./pkg/ecco/ecco_cost_weights.F 1989 ECCO_COST_WEIGHTS
      call ACTIVE_WRITE_XYZ( 'wdiffkrFld',wdiffkrFld,