& , xx_snowprecipstartdate
integer xx_snowprecipstartdate(4)
I xx_snowprecipstartdate,
& xx_snowprecipstartdate2, xx_snowprecipstartdate , mythid )
call CAL_TIMEPASSED( xx_snowprecipstartdate, modelstartdate,
& xx_snowprecip_file, xx_snowprecipstartdate,