"Source: Text/Basics/FldForms.text";
"Line: 2037";
"Date: Thu Sep 25 14:47:46 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Basics/FldForms.text, line: 2037
// Example: H30E30 ()
print "Example: H30E30";
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);
