# zu Aufgabe 3

G:=Group([(1,2,3)]);
H:=Group([(1,2)]);

AutG:=AutomorphismGroup(G);
elAutG:=Elements(AutG);

img:=elAutG[1];
phi:=GroupHomomorphismByImages(H,AutG,[(1,2)],[img]);
P:=SemidirectProduct( H,phi,G );
Elements(P);

img:=elAutG[2];
phi:=GroupHomomorphismByImages(H,AutG,[(1,2)],[img]);
P:=SemidirectProduct( H,phi,G );
Elements(P);