Symbol Description Uses
curmtrvobs 6


File Line number Procedure Code
./pkg/ecco/ecco_cost.h 851 NO PROCEDURE 
     &                     curmtrvobs
./pkg/ecco/ecco_cost.h 881 NO PROCEDURE 
      _RL curmtrvobs(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_curmtr.F 150 COST_CURMTR 
        call MDSREADFIELD( curmtrvfile,cost_iprec, 'RL', nr, curmtrvobs,
./pkg/ecco/cost_curmtr.F 172 COST_CURMTR 
                  if (curmtrvobs(i,j,k,bi,bj) .eq. 0.) then
./pkg/ecco/cost_curmtr.F 180 COST_CURMTR 
                  if (curmtrvobs(i,j,k,bi,bj) .lt. spval) then
./pkg/ecco/cost_curmtr.F 215 COST_CURMTR 
                  tmpvobs(i,j) = curmtrvobs(i,j,k,bi,bj)