topexstartdate1 = 0
call CAL_FULLDATE( topexstartdate1, topexstartdate2,
& topexstartdate1, topexstartdate2,
& topexstartdate1,
integer topexstartdate1