Symbol Description Uses
objf_swfluxm 5



File Line number Procedure Code
./pkg/ecco/cost_forcing.F 272 COST_FORCING
     &     objf_swfluxm, objf_swfluxsmoo,
./pkg/ecco/ecco_cost.h 387 NO PROCEDURE
     &     objf_swflux,     objf_swfluxm,     objf_swfluxsmoo,
./pkg/ecco/ecco_cost.h 475 NO PROCEDURE
      _RL  objf_swfluxm(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 478 ECCO_COST_FINAL
     &         + mult_swflux  * ( objf_swflux(bi,bj)+objf_swfluxm(bi,bj)
./pkg/ecco/ecco_cost_final.F 584 ECCO_COST_FINAL
          f_swfluxm  = f_swfluxm + objf_swfluxm(bi,bj)