Symbol Description Uses
objf_obcsn 7


File Line number Procedure Code
./pkg/ecco/cost_obcsn.F 183 COST_OBCSN 
            objf_obcsn(bi,bj) = objf_obcsn(bi,bj) + fctile
./pkg/ecco/ecco_cost.h 488 NO PROCEDURE 
     &     objf_obcsn, objf_obcss, objf_obcsw, objf_obcse,
./pkg/ecco/ecco_cost.h 592 NO PROCEDURE 
      _RL  objf_obcsn(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 448 ECCO_COST_FINAL 
     &         + mult_obcsn   * objf_obcsn(bi,bj)
./pkg/ecco/ecco_cost_final.F 580 ECCO_COST_FINAL 
          f_obcsn  = f_obcsn + objf_obcsn(bi,bj)
./pkg/ecco/ecco_cost_init_varia.F 134 ECCO_COST_INIT_VARIA 
          objf_obcsn(bi,bj)    = 0. _d 0