Symbol Description Uses
maskInW West face 2-D Interior mask (i.e., zero on and beyond OB) 35



File Line number Procedure Code
./pkg/monitor/monitor.F 111 MONITOR
     &           hFacW, maskInW, rAw, thickFacC, dummyRL, myThid )
./pkg/monitor/monitor.F 141 MONITOR
     &            maskInW, maskInW, rAw, drF, dummyRL, myThid )
./pkg/monitor/monitor_ad.F 114 ADMONITOR
     &           hFacW, maskInW, rAw, drF, dummyRL, myThid )
./pkg/monitor/monitor_ad.F 145 ADMONITOR
     &            maskInW, maskInW, rAw, drF, dummyRL, myThid )
./pkg/monitor/monitor_g.F 115 G_MONITOR
     &           hFacW, maskInW, rAw, drF, dummyRL, myThid )
./pkg/monitor/monitor_g.F 146 G_MONITOR
     &            maskInW, maskInW, rAw, drF, dummyRL, myThid )
./pkg/obcs/obcs_init_fixed.F 50 OBCS_INIT_FIXED
            maskInW(i,j,bi,bj) = 0.
./pkg/obcs/obcs_init_fixed.F 64 OBCS_INIT_FIXED
            maskInW(i,j,bi,bj) = 0.
./pkg/obcs/obcs_init_fixed.F 74 OBCS_INIT_FIXED
            maskInW(i,j,bi,bj) = 0.
./pkg/obcs/obcs_init_fixed.F 75 OBCS_INIT_FIXED
            IF (i.LT.sNx+OLx) maskInW(i+1,j,bi,bj) = 0.
./pkg/obcs/obcs_init_fixed.F 84 OBCS_INIT_FIXED
            maskInW(i,j,bi,bj) = 0.
./pkg/obcs/obcs_init_fixed.F 85 OBCS_INIT_FIXED
            IF (i.LT.sNx+OLx) maskInW(i+1,j,bi,bj) = 0.
./pkg/seaice/seaice_monitor.F 99 SEAICE_MONITOR
     &           maskInW, maskInW, rAw, drF, dummyRL, myThid )
./model/src/ini_masks_etc.F 314 INI_MASKS_ETC
          maskInW(i,j,bi,bj)= 0.
./model/src/ini_masks_etc.F 315 INI_MASKS_ETC
          IF ( kSurfW(i,j,bi,bj).LE.Nr ) maskInW(i,j,bi,bj)= 1.
./model/src/ini_sigma_hfac.F 138 INI_SIGMA_HFAC
           maskInW(i,j,bi,bj)= 0.
./model/src/ini_sigma_hfac.F 148 INI_SIGMA_HFAC
           maskInW(i,j,bi,bj)= maskInC(i-1,j,bi,bj)*maskInC(i,j,bi,bj)
./model/src/ini_sigma_hfac.F 163 INI_SIGMA_HFAC
           IF ( maskInW(i,j,bi,bj).EQ.0. ) THEN
./model/src/ini_sigma_hfac.F 196 INI_SIGMA_HFAC
      CALL EXCH_UV_XY_RS( maskInW, maskInS, .FALSE., myThid )
./model/src/ini_sigma_hfac.F 205 INI_SIGMA_HFAC
           IF (dyG(i,j,bi,bj).EQ.0.) maskInW(i,j,bi,bj) = 0.
./model/src/ini_sigma_hfac.F 222 INI_SIGMA_HFAC
            hFacW(i,j,k,bi,bj) = hFactmp*maskInW(i,j,bi,bj)
./model/src/ini_sigma_hfac.F 242 INI_SIGMA_HFAC
           IF ( maskInW(i,j,bi,bj).NE.0. ) kSurfW(i,j,bi,bj) = 1
./model/src/write_grid.F 105 WRITE_GRID
          CALL WRITE_FLD_XY_RS( 'maskInW',' ', maskInW, -1, myThid )
./pkg/diagnostics/diagstats_local.F 194 DIAGSTATS_LOCAL
     I            maskInW(1-Olx,1-Oly,bi,bj),
./pkg/diagnostics/diagstats_local.F 195 DIAGSTATS_LOCAL
     I            maskInW(1-Olx,1-Oly,bi,bj),rAw(1-Olx,1-Oly,bi,bj),
./model/inc/GRID.h 422 NO PROCEDURE
     &  maskInC, maskInW, maskInS,
./model/inc/GRID.h 474 NO PROCEDURE
      _RS maskInW        (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/exf/exf_monitor.F 103 EXF_MONITOR
     &             maskInW, maskInW, rAw, drF, dummyRL, myThid )
./pkg/exf/exf_monitor.F 172 EXF_MONITOR
     &             maskInW, maskInW, rAw, drF, dummyRL, myThid )