Symbol Description Uses
fctile_argot 8


File Line number Procedure Code
./pkg/ecco/cost_argo_theta.F 153 COST_ARGO_THETA 
            fctile_argot = 0. _d 0
./pkg/ecco/cost_argo_theta.F 173 COST_ARGO_THETA 
                 fctile_argot = fctile_argot +
./pkg/ecco/cost_argo_theta.F 185 COST_ARGO_THETA 
            fcthread_argot    = fcthread_argot    + fctile_argot
./pkg/ecco/cost_argo_theta.F 186 COST_ARGO_THETA 
            objf_argot(bi,bj) = objf_argot(bi,bj) + fctile_argot
./pkg/ecco/cost_argo_theta.F 197 COST_ARGO_THETA 
     &        ' COST_ARGO_THETA: cost function         = ', fctile_argot
./pkg/ecco/cost_argo_theta.F 235 COST_ARGO_THETA 
      fctile_argot   = 0. _d 0
./pkg/ecco/cost_argo_theta.F 58 COST_ARGO_THETA 
      _RL fctile_argot