Symbol Description Uses
mean_psMssh_all 22



File Line number Procedure Code
./pkg/ecco/cost_gencost_sshv4.F 118 COST_GENCOST_SSHV4
      _RL mean_psMssh_all(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
./pkg/ecco/cost_gencost_sshv4.F 518 COST_GENCOST_SSHV4
              mean_psMssh_all(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_gencost_sshv4.F 633 COST_GENCOST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_gencost_sshv4.F 634 COST_GENCOST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) +
./pkg/ecco/cost_gencost_sshv4.F 645 COST_GENCOST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_gencost_sshv4.F 646 COST_GENCOST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) +
./pkg/ecco/cost_gencost_sshv4.F 657 COST_GENCOST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_gencost_sshv4.F 658 COST_GENCOST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) +
./pkg/ecco/cost_gencost_sshv4.F 672 COST_GENCOST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) /
./pkg/ecco/cost_gencost_sshv4.F 687 COST_GENCOST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_gencost_sshv4.F 688 COST_GENCOST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) /
./pkg/ecco/cost_gencost_sshv4.F 691 COST_GENCOST_SSHV4
                  offset=offset+RA(i,j,bi,bj)*mean_psMssh_all(i,j,bi,bj)
./pkg/ecco/cost_gencost_sshv4.F 697 COST_GENCOST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_gencost_sshv4.F 705 COST_GENCOST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_gencost_sshv4.F 781 COST_GENCOST_SSHV4
                   mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_gencost_sshv4.F 782 COST_GENCOST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) - offset
./pkg/ecco/cost_gencost_sshv4.F 789 COST_GENCOST_SSHV4
                   mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_gencost_sshv4.F 794 COST_GENCOST_SSHV4
                   mean_psMssh_all(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_gencost_sshv4.F 810 COST_GENCOST_SSHV4
     &    1,mean_psMssh_all,1,1,mythid)
./pkg/ecco/cost_gencost_sshv4.F 815 COST_GENCOST_SSHV4
     &  call SMOOTH_HETERO2D(mean_psMssh_all,maskc,
./pkg/ecco/cost_gencost_sshv4.F 823 COST_GENCOST_SSHV4
     &    1,mean_psMssh_all,1,1,mythid)
./pkg/ecco/cost_gencost_sshv4.F 861 COST_GENCOST_SSHV4
         junk = mean_psMssh_all(i,j,bi,bj)