& nIter0, nTimeSteps, nEndIter, pickupSuff,
IF ( nTimeSteps .EQ. 0 .AND. nEndIter .NE. 0 )
& nTimeSteps = nEndIter-nIter0
IF ( nEndIter .EQ. 0 .AND. nTimeSteps .NE. 0 )
& nEndIter = nIter0+nTimeSteps
IF ( nEndIter .EQ. 0 .AND. endTime .NE. 0. )
& nEndIter = NINT((endTime-baseTime)/deltaTclock)
IF ( endTime .EQ. 0. .AND. nEndIter .NE. 0 )
& endTime = baseTime + deltaTClock*float(nEndIter)
IF ( nEndIter .NE. nIter0+nTimeSteps ) THEN
& nIter0, nTimeSteps, nEndIter,
INTEGER nEndIter
moditerend = nEndIter
nEndIter = nIter0+nTimeSteps
endTime = deltaT*float(nEndIter)