Symbol Description Uses
psbar 58


File Line number Procedure Code
./pkg/ecco/cost_averagesfields.F 159 COST_AVERAGESFIELDS 
     &     psbar, etan, xx_psbar_mean_dummy,
./pkg/ecco/cost_averagesinit.F 85 COST_AVERAGESINIT 
              psbar(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_gencost_sshv4.F 358 COST_GENCOST_SSHV4 
        call ACTIVE_READ_XY( fname, psbar, irec, doglobalread,
./pkg/ecco/cost_gencost_sshv4.F 386 COST_GENCOST_SSHV4 
     &                psbar(i,j,bi,bj) / float(ndaysrec)
./pkg/ecco/cost_gencost_sshv4.F 394 COST_GENCOST_SSHV4 
     &                 psbar(i,j,bi,bj)-tpobs(i,j,bi,bj)
./pkg/ecco/cost_gencost_sshv4.F 406 COST_GENCOST_SSHV4 
     &                 psbar(i,j,bi,bj)-ersobs(i,j,bi,bj)
./pkg/ecco/cost_gencost_sshv4.F 418 COST_GENCOST_SSHV4 
     &                 psbar(i,j,bi,bj)-gfoobs(i,j,bi,bj)
./pkg/ecco/cost_gencost_sshv4.F 662 COST_GENCOST_SSHV4 
        call ACTIVE_READ_XY( fname, psbar, krec, doglobalread,
./pkg/ecco/cost_gencost_sshv4.F 693 COST_GENCOST_SSHV4 
     &        psbar(i,j,bi,bj)-tpobs(i,j,bi,bj)
./pkg/ecco/cost_gencost_sshv4.F 696 COST_GENCOST_SSHV4 
     &        psbar(i,j,bi,bj)-tpobs(i,j,bi,bj)
./pkg/ecco/cost_gencost_sshv4.F 710 COST_GENCOST_SSHV4 
     &        psbar(i,j,bi,bj)-ersobs(i,j,bi,bj)
./pkg/ecco/cost_gencost_sshv4.F 715 COST_GENCOST_SSHV4 
     &        psbar(i,j,bi,bj)-ersobs(i,j,bi,bj)
./pkg/ecco/cost_gencost_sshv4.F 727 COST_GENCOST_SSHV4 
     &        psbar(i,j,bi,bj)-gfoobs(i,j,bi,bj)
./pkg/ecco/cost_gencost_sshv4.F 732 COST_GENCOST_SSHV4 
     &        psbar(i,j,bi,bj)-gfoobs(i,j,bi,bj)
./pkg/ecco/cost_gencost_sshv4.F 853 COST_GENCOST_SSHV4 
        call ACTIVE_READ_XY( fname, psbar, irec, doglobalread,
./pkg/ecco/cost_gencost_sshv4.F 890 COST_GENCOST_SSHV4 
     &       psbar(i,j,bi,bj) - tpobs(i,j,bi,bj)
./pkg/ecco/cost_gencost_sshv4.F 899 COST_GENCOST_SSHV4 
     &       psbar(i,j,bi,bj) - ersobs(i,j,bi,bj)
./pkg/ecco/cost_gencost_sshv4.F 908 COST_GENCOST_SSHV4 
     &       psbar(i,j,bi,bj) - gfoobs(i,j,bi,bj)
./pkg/ecco/cost_ssh.F 142 COST_SSH 
        call ACTIVE_READ_XY( fname, psbar, irec, doglobalread,
./pkg/ecco/cost_ssh.F 151 COST_SSH 
     &                psbar(i,j,bi,bj)/
./pkg/ecco/cost_ssh.F 239 COST_SSH 
        call ACTIVE_READ_XY( fname, psbar, irec, doglobalread,
./pkg/ecco/cost_ssh.F 264 COST_SSH 
                junk       = ((psbar(i,j,bi,bj) - psmean(i,j,bi,bj)) -
./pkg/ecco/cost_ssh.F 274 COST_SSH 
                junk       = ( psbar(i,j,bi,bj) -
./pkg/ecco/cost_ssh.F 291 COST_SSH 
                junk        = ((psbar(i,j,bi,bj) - psmean(i,j,bi,bj)) -
./pkg/ecco/cost_ssh.F 301 COST_SSH 
                junk       = ( psbar(i,j,bi,bj) -
./pkg/ecco/cost_ssh.F 318 COST_SSH 
                junk        = ((psbar(i,j,bi,bj) - psmean(i,j,bi,bj)) -
./pkg/ecco/cost_ssh.F 328 COST_SSH 
                junk       = ( psbar(i,j,bi,bj) -
./pkg/ecco/cost_ssh_new.F 157 COST_SSH_NEW 
        call ACTIVE_READ_XY( fname, psbar, irec, doglobalread,
./pkg/ecco/cost_ssh_new.F 182 COST_SSH_NEW 
     &                psbar(i,j,bi,bj) / float(ndaysrec)
./pkg/ecco/cost_ssh_new.F 187 COST_SSH_NEW 
     &                 psbar(i,j,bi,bj)
./pkg/ecco/cost_ssh_new.F 195 COST_SSH_NEW 
     &                 psbar(i,j,bi,bj)
./pkg/ecco/cost_ssh_new.F 203 COST_SSH_NEW 
     &                 psbar(i,j,bi,bj)
./pkg/ecco/cost_ssh_new.F 324 COST_SSH_NEW 
        call ACTIVE_READ_XY( fname, psbar, irec, doglobalread,
./pkg/ecco/cost_ssh_new.F 350 COST_SSH_NEW 
                junk = ( psbar(i,j,bi,bj)
./pkg/ecco/cost_ssh_new.F 359 COST_SSH_NEW 
                junk       = ( psbar(i,j,bi,bj) -
./pkg/ecco/cost_ssh_new.F 379 COST_SSH_NEW 
                junk = ( psbar(i,j,bi,bj)
./pkg/ecco/cost_ssh_new.F 388 COST_SSH_NEW 
                junk       = ( psbar(i,j,bi,bj) -
./pkg/ecco/cost_ssh_new.F 408 COST_SSH_NEW 
                junk = ( psbar(i,j,bi,bj)
./pkg/ecco/cost_ssh_new.F 417 COST_SSH_NEW 
                junk       = ( psbar(i,j,bi,bj) -
./pkg/ecco/cost_sshv4.F 338 COST_SSHV4 
        call ACTIVE_READ_XY( fname, psbar, irec, doglobalread,
./pkg/ecco/cost_sshv4.F 366 COST_SSHV4 
     &                psbar(i,j,bi,bj) / float(ndaysrec)
./pkg/ecco/cost_sshv4.F 374 COST_SSHV4 
     &                 psbar(i,j,bi,bj)-tpobs(i,j,bi,bj)
./pkg/ecco/cost_sshv4.F 386 COST_SSHV4 
     &                 psbar(i,j,bi,bj)-ersobs(i,j,bi,bj)
./pkg/ecco/cost_sshv4.F 398 COST_SSHV4 
     &                 psbar(i,j,bi,bj)-gfoobs(i,j,bi,bj)
./pkg/ecco/cost_sshv4.F 641 COST_SSHV4 
        call ACTIVE_READ_XY( fname, psbar, krec, doglobalread,
./pkg/ecco/cost_sshv4.F 672 COST_SSHV4 
     &        psbar(i,j,bi,bj)-tpobs(i,j,bi,bj)
./pkg/ecco/cost_sshv4.F 675 COST_SSHV4 
     &        psbar(i,j,bi,bj)-tpobs(i,j,bi,bj)
./pkg/ecco/cost_sshv4.F 689 COST_SSHV4 
     &        psbar(i,j,bi,bj)-ersobs(i,j,bi,bj)
./pkg/ecco/cost_sshv4.F 694 COST_SSHV4 
     &        psbar(i,j,bi,bj)-ersobs(i,j,bi,bj)
./pkg/ecco/cost_sshv4.F 706 COST_SSHV4 
     &        psbar(i,j,bi,bj)-gfoobs(i,j,bi,bj)
./pkg/ecco/cost_sshv4.F 711 COST_SSHV4 
     &        psbar(i,j,bi,bj)-gfoobs(i,j,bi,bj)
./pkg/ecco/cost_sshv4.F 832 COST_SSHV4 
        call ACTIVE_READ_XY( fname, psbar, irec, doglobalread,
./pkg/ecco/cost_sshv4.F 869 COST_SSHV4 
     &       psbar(i,j,bi,bj) - tpobs(i,j,bi,bj)
./pkg/ecco/cost_sshv4.F 878 COST_SSHV4 
     &       psbar(i,j,bi,bj) - ersobs(i,j,bi,bj)
./pkg/ecco/cost_sshv4.F 887 COST_SSHV4 
     &       psbar(i,j,bi,bj) - gfoobs(i,j,bi,bj)
./pkg/ecco/ecco_cost.h 140 NO PROCEDURE 
     &                    psbar,
./pkg/ecco/ecco_cost.h 200 NO PROCEDURE 
      _RL psbar  (1-olx:snx+olx,1-oly:sny+oly,  nsx,nsy)
./pkg/ecco/ecco_cost.h 202 NO PROCEDURE 
      _RL psbar