Symbol Description Uses
gfomask 33



File Line number Procedure Code
./pkg/ecco/cost_gencost_sshv4.F 231 COST_GENCOST_SSHV4
     &                gfoobs, gfomask,
./pkg/ecco/cost_gencost_sshv4.F 255 COST_GENCOST_SSHV4
      if ( gfomask(i,j,bi,bj)*tpmeanmask(i,j,bi,bj)*
./pkg/ecco/cost_gencost_sshv4.F 377 COST_GENCOST_SSHV4
     &                gfoobs, gfomask,
./pkg/ecco/cost_gencost_sshv4.F 412 COST_GENCOST_SSHV4
                if ( gfomask(i,j,bi,bj)*
./pkg/ecco/cost_gencost_sshv4.F 681 COST_GENCOST_SSHV4
     &                gfoobs, gfomask,
./pkg/ecco/cost_gencost_sshv4.F 724 COST_GENCOST_SSHV4
      if ( gfomask(i,j,bi,bj)*mean_psMgfoobs_MSK(i,j,bi,bj)
./pkg/ecco/cost_gencost_sshv4.F 905 COST_GENCOST_SSHV4
      if ( gfomask(i,j,bi,bj)*mean_psMgfoobs_MSK(i,j,bi,bj).NE.0. )
./pkg/ecco/cost_gencost_sshv4.F 974 COST_GENCOST_SSHV4
     &                      *gfomask(i,j,bi,bj)
./pkg/ecco/cost_readgfo.F 132 COST_READGFO
                 gfomask(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_readgfo.F 134 COST_READGFO
                 gfomask(i,j,bi,bj) = 1. _d 0
./pkg/ecco/cost_readgfo.F 137 COST_READGFO
                gfomask(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_readgfo.F 140 COST_READGFO
                 gfomask(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_readgfo.F 144 COST_READGFO
                gfomask(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_readgfo.F 147 COST_READGFO
              gfomask(i,j,bi,bj) = gfomask(i,j,bi,bj)*frame(i,j)
./pkg/ecco/cost_readgfo.F 148 COST_READGFO
              gfoobs(i,j,bi,bj)  = gfomask(i,j,bi,bj)*factor*
./pkg/ecco/cost_ssh.F 320 COST_SSH
     &                        *gfomask(i,j,bi,bj)
./pkg/ecco/cost_ssh.F 326 COST_SSH
                if (tpmeanmask(i,j,bi,bj)*gfomask(i,j,bi,bj)
./pkg/ecco/cost_ssh_new.F 200 COST_SSH_NEW
                if ( gfomask(i,j,bi,bj)*wgfo(i,j,bi,bj)
./pkg/ecco/cost_ssh_new.F 405 COST_SSH_NEW
     &                        *gfomask(i,j,bi,bj)
./pkg/ecco/cost_ssh_new.F 415 COST_SSH_NEW
                if (tpmeanmask(i,j,bi,bj)*gfomask(i,j,bi,bj)
./pkg/ecco/cost_sshv4.F 211 COST_SSHV4
     &                gfoobs, gfomask,
./pkg/ecco/cost_sshv4.F 235 COST_SSHV4
      if ( gfomask(i,j,bi,bj)*tpmeanmask(i,j,bi,bj)*
./pkg/ecco/cost_sshv4.F 357 COST_SSHV4
     &                gfoobs, gfomask,
./pkg/ecco/cost_sshv4.F 392 COST_SSHV4
                if ( gfomask(i,j,bi,bj)*wsshv4(i,j,4,bi,bj)
./pkg/ecco/cost_sshv4.F 660 COST_SSHV4
     &                gfoobs, gfomask,
./pkg/ecco/cost_sshv4.F 703 COST_SSHV4
      if ( gfomask(i,j,bi,bj)*mean_psMgfoobs_MSK(i,j,bi,bj)
./pkg/ecco/cost_sshv4.F 884 COST_SSHV4
      if ( gfomask(i,j,bi,bj)*mean_psMgfoobs_MSK(i,j,bi,bj).NE.0. )
./pkg/ecco/cost_sshv4.F 955 COST_SSHV4
     &                      *gfomask(i,j,bi,bj)
./pkg/ecco/ecco_cost.h 1239 NO PROCEDURE
     &                     gfomask,
./pkg/ecco/ecco_cost.h 1270 NO PROCEDURE
      _RL gfomask   (1-olx:snx+olx,1-oly:sny+oly,   nsx,nsy)
./pkg/ecco/ecco_cost_init_varia.F 253 ECCO_COST_INIT_VARIA
                  gfomask(i,j,bi,bj) = 0. _d 0
./pkg/ecco/ecco_cost_init_varia.F 255 ECCO_COST_INIT_VARIA
                  gfomask(i,j,bi,bj) = 1. _d 0