Symbol Description Uses
f_sshv4cost 7


File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 1226 ECCO_COST_FINAL 
     &    f_sshv4cost(num_var),
./pkg/ecco/ecco_cost_final.F 230 ECCO_COST_FINAL 
        f_sshv4cost(num_var)= 0. _d 0
./pkg/ecco/ecco_cost_final.F 517 ECCO_COST_FINAL 
          f_sshv4cost(num_var)=f_sshv4cost(num_var)
./pkg/ecco/ecco_cost_final.F 708 ECCO_COST_FINAL 
        _GLOBAL_SUM_RL(f_sshv4cost(num_var), myThid )
./pkg/ecco/ecco_cost_final.F 85 ECCO_COST_FINAL 
      _RL f_sshv4cost(NSSHV4COST)
./pkg/ecco/ecco_cost_final.F 977 ECCO_COST_FINAL 
     &     ' --> f_sshv4cost =',f_sshv4cost(num_var),