Symbol Description Uses
fcthread_ctds 7


File Line number Procedure Code
./pkg/ecco/cost_ctds.F 114 COST_CTDS 
      fcthread_ctds = 0. _d 0
./pkg/ecco/cost_ctds.F 183 COST_CTDS 
            fcthread_ctds    = fcthread_ctds    + fctile_ctds
./pkg/ecco/cost_ctds.F 208 COST_CTDS 
        _GLOBAL_SUM_RL( fcthread_ctds , myThid )
./pkg/ecco/cost_ctds.F 218 COST_CTDS 
     &    ' ( CTD sal. )  = ',fcthread_ctds
./pkg/ecco/cost_ctds.F 234 COST_CTDS 
      fcthread_ctds = 0. _d 0
./pkg/ecco/cost_ctds.F 59 COST_CTDS 
      _RL fcthread_ctds