"Source: Text/Incidence/Design.text";
"Line: 2702";
"Date: Sat Nov  9 18:06:06 2019";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Incidence/Design.text, line: 2702
// Example: H156E13 ()
print "Example: H156E13";
ei := GetEchoInput();
SetEchoInput(true);
M := VertexFacetHeightMatrix(PolytopeSmoothFanoDim3(10)); M;
A := AutomorphismGroup(M); A;
Nrows(M), Ncols(M);
Orbits(A);
D := Matrix(12, 8, [2-x:x in Eltseq(M)]);
f, x := IsIsomorphic(M, D); f, x;
M^x eq D;
assert $1;
SetEchoInput(ei);
