Symbol Description Uses
mean_psMssh_all 42



File Line number Procedure Code
./pkg/ecco/cost_gencost_sshv4.F 107 COST_GENCOST_SSHV4
      _RL mean_psMssh_all(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
./pkg/ecco/cost_gencost_sshv4.F 386 COST_GENCOST_SSHV4
              mean_psMssh_all(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_gencost_sshv4.F 490 COST_GENCOST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_gencost_sshv4.F 491 COST_GENCOST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) +
./pkg/ecco/cost_gencost_sshv4.F 504 COST_GENCOST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_gencost_sshv4.F 505 COST_GENCOST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) +
./pkg/ecco/cost_gencost_sshv4.F 518 COST_GENCOST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_gencost_sshv4.F 519 COST_GENCOST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) +
./pkg/ecco/cost_gencost_sshv4.F 534 COST_GENCOST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) /
./pkg/ecco/cost_gencost_sshv4.F 549 COST_GENCOST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_gencost_sshv4.F 550 COST_GENCOST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) /
./pkg/ecco/cost_gencost_sshv4.F 553 COST_GENCOST_SSHV4
                  offset=offset+RA(i,j,bi,bj)*mean_psMssh_all(i,j,bi,bj)
./pkg/ecco/cost_gencost_sshv4.F 559 COST_GENCOST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_gencost_sshv4.F 566 COST_GENCOST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_gencost_sshv4.F 609 COST_GENCOST_SSHV4
                   mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_gencost_sshv4.F 610 COST_GENCOST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) - offset
./pkg/ecco/cost_gencost_sshv4.F 617 COST_GENCOST_SSHV4
                   mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_gencost_sshv4.F 622 COST_GENCOST_SSHV4
                   mean_psMssh_all(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_gencost_sshv4.F 637 COST_GENCOST_SSHV4
     &    1,mean_psMssh_all,1,1,mythid)
./pkg/ecco/cost_gencost_sshv4.F 641 COST_GENCOST_SSHV4
     &  call SMOOTH_HETERO2D(mean_psMssh_all,maskc,
./pkg/ecco/cost_gencost_sshv4.F 648 COST_GENCOST_SSHV4
     &    1,mean_psMssh_all,1,1,mythid)
./pkg/ecco/cost_gencost_sshv4.F 700 COST_GENCOST_SSHV4
         junk = mean_psMssh_all(i,j,bi,bj)
./pkg/ecco/cost_sshv4.F 105 COST_SSHV4
      _RL mean_psMssh_all(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
./pkg/ecco/cost_sshv4.F 343 COST_SSHV4
              mean_psMssh_all(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_sshv4.F 444 COST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_sshv4.F 445 COST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) +
./pkg/ecco/cost_sshv4.F 458 COST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_sshv4.F 459 COST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) +
./pkg/ecco/cost_sshv4.F 472 COST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_sshv4.F 473 COST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) +
./pkg/ecco/cost_sshv4.F 491 COST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_sshv4.F 492 COST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) /
./pkg/ecco/cost_sshv4.F 495 COST_SSHV4
                  offset=offset+mean_psMssh_all(i,j,bi,bj)*
./pkg/ecco/cost_sshv4.F 500 COST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_sshv4.F 541 COST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_sshv4.F 542 COST_SSHV4
     &                 mean_psMssh_all(i,j,bi,bj) - offset
./pkg/ecco/cost_sshv4.F 547 COST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) =
./pkg/ecco/cost_sshv4.F 550 COST_SSHV4
                  mean_psMssh_all(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_sshv4.F 563 COST_SSHV4
     &    1,mean_psMssh_all,1,1,mythid)
./pkg/ecco/cost_sshv4.F 567 COST_SSHV4
     &  call SMOOTH_HETERO2D(mean_psMssh_all,maskc,
./pkg/ecco/cost_sshv4.F 573 COST_SSHV4
     &    1,mean_psMssh_all,1,1,mythid)
./pkg/ecco/cost_sshv4.F 622 COST_SSHV4
       junk = mean_psMssh_all(i,j,bi,bj)