& xx_lwdownstartdate1, xx_lwdownstartdate2, xx_lwdownperiod,
& , xx_lwdownstartdate1
integer xx_lwdownstartdate1
call CAL_FULLDATE( xx_lwdownstartdate1, xx_lwdownstartdate2,
xx_lwdownstartdate1 = 0