sylows:= function(G,p)
local H,w;
H:= SylowSubgroup(G,p);
w:= ConjugateSubgroups(G,H);
Print("The Sylow ", p, "-subgroups of ", G, " are: ");
return w;
end;