Symbol Description Uses
rl_0 6


File Line number Procedure Code
./pkg/ecco/cost_argo_theta.F 104 COST_ARGO_THETA 
      rl_0  = 0.0
./pkg/ecco/cost_argo_theta.F 173 COST_ARGO_THETA 
     $             argotobs(i,j,k,bi,bj),ztop*rc(k),rl_0)
./pkg/ecco/cost_argo_theta.F 64 COST_ARGO_THETA 
      _RL ztop,rl_35,rl_0
./pkg/ecco/cost_xbt.F 105 COST_XBT 
      rl_0  = 0.0
./pkg/ecco/cost_xbt.F 185 COST_XBT 
     $                   xbtobs(i,j,k,bi,bj),ztop*rc(k),rl_0)
./pkg/ecco/cost_xbt.F 66 COST_XBT 
      _RL ztop,rl_35,rl_0