cstruc:= function(G,s)
return Filtered(Elements(G), x -> CycleStructurePerm(x) = s);
end;