& xx_lwfluxstartdate1, xx_lwfluxstartdate2, xx_lwfluxperiod,
& , xx_lwfluxstartdate1
integer xx_lwfluxstartdate1
call CAL_FULLDATE( xx_lwfluxstartdate1, xx_lwfluxstartdate2,
xx_lwfluxstartdate1 = 0