IF ( noPnts ) theMin = theMean
IF ( noPnts ) theMax = theMean
LOGICAL noPnts
noPnts = .TRUE.
IF ( tmpMask.GT.0. _d 0 .AND. noPnts ) THEN
noPnts=.FALSE.
IF (arrMask(i,j,km,bi,bj).NE.0. .AND. noPnts(n)) THEN
noPnts(n)=.FALSE.
IF ( noPnts(n) ) theMin(n) = theMean(n)
IF ( noPnts(n) ) theMax(n) = theMin(n)
LOGICAL noPnts(Ny)
noPnts(n)=.TRUE.
noPnts=.TRUE.
IF (arrMask(I,J,K,bi,bj).NE.0. .AND. noPnts) THEN
IF ( noPnts ) THEN
noPnts = .FALSE.
IF ( tmpVal.NE.exclValue .AND. noPnts ) THEN