I siobSstartdate, siobSperiod,
_RL siobSstartdate
& siobSperiod, siobSstartdate,
CALL CAL_TOSECONDS ( difftime, siobSstartdate ,myThid)
siobSstartdate = modelstart + siobSstartdate
siobSstartdate = 0.