1# This is A14 mod 3 dim 13 wreath S5:
2LoadPackage("cvec");
3gens := AtlasGenerators("A14",11).generators;
4l := [];
5Add(l,CVEC_GlueMatrices([gens[1],gens[1]^0,gens[1]^0,gens[1]^0,gens[1]^0]));
6Add(l,CVEC_GlueMatrices([gens[2],gens[1]^0,gens[1]^0,gens[1]^0,gens[1]^0]));
7Add(l,KroneckerProduct(PermutationMat((1,2,3,4,5),5,GF(3)),gens[1]^0));
8Add(l,KroneckerProduct(PermutationMat((1,2),5,GF(3)),gens[1]^0));
9g := Group(l);
10