"Source: Text/Basics/FldForms.text";
"Line: 2148";
"Date: Thu Sep 25 14:47:46 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Basics/FldForms.text, line: 2148
// Example: H30E32 ()
print "Example: H30E32";
ei := GetEchoInput();
SetEchoInput(true);
F<x> := GF(5,2);      
mu := hom< F->F | x :-> x^5 >;
H := MatrixGroup< 5, F |
   [ 0, x^3, 0, 1, x^9, x^8, 1, 0, x^11, x^7, x^20, x^16, 1, 
    x^11, x^3, x^21, 4, 1, x^3, x^23, x^4, x^3, x, x^3, 2 ] >;
M := GModule(H);
D := SemilinearDual(M,mu);
E := AHom(M,D);
Dimension(E);
assert $1 eq 5;
herm := InvariantSesquilinearForms(H);
#herm;
assert $1 eq 5;
SetEchoInput(ei);
