& xx_sststartdate1, xx_sststartdate2, xx_sstperiod,
& , xx_sstperiod
_RL xx_sstperiod
fldperiod = xx_sstperiod
if ( xx_sstperiod .EQ. 0 ) then
& xx_sstperiod) + 1
& xx_sstperiod) + 2
xx_sstperiod = 0. _d 0
& xx_sst_file, xx_sststartdate, xx_sstperiod,