Symbol Description Uses
fcthread 95


File Line number Procedure Code
./pkg/ecco/cost_theta.F 114 COST_THETA 
      fcthread = 0. _d 0
./pkg/ecco/cost_theta.F 216 COST_THETA 
            fcthread         = fcthread         + fctile
./pkg/ecco/cost_theta.F 65 COST_THETA 
      _RL fcthread
./pkg/ecco/cost_obcsn.F 100 COST_OBCSN 
      fcthread = 0. _d 0
./pkg/ecco/cost_obcsn.F 137 COST_OBCSN 
            fcthread         = fcthread           + fctile
./pkg/ecco/cost_obcsn.F 174 COST_OBCSN 
            fcthread         = fcthread           + fctile
./pkg/ecco/cost_obcsn.F 210 COST_OBCSN 
            fcthread         = fcthread           + fctile
./pkg/ecco/cost_obcsn.F 247 COST_OBCSN 
            fcthread         = fcthread           + fctile
./pkg/ecco/cost_obcsn.F 254 COST_OBCSN 
        _GLOBAL_SUM_R8( fcthread , myThid )
./pkg/ecco/cost_obcsn.F 264 COST_OBCSN 
     &    ' (obcsn) = ',fcthread
./pkg/ecco/cost_obcsn.F 62 COST_OBCSN 
      _RL fcthread
./pkg/ecco/cost_kapgm.F 105 COST_KAPGM 
      fcthread = 0. _d 0
./pkg/ecco/cost_kapgm.F 132 COST_KAPGM 
            fcthread          = fcthread + fctile
./pkg/ecco/cost_kapgm.F 154 COST_KAPGM 
        _GLOBAL_SUM_R8( fcthread , myThid )
./pkg/ecco/cost_kapgm.F 164 COST_KAPGM 
     &    fcthread
./pkg/ecco/cost_kapgm.F 177 COST_KAPGM 
      fcthread = 0. _d 0
./pkg/ecco/cost_kapgm.F 65 COST_KAPGM 
      _RL fcthread
./pkg/ecco/cost_ctdtclim.F 115 COST_CTDTCLIM 
      fcthread = 0. _d 0
./pkg/ecco/cost_ctdtclim.F 217 COST_CTDTCLIM 
            fcthread         = fcthread         + fctile
./pkg/ecco/cost_ctdtclim.F 244 COST_CTDTCLIM 
        _GLOBAL_SUM_R8( fcthread , myThid )
./pkg/ecco/cost_ctdtclim.F 254 COST_CTDTCLIM 
     &    ' (temperature) = ',fcthread
./pkg/ecco/cost_ctdtclim.F 71 COST_CTDTCLIM 
      _RL fcthread
./pkg/ecco/cost_obcsw.F 100 COST_OBCSW 
      fcthread = 0. _d 0
./pkg/ecco/cost_obcsw.F 137 COST_OBCSW 
            fcthread         = fcthread           + fctile
./pkg/ecco/cost_obcsw.F 174 COST_OBCSW 
            fcthread         = fcthread           + fctile
./pkg/ecco/cost_obcsw.F 210 COST_OBCSW 
            fcthread         = fcthread           + fctile
./pkg/ecco/cost_obcsw.F 247 COST_OBCSW 
            fcthread         = fcthread           + fctile
./pkg/ecco/cost_obcsw.F 254 COST_OBCSW 
        _GLOBAL_SUM_R8( fcthread , myThid )
./pkg/ecco/cost_obcsw.F 264 COST_OBCSW 
     &    ' (obcsw) = ',fcthread
./pkg/ecco/cost_obcsw.F 62 COST_OBCSW 
      _RL fcthread
./pkg/ecco/cost_ctdsclim.F 116 COST_CTDSCLIM 
      fcthread = 0. _d 0
./pkg/ecco/cost_ctdsclim.F 218 COST_CTDSCLIM 
            fcthread         = fcthread         + fctile
./pkg/ecco/cost_ctdsclim.F 245 COST_CTDSCLIM 
        _GLOBAL_SUM_R8( fcthread , myThid )
./pkg/ecco/cost_ctdsclim.F 255 COST_CTDSCLIM 
     &    ' (salinity) = ',fcthread
./pkg/ecco/cost_ctdsclim.F 71 COST_CTDSCLIM 
      _RL fcthread
./pkg/ecco/cost_obcse.F 100 COST_OBCSE 
      fcthread = 0. _d 0
