Symbol Description Uses
fcthread_xbt 7


File Line number Procedure Code
./pkg/ecco/cost_xbt.F 120 COST_XBT 
      fcthread_xbt = 0. _d 0
./pkg/ecco/cost_xbt.F 201 COST_XBT 
            fcthread_xbt    = fcthread_xbt    + fctile_xbt
./pkg/ecco/cost_xbt.F 226 COST_XBT 
        _GLOBAL_SUM_RL( fcthread_xbt , myThid )
./pkg/ecco/cost_xbt.F 236 COST_XBT 
     &    ' ( XBT temp. )  = ',fcthread_xbt
./pkg/ecco/cost_xbt.F 252 COST_XBT 
      fcthread_xbt = 0. _d 0
./pkg/ecco/cost_xbt.F 61 COST_XBT 
      _RL fcthread_xbt