Symbol Description Uses
psmeantp 7


File Line number Procedure Code
./pkg/ecco/cost_ssh_new.F 133 COST_SSH_NEW 
              psmeantp(i,j,bi,bj)  = 0. _d 0
./pkg/ecco/cost_ssh_new.F 186 COST_SSH_NEW 
                   psmeantp(i,j,bi,bj) = psmeantp(i,j,bi,bj) +
./pkg/ecco/cost_ssh_new.F 221 COST_SSH_NEW 
                  psmeantp(i,j,bi,bj) = psmeantp(i,j,bi,bj) /
./pkg/ecco/cost_ssh_new.F 351 COST_SSH_NEW 
     &                   - psmeantp(i,j,bi,bj) - tpobs(i,j,bi,bj) )
./pkg/ecco/cost_ssh_new.F 78 COST_SSH_NEW 
      _RL psmeantp  ( 1-olx:snx+olx, 1-oly:sny+oly, nsx, nsy )