Symbol Description Uses
rl_0 6


File Line number Procedure Code
./pkg/ecco/cost_argo_theta.F 105 COST_ARGO_THETA 
      rl_0  = 0.0
./pkg/ecco/cost_argo_theta.F 174 COST_ARGO_THETA 
     $             argotobs(i,j,k,bi,bj),ztop*rc(k),rl_0)
./pkg/ecco/cost_argo_theta.F 65 COST_ARGO_THETA 
      _RL ztop,rl_35,rl_0
./pkg/ecco/cost_xbt.F 106 COST_XBT 
      rl_0  = 0.0
./pkg/ecco/cost_xbt.F 186 COST_XBT 
     $                   xbtobs(i,j,k,bi,bj),ztop*rc(k),rl_0)
./pkg/ecco/cost_xbt.F 67 COST_XBT 
      _RL ztop,rl_35,rl_0