Symbol Description Uses
cmask 69


File Line number Procedure Code
./pkg/seaice/seaice_cost_concentration.F 337 SEAICE_COST_CONCENTRATION 
               cmask(i,j,k) = cosphi(i,j,bi,bj)*localmask(i,j,k,bi,bj)
./pkg/seaice/seaice_cost_concentration.F 341 SEAICE_COST_CONCENTRATION 
                   cmask(i,j,k) = 0. _d 0
./pkg/seaice/seaice_cost_concentration.F 350 SEAICE_COST_CONCENTRATION 
                localwww  = localweight(i,j,bi,bj)*cmask(i,j,k)
./pkg/seaice/seaice_cost_concentration.F 353 SEAICE_COST_CONCENTRATION 
                localwww  = localModWeight(i,j,bi,bj)*cmask(i,j,k)
./pkg/seaice/seaice_cost_concentration.F 93 SEAICE_COST_CONCENTRATION 
      _RL cmask (1-olx:snx+olx,1-oly:sny+oly,nnzobs)
./pkg/seaice/seaice_cost_sss.F 297 SEAICE_COST_SSS 
               cmask(i,j,k) = cosphi(i,j,bi,bj)*localmask(i,j,k,bi,bj)
./pkg/seaice/seaice_cost_sss.F 301 SEAICE_COST_SSS 
                   cmask(i,j,k) = 0. _d 0
./pkg/seaice/seaice_cost_sss.F 310 SEAICE_COST_SSS 
                localwww  = localweight(i,j,bi,bj)*cmask(i,j,k)
./pkg/seaice/seaice_cost_sss.F 94 SEAICE_COST_SSS 
      _RL cmask (1-olx:snx+olx,1-oly:sny+oly,nnzobs)
./pkg/seaice/seaice_cost_sst.F 297 SEAICE_COST_SST 
               cmask(i,j,k) = cosphi(i,j,bi,bj)*localmask(i,j,k,bi,bj)
./pkg/seaice/seaice_cost_sst.F 301 SEAICE_COST_SST 
                   cmask(i,j,k) = 0. _d 0
./pkg/seaice/seaice_cost_sst.F 310 SEAICE_COST_SST 
                localwww  = localweight(i,j,bi,bj)*cmask(i,j,k)
./pkg/seaice/seaice_cost_sst.F 92 SEAICE_COST_SST 
      _RL cmask (1-olx:snx+olx,1-oly:sny+oly,nnzobs)
./pkg/ecco/cost_ctds.F 158 COST_CTDS 
                  cmask(i,j) = 1. _d 0
./pkg/ecco/cost_ctds.F 162 COST_CTDS 
                    cmask(i,j) = 0. _d 0
./pkg/ecco/cost_ctds.F 167 COST_CTDS 
                     www(i,j)    = cosphi(i,j,bi,bj)*cmask(i,j)
./pkg/ecco/cost_ctds.F 65 COST_CTDS 
      _RL cmask (1-olx:snx+olx,1-oly:sny+oly)
./pkg/ecco/cost_ctdsclim.F 180 COST_CTDSCLIM 
                  cmask(i,j) = 1. _d 0
./pkg/ecco/cost_ctdsclim.F 182 COST_CTDSCLIM 
                    cmask(i,j) = 0. _d 0
./pkg/ecco/cost_ctdsclim.F 185 COST_CTDSCLIM 
                    cmask(i,j) = 0. _d 0
./pkg/ecco/cost_ctdsclim.F 197 COST_CTDSCLIM 
     &                    cmask(i,j)*
./pkg/ecco/cost_ctdsclim.F 75 COST_CTDSCLIM 
      _RL cmask (1-olx:snx+olx,1-oly:sny+oly)
./pkg/ecco/cost_ctdt.F 159 COST_CTDT 
                  cmask(i,j) = 1. _d 0
./pkg/ecco/cost_ctdt.F 163 COST_CTDT 
                    cmask(i,j) = 0. _d 0
./pkg/ecco/cost_ctdt.F 170 COST_CTDT 
                     www(i,j)    = cosphi(i,j,bi,bj)*cmask(i,j)
./pkg/ecco/cost_ctdt.F 66 COST_CTDT 
      _RL cmask (1-olx:snx+olx,1-oly:sny+oly)
./pkg/ecco/cost_ctdtclim.F 179 COST_CTDTCLIM 
                  cmask(i,j) = 1. _d 0
./pkg/ecco/cost_ctdtclim.F 181 COST_CTDTCLIM 
                    cmask(i,j) = 0. _d 0
./pkg/ecco/cost_ctdtclim.F 185 COST_CTDTCLIM 
                    cmask(i,j) = 0. _d 0
./pkg/ecco/cost_ctdtclim.F 197 COST_CTDTCLIM 
     &                    cmask(i,j)*
./pkg/ecco/cost_ctdtclim.F 75 COST_CTDTCLIM 
      _RL cmask (1-olx:snx+olx,1-oly:sny+oly)
./pkg/ecco/cost_gencost_seaicev4.F 371 COST_GENCOST_SEAICEV4 
               cmask(i,j,k) = cosphi(i,j,bi,bj)*localmask(i,j,k,bi,bj)
./pkg/ecco/cost_gencost_seaicev4.F 375 COST_GENCOST_SEAICEV4 
                   cmask(i,j,k) = 0. _d 0
