& lwdownstartdate1, lwdownstartdate2,
integer lwdownstartdate2
lwdownstartdate2 = 0
call CAL_FULLDATE ( lwdownstartdate1 , lwdownstartdate2,
& lwdownstartdate1, lwdownstartdate2, lwdownperiod,