Symbol Description Uses
watemp0 8


File Line number Procedure Code
./pkg/ecco/ecco_cost_weights.F 100 ECCO_COST_WEIGHTS 
      watemp0  = 0.
./pkg/ecco/ecco_cost_weights.F 234 ECCO_COST_WEIGHTS 
     &         watemp0
./pkg/ecco/ecco_cost_weights.F 70 ECCO_COST_WEIGHTS 
      _RL watemp0
./pkg/ecco/ecco_cost_weights.F 744 ECCO_COST_WEIGHTS 
              watemp(i,j,bi,bj) = max(watemp(i,j,bi,bj),watemp0)
./verification/global1x1_tot/code/ecco_cost_weights.F 100 ECCO_COST_WEIGHTS 
      watemp0  = 0.
./verification/global1x1_tot/code/ecco_cost_weights.F 236 ECCO_COST_WEIGHTS 
     &         watemp0
./verification/global1x1_tot/code/ecco_cost_weights.F 70 ECCO_COST_WEIGHTS 
      _RL watemp0
./verification/global1x1_tot/code/ecco_cost_weights.F 800 ECCO_COST_WEIGHTS 
              watemp(i,j,bi,bj) = max(watemp(i,j,bi,bj),watemp0)