& hfluxperiod, hfluxstartdate,
_RL hfluxstartdate
& hfluxfile, hfluxstartdate, hfluxperiod,
CALL CAL_TOSECONDS ( difftime, hfluxstartdate ,myThid)
hfluxstartdate = modelstart + hfluxstartdate
hfluxstartdate = 0.
& hfluxstartdate