INTEGER tidePotStartdate2
& tidePotStartdate1, tidePotStartdate2,
I tidePotStartdate1, tidePotStartdate2,
& tidePotFile, tidePotStartdate1, tidePotStartdate2,
tidePotStartdate2 = 0