INTEGER wspeedstartdate2
& wspeedstartdate1, wspeedstartdate2,
I wspeedstartdate1, wspeedstartdate2,
& wspeedfile, wspeedstartdate1, wspeedstartdate2,
wspeedstartdate2 = 0