Symbol Description Uses
objf_precipm 5



File Line number Procedure Code
./pkg/ecco/cost_forcing.F 252 COST_FORCING
     &     objf_precipm, objf_precipsmoo,
./pkg/ecco/ecco_cost.h 386 NO PROCEDURE
     &     objf_precip,     objf_precipm,     objf_precipsmoo,
./pkg/ecco/ecco_cost.h 474 NO PROCEDURE
      _RL  objf_precipm(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 476 ECCO_COST_FINAL
     &         + mult_precip  * ( objf_precip(bi,bj)+objf_precipm(bi,bj)
./pkg/ecco/ecco_cost_final.F 583 ECCO_COST_FINAL
          f_precipm  = f_precipm + objf_precipm(bi,bj)