_RL lwfluxstartdate
& lwfluxperiod, lwfluxstartdate,
& lwfluxfile, lwfluxstartdate, lwfluxperiod,
CALL CAL_TOSECONDS ( difftime, lwfluxstartdate ,myThid)
lwfluxstartdate = modelstart + lwfluxstartdate
lwfluxstartdate = 0.
& lwfluxstartdate