Symbol Description Uses
objf_vwindsmoo 5


File Line number Procedure Code
./pkg/ecco/cost_forcing.F 164 COST_FORCING 
     &     objf_vwind, objf_vwindm, objf_vwindsmoo,
./pkg/ecco/ecco_cost.h 425 NO PROCEDURE 
     &     objf_vwind,      objf_vwindm,      objf_vwindsmoo,
./pkg/ecco/ecco_cost.h 522 NO PROCEDURE 
      _RL  objf_vwindsmoo(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 367 ECCO_COST_FINAL 
     &                         +mult_smooth_bc*objf_vwindsmoo(bi,bj) )
./pkg/ecco/ecco_cost_final.F 452 ECCO_COST_FINAL 
          f_vwindsmoo  = f_vwindsmoo + objf_vwindsmoo(bi,bj)