Symbol Description Uses
fctile_xbt 8


File Line number Procedure Code
./pkg/ecco/cost_xbt.F 155 COST_XBT 
            fctile_xbt = 0. _d 0
./pkg/ecco/cost_xbt.F 188 COST_XBT 
                    fctile_xbt = fctile_xbt +
./pkg/ecco/cost_xbt.F 200 COST_XBT 
            fcthread_xbt    = fcthread_xbt    + fctile_xbt
./pkg/ecco/cost_xbt.F 201 COST_XBT 
            objf_xbt(bi,bj) = objf_xbt(bi,bj) + fctile_xbt
./pkg/ecco/cost_xbt.F 212 COST_XBT 
     &        ' COST_XBT: cost function         = ', fctile_xbt
./pkg/ecco/cost_xbt.F 250 COST_XBT 
      fctile_xbt   = 0. _d 0
./pkg/ecco/cost_xbt.F 58 COST_XBT 
      _RL fctile_xbt