n = NLATBND(nSepBnd, ySepBnd, arrY(i,j,bi,bj) )
DO n=1,nSepBnd
I myNr, mskNr, kLoc, nSepBnd, ySepBnd,
INTEGER nSepBnd
_RS ySepBnd(nSepBnd)
_RL theMin(nSepBnd)
_RL theMax(nSepBnd)
_RL theMean(nSepBnd)
_RL theVar(nSepBnd)
_RL theVol(nSepBnd)
IF ( nSepBnd .GT. nSepDim ) THEN
& 'MON_STATS_LATBND_RL: Need nSepDim to be at least =', nSepBnd