./pkg/ecco/cost_gencost_seaicev4.F 409 COST_GENCOST_SEAICEV4 
                localwww  = localweight(i,j,k,bi,bj)*cmask(i,j,k)
./pkg/ecco/cost_gencost_seaicev4.F 430 COST_GENCOST_SEAICEV4 
                   junk=1. _d 0 *cmask(i,j,k)*
./pkg/ecco/cost_gencost_seaicev4.F 457 COST_GENCOST_SEAICEV4 
                 junk=1. _d 0 *cmask(i,j,k)*
./pkg/ecco/cost_gencost_seaicev4.F 98 COST_GENCOST_SEAICEV4 
      _RL cmask (1-olx:snx+olx,1-oly:sny+oly,nnzobs)
./pkg/ecco/cost_generic.F 273 COST_GENERIC 
               cmask(i,j,k) = cosphi(i,j,bi,bj)*localmask(i,j,k,bi,bj)
./pkg/ecco/cost_generic.F 277 COST_GENERIC 
                   cmask(i,j,k) = 0. _d 0
./pkg/ecco/cost_generic.F 286 COST_GENERIC 
                localwww  = localweight(i,j,k,bi,bj)*cmask(i,j,k)
./pkg/ecco/cost_generic.F 95 COST_GENERIC 
      _RL cmask (1-olx:snx+olx,1-oly:sny+oly,nnzobs)
./pkg/ecco/cost_salt.F 180 COST_SALT 
                  cmask(i,j) = cosphi(i,j,bi,bj)
./pkg/ecco/cost_salt.F 182 COST_SALT 
                    cmask(i,j) = 0. _d 0
./pkg/ecco/cost_salt.F 184 COST_SALT 
                    cmask(i,j) = 0. _d 0
./pkg/ecco/cost_salt.F 186 COST_SALT 
                    cmask(i,j) = 0. _d 0
./pkg/ecco/cost_salt.F 197 COST_SALT 
     &                    (wsaltLev(i,j,k,bi,bj)*cmask(i,j)*
./pkg/ecco/cost_salt.F 200 COST_SALT 
                     if ( wsaltLev(i,j,k,bi,bj)*cmask(i,j) .ne. 0. )
./pkg/ecco/cost_salt.F 203 COST_SALT 
     &                    (wsaltLev(i,j,k,bi,bj)*cmask(i,j)*
./pkg/ecco/cost_salt.F 72 COST_SALT 
      _RL cmask (1-olx:snx+olx,1-oly:sny+oly)
./pkg/ecco/cost_sigmar.F 173 COST_SIGMAR 
                  cmask(i,j) = cosphi(i,j,bi,bj)
./pkg/ecco/cost_sigmar.F 175 COST_SIGMAR 
                    cmask(i,j) = 0. _d 0
./pkg/ecco/cost_sigmar.F 177 COST_SIGMAR 
                    cmask(i,j) = 0. _d 0
./pkg/ecco/cost_sigmar.F 179 COST_SIGMAR 
                    cmask(i,j) = 0. _d 0
./pkg/ecco/cost_sigmar.F 190 COST_SIGMAR 
     &                (wsigmaRLev(i,j,k,bi,bj)*cmask(i,j)*
./pkg/ecco/cost_sigmar.F 193 COST_SIGMAR 
                     if ( wsigmaRLev(i,j,k,bi,bj)*cmask(i,j) .ne. 0. )
./pkg/ecco/cost_sigmar.F 73 COST_SIGMAR 
      _RL cmask (1-olx:snx+olx,1-oly:sny+oly)
./pkg/ecco/cost_theta.F 180 COST_THETA 
                  cmask(i,j) = cosphi(i,j,bi,bj)
./pkg/ecco/cost_theta.F 182 COST_THETA 
                    cmask(i,j) = 0. _d 0
./pkg/ecco/cost_theta.F 184 COST_THETA 
                    cmask(i,j) = 0. _d 0
./pkg/ecco/cost_theta.F 186 COST_THETA 
                    cmask(i,j) = 0. _d 0
./pkg/ecco/cost_theta.F 197 COST_THETA 
     &                    (wthetaLev(i,j,k,bi,bj)*cmask(i,j)*
./pkg/ecco/cost_theta.F 200 COST_THETA 
                     if ( wthetaLev(i,j,k,bi,bj)*cmask(i,j) .ne. 0. )
./pkg/ecco/cost_theta.F 203 COST_THETA 
     &                    (wthetaLev(i,j,k,bi,bj)*cmask(i,j)*
./pkg/ecco/cost_theta.F 73 COST_THETA 
      _RL cmask (1-olx:snx+olx,1-oly:sny+oly)
./pkg/ecco/cost_xbt.F 164 COST_XBT 
                  cmask(i,j) = cosphi(i,j,bi,bj)
./pkg/ecco/cost_xbt.F 168 COST_XBT 
                    cmask(i,j) = 0. _d 0
./pkg/ecco/cost_xbt.F 190 COST_XBT 
     &                   (wtheta2(i,j,k,bi,bj)*cmask(i,j))*
./pkg/ecco/cost_xbt.F 193 COST_XBT 
                    if ( wtheta2(i,j,k,bi,bj)*cmask(i,j) .ne. 0. )
./pkg/ecco/cost_xbt.F 64 COST_XBT 
      _RL cmask (1-olx:snx+olx,1-oly:sny+oly)