Zu welcher Prozedur soll denn der Quelltext ganz unten gehören?

Delphi-Quellcode:
begin
Setlength(Koerper,7);
Koerper[0] := Point(30,100);
Koerper[1] := Point(25,100);
Koerper[2] := Point(20,100);
Koerper[3] := Point(15,100);
Koerper[4] := Point(10,100);
Koerper[5] := Point(5,100);
Koerper[6] := Point(0,100);
end.
Der hängt da irgendwie lose herum.