Zur Korrektur müssen nur die drei letzten Aufrufe von CorrectPosition (nicht aber der erste, der wird gebraucht) in der Funktion Calc_Rise_Set gelöscht werden. ###>To fix it just remove the three last calls of CorrectPosition (not the first one however) inside the Calc_Rise_Set function.