Symbol Description Uses
num0total 5



File Line number Procedure Code
./pkg/ecco/cost_gencost_sshv4.F 721 COST_GENCOST_SSHV4
      num0total=0. _d 0
./pkg/ecco/cost_gencost_sshv4.F 726 COST_GENCOST_SSHV4
                num0total=num0total+num0array(i,j,bi,bj)
./pkg/ecco/cost_gencost_sshv4.F 731 COST_GENCOST_SSHV4
      if(num0total.lt.1. _d 0) then
./pkg/ecco/cost_gencost_sshv4.F 91 COST_GENCOST_SSHV4
      _RL num0total