"Source: Text/RepThy/ModAlg.text";
"Line: 2340";
"Date: Fri Sep 26 12:10:12 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/RepThy/ModAlg.text, line: 2340
// Example: H99E16 ()
print "Example: H99E16";
ei := GetEchoInput();
SetEchoInput(true);
G := PSL(3, 4);
M := PermutationModule(G, GF(2));
x := M![0,0,0,1,0,1,0,0,0,1,1,0,0,0,1,0,1,1,0,0,1];
N := sub< M | x >;
N;
Q, phi := quo< M | x >;
Q;
K :=  Kernel(phi);
K eq N;
assert $1;
x := Q![0,0,0,1,1,0,0,0,0,1,0,0];
PreIm := { x@@phi + k : k in K };
#PreIm;
assert $1 eq 512;
SetEchoInput(ei);
