Symbol Description Uses
slaoffset_sum 9



File Line number Procedure Code
./pkg/ecco/cost_gencost_sshv4.F 1013 COST_GENCOST_SSHV4
     &     ( slaoffset_sum.GT.0.25 _d 0 * globalArea ) ) THEN
./pkg/ecco/cost_gencost_sshv4.F 863 COST_GENCOST_SSHV4
      slaoffset_sum = 0. _d 0
./pkg/ecco/cost_gencost_sshv4.F 875 COST_GENCOST_SSHV4
                  slaoffset_sum=slaoffset_sum+RA(i,j,bi,bj)
./pkg/ecco/cost_gencost_sshv4.F 888 COST_GENCOST_SSHV4
      _GLOBAL_SUM_RL( slaoffset_sum , mythid )
./pkg/ecco/cost_gencost_sshv4.F 890 COST_GENCOST_SSHV4
      if (slaoffset_sum .eq. 0.0) then
./pkg/ecco/cost_gencost_sshv4.F 900 COST_GENCOST_SSHV4
     &         slaoffset,slaoffset_sum,slaoffset_weight
./pkg/ecco/cost_gencost_sshv4.F 907 COST_GENCOST_SSHV4
      slaoffset = slaoffset / slaoffset_sum
./pkg/ecco/cost_gencost_sshv4.F 95 COST_GENCOST_SSHV4
      _RL slaoffset_sum