Symbol Description Uses
masktmp 7


File Line number Procedure Code
./pkg/ecco/cost_drifter.F 213 COST_DRIFTER 
             masktmp(i,j,bi,bj) =
./pkg/ecco/cost_drifter.F 220 COST_DRIFTER 
             if ( masktmp(i,j,bi,bj) .eq. 0.0 ) then
./pkg/ecco/cost_drifter.F 236 COST_DRIFTER 
     &             / ( masktmp(i,j,bi,bj) )
./pkg/ecco/cost_drifter.F 243 COST_DRIFTER 
             masktmp(i,j,bi,bj) =
./pkg/ecco/cost_drifter.F 250 COST_DRIFTER 
             if ( masktmp(i,j,bi,bj) .eq.0.0 ) then
./pkg/ecco/cost_drifter.F 266 COST_DRIFTER 
     &             / ( masktmp(i,j,bi,bj) )
./pkg/ecco/cost_drifter.F 85 COST_DRIFTER 
      _RL masktmp(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)