"Source: Text/Basics/FldForms.text";
"Line: 1935";
"Date: Thu Jun 16 15:04:46 2022";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Basics/FldForms.text, line: 1935
// Example: H30E29 ()
print "Example: H30E29";
ei := GetEchoInput();
SetEchoInput(true);
F<a> := GF(25);
G := MatrixGroup< 4, F | 
  [ a^10, a^21, a^4, 4, 
    a^16, 4, a^9, a^8, 
    a^20, 4, 4, a^13, 
    0, a^2, a^11, a ] >;
IsIrreducible(G), #G;
sym, alt := InvariantBilinearForms(G);
#sym,#alt;
SetEchoInput(ei);
