_RL areamaskstartdate
& areamaskperiod, areamaskstartdate,
& areamaskfile, areamaskstartdate, areamaskperiod,
CALL CAL_TOSECONDS ( difftime, areamaskstartdate ,myThid)
areamaskstartdate= modelstart + areamaskstartdate
areamaskstartdate = 0.
& areamaskstartdate