Symbol Description Uses
fctile_curmtr 10


File Line number Procedure Code
./pkg/ecco/cost_curmtr.F 159 COST_CURMTR 
            fctile_curmtr = 0. _d 0
./pkg/ecco/cost_curmtr.F 265 COST_CURMTR 
                    fctile_curmtr = fctile_curmtr +
./pkg/ecco/cost_curmtr.F 275 COST_CURMTR 
                    fctile_curmtr = fctile_curmtr +
./pkg/ecco/cost_curmtr.F 287 COST_CURMTR 
            fcthread_curmtr    = fcthread_curmtr    + fctile_curmtr
./pkg/ecco/cost_curmtr.F 288 COST_CURMTR 
            objf_curmtr(bi,bj) = objf_curmtr(bi,bj) + fctile_curmtr
./pkg/ecco/cost_curmtr.F 299 COST_CURMTR 
     &        ' COST_Curmtr: cost function         = ', fctile_curmtr
./pkg/ecco/cost_curmtr.F 337 COST_CURMTR 
      fctile_curmtr   = 0. _d 0
./pkg/ecco/cost_curmtr.F 58 COST_CURMTR 
      _RL fctile_curmtr