Source position: xforms.pp line 1250
procedure fl_initial_wingeometry(
p1: TFL_Coord;
p2: TFL_Coord;
p3: TFL_Coord;
p4: TFL_Coord
);