Symbol Description Uses
fctile_argot 8


File Line number Procedure Code
./pkg/ecco/cost_argo_theta.F 154 COST_ARGO_THETA 
            fctile_argot = 0. _d 0
./pkg/ecco/cost_argo_theta.F 174 COST_ARGO_THETA 
                 fctile_argot = fctile_argot +
./pkg/ecco/cost_argo_theta.F 186 COST_ARGO_THETA 
            fcthread_argot    = fcthread_argot    + fctile_argot
./pkg/ecco/cost_argo_theta.F 187 COST_ARGO_THETA 
            objf_argot(bi,bj) = objf_argot(bi,bj) + fctile_argot
./pkg/ecco/cost_argo_theta.F 198 COST_ARGO_THETA 
     &        ' COST_ARGO_THETA: cost function         = ', fctile_argot
./pkg/ecco/cost_argo_theta.F 236 COST_ARGO_THETA 
      fctile_argot   = 0. _d 0
./pkg/ecco/cost_argo_theta.F 59 COST_ARGO_THETA 
      _RL fctile_argot