Symbol Description Uses
fctile_curmtr 10


File Line number Procedure Code
./pkg/ecco/cost_curmtr.F 161 COST_CURMTR 
            fctile_curmtr = 0. _d 0
./pkg/ecco/cost_curmtr.F 267 COST_CURMTR 
                    fctile_curmtr = fctile_curmtr +
./pkg/ecco/cost_curmtr.F 277 COST_CURMTR 
                    fctile_curmtr = fctile_curmtr +
./pkg/ecco/cost_curmtr.F 289 COST_CURMTR 
            fcthread_curmtr    = fcthread_curmtr    + fctile_curmtr
./pkg/ecco/cost_curmtr.F 290 COST_CURMTR 
            objf_curmtr(bi,bj) = objf_curmtr(bi,bj) + fctile_curmtr
./pkg/ecco/cost_curmtr.F 301 COST_CURMTR 
     &        ' COST_Curmtr: cost function         = ', fctile_curmtr
./pkg/ecco/cost_curmtr.F 339 COST_CURMTR 
      fctile_curmtr   = 0. _d 0
./pkg/ecco/cost_curmtr.F 60 COST_CURMTR 
      _RL fctile_curmtr