Symbol Description Uses
objf_aqh 6


File Line number Procedure Code
./pkg/ecco/ecco_cost_init_varia.F 136 ECCO_COST_INIT_VARIA 
          objf_aqh(bi,bj)      = 0. _d 0
./pkg/ecco/cost_forcing.F 144 COST_FORCING 
     &     objf_aqh,
./pkg/ecco/ecco_cost.h 385 NO PROCEDURE 
     &     objf_aqh,        objf_aqhm,        objf_aqhsmoo,
./pkg/ecco/ecco_cost.h 460 NO PROCEDURE 
      _RL  objf_aqh  (nsx,nsy)
./pkg/ecco/ecco_cost_final.F 474 ECCO_COST_FINAL 
     &         + mult_aqh     * ( objf_aqh(bi,bj)+objf_aqhm(bi,bj)
./pkg/ecco/ecco_cost_final.F 573 ECCO_COST_FINAL 
          f_aqh    = f_aqh + objf_aqh(bi,bj)