"Source: Text/RepThy/ModAlg.text";
"Line: 1540";
"Date: Fri Sep 26 12:10:12 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/RepThy/ModAlg.text, line: 1540
// Example: H99E11 ()
print "Example: H99E11";
ei := GetEchoInput();
SetEchoInput(true);
F2 := GF(2);
F := MatrixAlgebra(F2, 6);
A := sub< F |
  [ 1,0,0,1,0,1, 
    0,1,0,0,1,1, 
    0,1,1,1,1,0, 
    0,0,0,1,1,0, 
    0,0,0,1,0,1,
    0,1,0,1,0,0 ],
  [ 0,1,1,0,1,0,
    0,0,1,1,1,1,
    1,0,0,1,0,1,
    0,0,0,1,0,0,
    0,0,0,0,1,0,
    0,0,0,0,0,1 ] >;
T := RModule(F2, 6);
M := RModule(T, A);
Dimension(M);
assert $1 eq 6;
BaseRing(M);
R := RightAction(M);
R.1;
R.2;
M: Maximal;
SetEchoInput(ei);
