Symbol Description Uses
psbar 15



File Line number Procedure Code
./pkg/ecco/ecco_cost.h 120 NO PROCEDURE
      _RL psbar  (1-olx:snx+olx,1-oly:sny+oly,  nsx,nsy)
./pkg/ecco/ecco_cost.h 122 NO PROCEDURE
      _RL psbar
./pkg/ecco/ecco_cost.h 68 NO PROCEDURE
     &                    psbar,
./pkg/ecco/cost_averagesfields.F 125 COST_AVERAGESFIELDS
                psbar(i,j,bi,bj) = etaN(i,j,bi,bj)
./pkg/ecco/cost_averagesfields.F 137 COST_AVERAGESFIELDS
                psbar(i,j,bi,bj)  = (psbar (i,j,bi,bj) +
./pkg/ecco/cost_averagesfields.F 152 COST_AVERAGESFIELDS
        call ACTIVE_WRITE_XY( fnamepsbar, psbar, dayrec, optimcycle,
./pkg/ecco/cost_averagesfields.F 163 COST_AVERAGESFIELDS
                psbar(i,j,bi,bj) = psbar(i,j,bi,bj) + etaN(i,j,bi,bj)
./pkg/ecco/cost_averagesinit.F 71 COST_AVERAGESINIT
              psbar(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_ssh.F 137 COST_SSH
        call ACTIVE_READ_XY( fname, psbar, irec, doglobalread,
./pkg/ecco/cost_ssh.F 146 COST_SSH
     &                psbar(i,j,bi,bj)*tpmeanmask(i,j,bi,bj)/
./pkg/ecco/cost_ssh.F 224 COST_SSH
        call ACTIVE_READ_XY( fname, psbar, irec, doglobalread,
./pkg/ecco/cost_ssh.F 247 COST_SSH
                junk       = ((psbar(i,j,bi,bj) - psmean(i,j,bi,bj)) -
./pkg/ecco/cost_ssh.F 262 COST_SSH
                junk        = ((psbar(i,j,bi,bj) - psmean(i,j,bi,bj)) -