Symbol Description Uses
psmeangfo 7


File Line number Procedure Code
./pkg/ecco/cost_ssh_new.F 135 COST_SSH_NEW 
              psmeangfo(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_ssh_new.F 202 COST_SSH_NEW 
                   psmeangfo(i,j,bi,bj) = psmeangfo(i,j,bi,bj) +
./pkg/ecco/cost_ssh_new.F 235 COST_SSH_NEW 
                  psmeangfo(i,j,bi,bj) = psmeangfo(i,j,bi,bj) /
./pkg/ecco/cost_ssh_new.F 409 COST_SSH_NEW 
     &                   - psmeangfo(i,j,bi,bj) - gfoobs(i,j,bi,bj) )
./pkg/ecco/cost_ssh_new.F 80 COST_SSH_NEW 
      _RL psmeangfo ( 1-olx:snx+olx, 1-oly:sny+oly, nsx, nsy )