INTEGER DAYS(14), daysm, days0, daysp
daysp = days(month+2)
if( month.eq.1 ) daysp = daysp+1
MIDMON2 = daysp/2 + 1