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