./pkg/ecco/cost_obcse.F 137 COST_OBCSE 
            fcthread         = fcthread           + fctile
./pkg/ecco/cost_obcse.F 174 COST_OBCSE 
            fcthread         = fcthread           + fctile
./pkg/ecco/cost_obcse.F 210 COST_OBCSE 
            fcthread         = fcthread           + fctile
./pkg/ecco/cost_obcse.F 247 COST_OBCSE 
            fcthread         = fcthread           + fctile
./pkg/ecco/cost_obcse.F 254 COST_OBCSE 
        _GLOBAL_SUM_R8( fcthread , myThid )
./pkg/ecco/cost_obcse.F 264 COST_OBCSE 
     &    ' (obcse) = ',fcthread
./pkg/ecco/cost_obcse.F 62 COST_OBCSE 
      _RL fcthread
./pkg/ecco/cost_obcss.F 100 COST_OBCSS 
      fcthread = 0. _d 0
./pkg/ecco/cost_obcss.F 137 COST_OBCSS 
            fcthread         = fcthread           + fctile
./pkg/ecco/cost_obcss.F 174 COST_OBCSS 
            fcthread         = fcthread           + fctile
./pkg/ecco/cost_obcss.F 210 COST_OBCSS 
            fcthread         = fcthread           + fctile
./pkg/ecco/cost_obcss.F 247 COST_OBCSS 
            fcthread         = fcthread           + fctile
./pkg/ecco/cost_obcss.F 254 COST_OBCSS 
        _GLOBAL_SUM_R8( fcthread , myThid )
./pkg/ecco/cost_obcss.F 264 COST_OBCSS 
     &    ' (obcss) = ',fcthread
./pkg/ecco/cost_obcss.F 62 COST_OBCSS 
      _RL fcthread
./pkg/ecco/cost_salt.F 115 COST_SALT 
      fcthread = 0. _d 0
./pkg/ecco/cost_salt.F 217 COST_SALT 
            fcthread         = fcthread         + fctile
./pkg/ecco/cost_salt.F 65 COST_SALT 
      _RL fcthread
./pkg/ecco/cost_theta_ini_fin.F 119 COST_THETA_INI_FIN 
            fcthread          = fcthread + fctile
./pkg/ecco/cost_theta_ini_fin.F 141 COST_THETA_INI_FIN 
        _GLOBAL_SUM_R8( fcthread , myThid )
./pkg/ecco/cost_theta_ini_fin.F 151 COST_THETA_INI_FIN 
     &    fcthread
./pkg/ecco/cost_theta_ini_fin.F 164 COST_THETA_INI_FIN 
      fcthread = 0. _d 0
./pkg/ecco/cost_theta_ini_fin.F 53 COST_THETA_INI_FIN 
      _RL fcthread
./pkg/ecco/cost_theta_ini_fin.F 91 COST_THETA_INI_FIN 
      fcthread = 0. _d 0
./pkg/ecco/cost_obcs_ageos.F 146 COST_OBCS_AGEOS 
      fcthread = 0. _d 0
./pkg/ecco/cost_obcs_ageos.F 452 COST_OBCS_AGEOS 
            fcthread          = fcthread          + fctile
./pkg/ecco/cost_obcs_ageos.F 479 COST_OBCS_AGEOS 
        _GLOBAL_SUM_R8( fcthread , myThid )
./pkg/ecco/cost_obcs_ageos.F 489 COST_OBCS_AGEOS 
     &    ' (temperature) = ',fcthread
./pkg/ecco/cost_obcs_ageos.F 71 COST_OBCS_AGEOS 
      _RL fcthread
./pkg/ecco/cost_salt_ini_fin.F 119 COST_SALT_INI_FIN 
            fcthread          = fcthread + fctile
./pkg/ecco/cost_salt_ini_fin.F 141 COST_SALT_INI_FIN 
        _GLOBAL_SUM_R8( fcthread , myThid )
./pkg/ecco/cost_salt_ini_fin.F 151 COST_SALT_INI_FIN 
     &    fcthread
./pkg/ecco/cost_salt_ini_fin.F 164 COST_SALT_INI_FIN 
      fcthread = 0. _d 0
./pkg/ecco/cost_salt_ini_fin.F 53 COST_SALT_INI_FIN 
      _RL fcthread
./pkg/ecco/cost_salt_ini_fin.F 91 COST_SALT_INI_FIN 
      fcthread = 0. _d 0