_RL climsststartdate
& climsstperiod, climsststartdate,
& climsstfile, climsststartdate, climsstperiod,
CALL CAL_TOSECONDS (difftime, climsststartdate ,myThid)
climsststartdate = modelstart + climsststartdate
climsststartdate = 0.
& climsststartdate