Symbol Description Uses
wsfluxmm 17



File Line number Procedure Code
./verification/global1x1_tot/code/ecco_cost_weights.F 1091 ECCO_COST_WEIGHTS
              if (wsfluxmm(bi,bj).ne.0.)
./verification/global1x1_tot/code/ecco_cost_weights.F 1092 ECCO_COST_WEIGHTS
     &             wsfluxmm(bi,bj) = 1./wsfluxmm(bi,bj)*wsfluxmm(bi,bj)
./verification/global1x1_tot/code/ecco_cost_weights.F 273 ECCO_COST_WEIGHTS
          wsfluxmm(bi,bj) = 1.
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 1084 ECCO_COST_WEIGHTS
              if (wsfluxmm(bi,bj).ne.0.) 
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 1085 ECCO_COST_WEIGHTS
     &             wsfluxmm(bi,bj) = 1./wsfluxmm(bi,bj)*wsfluxmm(bi,bj)
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 271 ECCO_COST_WEIGHTS
          wsfluxmm(bi,bj) = 1.
./pkg/ecco/ecco_cost.h 1030 NO PROCEDURE
     &                      whfluxmm,wsfluxmm,
./pkg/ecco/ecco_cost.h 1041 NO PROCEDURE
      _RL wsfluxmm(1-olx:snx+olx,1-oly:sny+oly)
./pkg/ecco/ecco_cost_weights.F 1737 ECCO_COST_WEIGHTS
              if (wsfluxmm(bi,bj).ne.0.)
./pkg/ecco/ecco_cost_weights.F 1738 ECCO_COST_WEIGHTS
     &             wsfluxmm(bi,bj) = 1./wsfluxmm(bi,bj)*wsfluxmm(bi,bj)
./pkg/ecco/ecco_cost_weights.F 287 ECCO_COST_WEIGHTS
          wsfluxmm(bi,bj) = 1.