Symbol Description Uses
fctile_curmtr 10


File Line number Procedure Code
./pkg/ecco/cost_curmtr.F 160 COST_CURMTR 
            fctile_curmtr = 0. _d 0
./pkg/ecco/cost_curmtr.F 266 COST_CURMTR 
                    fctile_curmtr = fctile_curmtr +
./pkg/ecco/cost_curmtr.F 276 COST_CURMTR 
                    fctile_curmtr = fctile_curmtr +
./pkg/ecco/cost_curmtr.F 288 COST_CURMTR 
            fcthread_curmtr    = fcthread_curmtr    + fctile_curmtr
./pkg/ecco/cost_curmtr.F 289 COST_CURMTR 
            objf_curmtr(bi,bj) = objf_curmtr(bi,bj) + fctile_curmtr
./pkg/ecco/cost_curmtr.F 300 COST_CURMTR 
     &        ' COST_Curmtr: cost function         = ', fctile_curmtr
./pkg/ecco/cost_curmtr.F 338 COST_CURMTR 
      fctile_curmtr   = 0. _d 0
./pkg/ecco/cost_curmtr.F 59 COST_CURMTR 
      _RL fctile_curmtr