Symbol Description Uses
wobcse 20



File Line number Procedure Code
./pkg/admtlm/admtlm_dsvd2model.F 455 ADMTLM_DSVD2MODEL
     &         weighttype, wobcse, nWetobcseGlo, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 368 ADMTLM_MODEL2DSVD
     &         weighttype, wobcse, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 420 CTRL_PACK
     &         weighttype, wobcse, lxxadxx, mythid)
./pkg/ctrl/ctrl_unpack.F 516 CTRL_UNPACK
     &         weighttype, wobcse, nWetobcseGlo, mythid)
./pkg/ctrl/ctrl_weights.h 43 NO PROCEDURE
     &                      wobcse, wobcseLev
./pkg/ctrl/ctrl_weights.h 44 NO PROCEDURE
      _RL wobcse     (                      nr,nobcs)
./pkg/ecco/cost_obcse.F 175 COST_OBCSE
                  fctile = fctile + wobcse(k,iobcs)
./pkg/ecco/cost_obcse.F 179 COST_OBCSE
                  if (wobcse(k,iobcs)*maskyz(j,k,bi,bj).ne.0.)
./pkg/ecco/ecco_cost.h 1327 NO PROCEDURE
     &                      wobcse, wobcseLev
./pkg/ecco/ecco_cost.h 1328 NO PROCEDURE
      _RL wobcse     (                      nr,nobcs)
./pkg/ecco/ecco_cost_weights.F 1957 ECCO_COST_WEIGHTS
              if (wobcse(k,iobcs) .ne. 0.) then
./pkg/ecco/ecco_cost_weights.F 1958 ECCO_COST_WEIGHTS
                 wobcse(k,iobcs) =
./pkg/ecco/ecco_cost_weights.F 1959 ECCO_COST_WEIGHTS
     &                ratio/wobcse(k,iobcs)/wobcse(k,iobcs)
./pkg/ecco/ecco_cost_weights.F 1961 ECCO_COST_WEIGHTS
                 wobcse(k,iobcs) = 0.0 _d 0
./pkg/ecco/ecco_cost_weights.F 224 ECCO_COST_WEIGHTS
          wobcse(k,iobcs) = 0. _d 0
./pkg/ecco/ecco_cost_weights.F 347 ECCO_COST_WEIGHTS
            wobcse(k,1) = wti(k)
./pkg/ecco/ecco_cost_weights.F 348 ECCO_COST_WEIGHTS
            wobcse(k,2) = wsi(k)
./pkg/ecco/ecco_cost_weights.F 349 ECCO_COST_WEIGHTS
            wobcse(k,3) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 350 ECCO_COST_WEIGHTS
            wobcse(k,4) = wvi(k)