Doing it with "Last" also yields [[8,2],[8,2]].

gap> G := CyclicGroup(4);;
gap> A := TrivialGModule(G, GF(2));;
gap> A1 := AutomorphismGroup(G);;
gap> A2 := GL(1,2);;
gap> D := DirectProduct(A1,A2);;
gap> P := CompatiblePairs(G,A,D);;
gap> M := ExtensionRepresentatives(G,A,P);
[ <pc group of size 8 with 3 generators>, 
  <pc group of size 8 with 3 generators> ]
gap> List(last, IdGroup);
[ [ 8, 2 ], [ 8, 2 ] ]
gap> 


Lisette


_______________________________________________
Forum mailing list
[email protected]
http://mail.gap-system.org/mailman/listinfo/forum

Reply via email to