secondsInYear = ndaysnoleap * secondsperday
& secondsInYear = ndaysleap * secondsperday
& myDateSeconds = myDateSeconds + secondsInYear
if ( (fldstartdate+count0*fldperiod) .ge. secondsInYear ) then
& fac = 1. - fldsecs/(secondsInYear-(count0-1)*fldperiod)
_RL secondsInYear, myDateSeconds
TYEAR=myDateSeconds/secondsInYear