INTEGER prevMnthIndex
DATA prevMnthIndex / 0 /
SAVE prevMnthIndex
IF ( mnthIndex .NE. prevMnthIndex .OR.
prevMnthIndex = mnthIndex
IF (myIter.EQ.nIter0 .OR. nm0.NE.prevMnthIndex) THEN
prevMnthIndex = nm0