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



File Line number Procedure Code
./pkg/monitor/monitor.F 113 MONITOR
     &           hFacS, maskInS, rAs, thickFacC, dummyRL, myThid )
./pkg/monitor/monitor.F 143 MONITOR
     &            maskInS, maskInS, rAs, drF, dummyRL, myThid )
./pkg/monitor/monitor_ad.F 116 ADMONITOR
     &           hFacS, maskInS, rAs, drF, dummyRL, myThid )
./pkg/monitor/monitor_ad.F 147 ADMONITOR
     &            maskInS, maskInS, rAs, drF, dummyRL, myThid )
./pkg/monitor/monitor_g.F 117 G_MONITOR
     &           hFacS, maskInS, rAs, drF, dummyRL, myThid )
./pkg/monitor/monitor_g.F 148 G_MONITOR
     &            maskInS, maskInS, rAs, drF, dummyRL, myThid )
./pkg/obcs/obcs_init_fixed.F 51 OBCS_INIT_FIXED
            maskInS(i,j,bi,bj) = 0.
./pkg/obcs/obcs_init_fixed.F 52 OBCS_INIT_FIXED
            IF (j.LT.sNy+OLy) maskInS(i,j+1,bi,bj) = 0.
./pkg/obcs/obcs_init_fixed.F 60 OBCS_INIT_FIXED
            maskInS(i,j,bi,bj) = 0.
./pkg/obcs/obcs_init_fixed.F 61 OBCS_INIT_FIXED
            IF (j.LT.sNy+OLy) maskInS(i,j+1,bi,bj) = 0.
./pkg/obcs/obcs_init_fixed.F 76 OBCS_INIT_FIXED
            maskInS(i,j,bi,bj) = 0.
./pkg/obcs/obcs_init_fixed.F 88 OBCS_INIT_FIXED
            maskInS(i,j,bi,bj) = 0.
./pkg/seaice/seaice_monitor.F 108 SEAICE_MONITOR
     &           maskInS, maskInS, rAs, drF, dummyRL, myThid )
./model/src/ini_masks_etc.F 316 INI_MASKS_ETC
          maskInS(i,j,bi,bj)= 0.
./model/src/ini_masks_etc.F 317 INI_MASKS_ETC
          IF ( kSurfS(i,j,bi,bj).LE.Nr ) maskInS(i,j,bi,bj)= 1.
./model/src/ini_sigma_hfac.F 144 INI_SIGMA_HFAC
           maskInS(i,j,bi,bj)= 0.
./model/src/ini_sigma_hfac.F 171 INI_SIGMA_HFAC
           maskInS(i,j,bi,bj)= maskInC(i,j-1,bi,bj)*maskInC(i,j,bi,bj)
./model/src/ini_sigma_hfac.F 186 INI_SIGMA_HFAC
           IF ( maskInS(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 206 INI_SIGMA_HFAC
           IF (dxG(i,j,bi,bj).EQ.0.) maskInS(i,j,bi,bj) = 0.
./model/src/ini_sigma_hfac.F 233 INI_SIGMA_HFAC
            hFacS(i,j,k,bi,bj) = hFactmp*maskInS(i,j,bi,bj)
./model/src/ini_sigma_hfac.F 243 INI_SIGMA_HFAC
           IF ( maskInS(i,j,bi,bj).NE.0. ) kSurfS(i,j,bi,bj) = 1
./model/src/write_grid.F 106 WRITE_GRID
          CALL WRITE_FLD_XY_RS( 'maskInS',' ', maskInS, -1, myThid )
./pkg/diagnostics/diagstats_local.F 205 DIAGSTATS_LOCAL
     I            maskInS(1-Olx,1-Oly,bi,bj),
./pkg/diagnostics/diagstats_local.F 206 DIAGSTATS_LOCAL
     I            maskInS(1-Olx,1-Oly,bi,bj),rAs(1-Olx,1-Oly,bi,bj),
./model/inc/GRID.h 422 NO PROCEDURE
     &  maskInC, maskInW, maskInS,
./model/inc/GRID.h 475 NO PROCEDURE
      _RS maskInS        (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/exf/exf_monitor.F 105 EXF_MONITOR
     &             maskInS, maskInS, rAs, drF, dummyRL, myThid )
./pkg/exf/exf_monitor.F 174 EXF_MONITOR
     &             maskInS, maskInS, rAs, drF, dummyRL, myThid )