"Source: Text/Basics/FldNear.text";
"Line: 911";
"Date: Fri Jun 23 23:00:02 2017";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Basics/FldNear.text, line: 911
// Example: H23E9 ()
print "Example: H23E9";
ei := GetEchoInput();
SetEchoInput(true);
DP := FiniteProjectivePlane(49); // Desarguesian plane
DP;
CD  := CollineationGroup(DP);
FactoredOrder(CD);
N := DicksonNearfield(7,2);
NP := ProjectivePlane(N);
NP;
CN := CollineationGroup(NP);
FactoredOrder(CN);
Z := ZassenhausNearfield(3);
#Z;
assert $1 eq 49;
ZP := ProjectivePlane(Z);
CZ := CollineationGroup(ZP);
FactoredOrder(CZ);
HP := HughesPlane(N);
HP;
CH := CollineationGroup(HP);
FactoredOrder(CH);
CompositionFactors(CH);      
SetEchoInput(ei);
