dev:=function(g,bb)
return Union(List(bb,x->Orbit(g,x,OnSets)));
end;

alpha:=(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17);
beta:=(2,4,10,11,14,6,16,12,17,15,9,8,5,13,3,7);
g1:=Group(alpha,beta);

gamma:=(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19);
delta:=(2,3,5,9,17,14,8,15,10,19,18,16,12,4,7,13,6,11);
g3:=Group(gamma,delta);
g4:=Group(gamma,delta^2);

bb5g1:=[ [ 1, 2, 3, 4, 5, 6, 8, 9, 13 ], [ 1, 2, 3, 4, 5, 6, 8, 9, 18 ], [ 1, 2, 3, 4, 5, 6, 8, 13, 14 ],
[ 1, 2, 3, 4, 5, 6, 9, 12, 14 ], [ 1, 2, 3, 4, 5, 6, 10, 12, 18 ], [ 1, 2, 3, 4, 5, 7, 8, 10, 18 ],
[ 1, 2, 3, 4, 5, 7, 11, 12, 16 ], [ 1, 2, 3, 4, 5, 7, 14, 18, 19 ], [ 1, 2, 3, 4, 5, 7, 16, 18, 19 ],
[ 1, 2, 3, 4, 5, 8, 9, 13, 19 ], [ 1, 2, 3, 4, 5, 8, 15, 18, 19 ], [ 1, 2, 3, 4, 5, 10, 13, 18, 19 ],
[ 1, 2, 3, 4, 6, 7, 9, 10, 19 ], [ 1, 2, 3, 4, 6, 9, 13, 15, 19 ], [ 1, 2, 3, 5, 11, 13, 14, 15, 18 ],
[ 1, 2, 3, 5, 11, 13, 14, 15, 19 ] ];

bb5g3:=[ [ 1, 2, 3, 4, 5, 6, 7, 10, 15 ], [ 1, 2, 3, 4, 5, 6, 7, 12, 15 ], [ 1, 2, 3, 4, 5, 6, 9, 11, 12 ],
[ 1, 2, 3, 4, 5, 6, 10, 13, 14 ], [ 1, 2, 3, 4, 5, 7, 8, 9, 16 ], [ 1, 2, 3, 4, 5, 7, 11, 14, 15 ],
[ 1, 2, 3, 4, 5, 8, 9, 11, 13 ], [ 1, 2, 3, 4, 5, 8, 9, 16, 17 ], [ 1, 2, 3, 4, 5, 8, 10, 12, 14 ],
[ 1, 2, 3, 4, 5, 8, 13, 15, 16 ], [ 1, 2, 3, 4, 6, 7, 9,10, 11 ], [ 1, 2, 3, 4, 6, 8, 13, 14, 17 ] ];

d5:=[dev(g1,bb5g1),dev(g3,bb5g3)];

bb4g1:=[ [ 1, 2, 3, 4, 5, 6, 7, 8, 13 ], [ 1, 2, 3, 4, 5, 6, 8, 10, 11 ], [ 1, 2, 3, 4, 5, 6, 9, 10, 12 ],
[ 1, 2, 3, 4, 5, 6, 9, 15, 18 ], [ 1, 2, 3, 4, 5, 7, 10, 12, 18 ], [ 1, 2, 3, 4, 5, 7, 14, 15, 19 ],
[ 1, 2, 3, 4, 5, 7, 16, 18, 19 ], [ 1, 2, 3, 4, 5, 8, 9, 10, 18 ], [ 1, 2, 3, 4, 5, 8, 15, 18, 19 ],
[ 1, 2, 3, 4, 5, 10, 13, 18, 19 ], [ 1, 2, 3, 4, 6, 9, 11, 15, 19 ], [ 1, 2, 3, 4, 6, 10, 12, 16, 19 ],
[ 1, 2, 3, 4, 9, 11, 13, 18, 19 ] ];

bb4g4:=[ [ 1, 2, 3, 4, 5, 8, 9, 12, 17 ], [ 1, 2, 3, 4, 5, 9, 12, 13, 15 ], [ 1, 2, 3, 5, 6, 7, 9, 10, 18 ],
[ 1, 2, 3, 5, 6, 8, 9, 14, 17 ], [ 1, 2, 3, 5, 6, 12, 14, 17, 19 ], [ 1, 2, 3, 5, 7, 8, 9, 11, 19 ],
[ 1, 2, 3, 5, 7, 8, 9, 14, 19 ], [ 1, 2, 3, 5, 7, 9, 13, 14, 16 ], [ 1, 2, 3, 5, 8, 9, 10, 13, 17 ],
[ 1, 2, 3, 5, 8, 9, 12, 13, 14 ], [ 1, 2, 3, 5, 9, 10, 12, 14, 16 ], [ 1, 2, 3, 5, 9, 10, 15, 17, 18 ],
[ 1, 2, 3, 5, 9, 11, 12, 15, 16 ], [ 1, 2, 3, 5, 9, 11, 13, 14, 17 ], [ 1, 2, 3, 5, 9, 11, 13, 15, 17 ],
[ 1, 2, 3, 5, 9, 11, 13, 15, 18 ], [ 1, 2, 3, 5, 9, 11, 14, 15, 16 ], [ 1, 2, 3, 6, 9, 10, 15, 17, 19 ] ];

d4:=[dev(g1,bb4g1),dev(g4,bb4g4)];