else if ( numyears .gt. 1 ) then
& ( iyear .lt. numyears ) ) then
else if ( iyear .eq. numyears ) then
if ( lastyear .eq. (firstyear + numyears - 1) ) then
& (numyears - 2)*nmonthyear + lastmon - 1
& (numyears - 2)*nmonthyear + lastmon
& (numyears - 2)*nmonthyear + 1
else if ( lastyear .eq. (firstyear + numyears) ) then
& (numyears - 2)*nmonthyear + nmonthyear
integer numyears
numyears = cal_IntYears( mythid )
if ( numyears .eq. 1 ) then