1gens := ShallowCopy(AtlasGenerators("HS",9).generators);
2c := CanonicalBasis(GF(GF(2),3));
3Add(gens,Z(8)*gens[1]^0);
4gens8 := List(gens,x->BlownUpMat(c,x));
5for m in gens8 do ConvertToMatrixRep(m,2); od;
6x := RandomUnimodularMat(60)*Z(2);
7ConvertToMatrixRep(x,2);
8xi := x^-1;
9genssemi := List(gens8,y->x*y*xi);
10m := GModuleByMats(genssemi,GF(2));
11
12