Symbol Description Uses
offset_sum 24



File Line number Procedure Code
./pkg/ecco/cost_ssh.F 163 COST_SSH
      offset_sum = 0. _d 0
./pkg/ecco/cost_ssh.F 173 COST_SSH
              offset_sum = offset_sum +
./pkg/ecco/cost_ssh.F 182 COST_SSH
      _GLOBAL_SUM_RL( offset_sum , mythid )
./pkg/ecco/cost_ssh.F 184 COST_SSH
      if (offset_sum .eq. 0.0) then
./pkg/ecco/cost_ssh.F 194 COST_SSH
     &          ' cost_ssh: offset_sum = ',offset_sum
./pkg/ecco/cost_ssh.F 200 COST_SSH
      offset = offset / offset_sum
./pkg/ecco/cost_ssh.F 75 COST_SSH
      _RL offset_sum
./pkg/ecco/cost_ssh_new.F 248 COST_SSH_NEW
      offset_sum = 0. _d 0
./pkg/ecco/cost_ssh_new.F 258 COST_SSH_NEW
              offset_sum = offset_sum +
./pkg/ecco/cost_ssh_new.F 267 COST_SSH_NEW
      _GLOBAL_SUM_RL( offset_sum , mythid )
./pkg/ecco/cost_ssh_new.F 269 COST_SSH_NEW
      if (offset_sum .eq. 0.0) then
./pkg/ecco/cost_ssh_new.F 279 COST_SSH_NEW
     &          ' cost_ssh: offset_sum = ',offset_sum
./pkg/ecco/cost_ssh_new.F 285 COST_SSH_NEW
      offset = offset / offset_sum
./pkg/ecco/cost_ssh_new.F 76 COST_SSH_NEW
      _RL offset_sum
./pkg/ecco/cost_sshv4.F 317 COST_SSHV4
      offset_sum = 0. _d 0
./pkg/ecco/cost_sshv4.F 444 COST_SSHV4
                  offset_sum=offset_sum+mean_psMssh_all_NUM(i,j,bi,bj)
./pkg/ecco/cost_sshv4.F 456 COST_SSHV4
      _GLOBAL_SUM_RL( offset_sum , mythid )
./pkg/ecco/cost_sshv4.F 458 COST_SSHV4
      if (offset_sum .eq. 0.0) then
./pkg/ecco/cost_sshv4.F 468 COST_SSHV4
     &          ' cost_ssh: offset_sum = ',offset_sum
./pkg/ecco/cost_sshv4.F 475 COST_SSHV4
      offset = offset / offset_sum
./pkg/ecco/cost_sshv4.F 79 COST_SSHV4
      _RL offset_sum