"Source: Text/Incidence/Plane.text";
"Line: 683";
"Date: Fri Sep 26 12:10:10 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Incidence/Plane.text, line: 683
// Example: H154E3 ()
print "Example: H154E3";
ei := GetEchoInput();
SetEchoInput(true);
A := FiniteAffinePlane< {@ 3, 4, 5, 6 @} | {3, 4}, {3, 5}, {3, 6},
                                     {4, 5}, {4, 6}, {5, 6} >;
Pts := Points(A);
Supp := Support(A);
Pts, Supp;
Universe(Pts);
Universe(Supp);
P, V, L := FiniteProjectivePlane(2);
Points(P);                    
Support(P);
Universe(Points(P)); 
Universe(Support(P));
l := Random(L);
l;
Support(l);
SetEchoInput(ei);
