_RL precipstartdate
& precipperiod, precipstartdate,
& precipfile, precipstartdate, precipperiod,
CALL CAL_TOSECONDS ( difftime, precipstartdate ,myThid)
precipstartdate = modelstart + precipstartdate
precipstartdate = 0.
& precipstartdate