& sfluxperiod, sfluxstartdate,
_RL sfluxstartdate
& sfluxfile, sfluxstartdate, sfluxperiod,
CALL CAL_TOSECONDS ( difftime, sfluxstartdate ,myThid)
sfluxstartdate = modelstart + sfluxstartdate
sfluxstartdate = 0.
& sfluxstartdate