Symbol Description Uses
fctile_xbt 8


File Line number Procedure Code
./pkg/ecco/cost_xbt.F 157 COST_XBT 
            fctile_xbt = 0. _d 0
./pkg/ecco/cost_xbt.F 189 COST_XBT 
                    fctile_xbt = fctile_xbt +
./pkg/ecco/cost_xbt.F 201 COST_XBT 
            fcthread_xbt    = fcthread_xbt    + fctile_xbt
./pkg/ecco/cost_xbt.F 202 COST_XBT 
            objf_xbt(bi,bj) = objf_xbt(bi,bj) + fctile_xbt
./pkg/ecco/cost_xbt.F 213 COST_XBT 
     &        ' COST_XBT: cost function         = ', fctile_xbt
./pkg/ecco/cost_xbt.F 251 COST_XBT 
      fctile_xbt   = 0. _d 0
./pkg/ecco/cost_xbt.F 60 COST_XBT 
      _RL fctile_xbt