& xx_obcswstartdate1, xx_obcswstartdate2, xx_obcswperiod,
& , xx_obcswperiod
_RL xx_obcswperiod
I xx_obcswstartdate, xx_obcswperiod,
fldperiod = xx_obcswperiod
startrec = int((modelstart - diffsecs)/xx_obcswperiod) + 1
endrec = int((modelend - diffsecs)/xx_obcswperiod) + 2
xx_obcswperiod = 0. _d 0