B:=[];
G:=[];
# Design 1: autom. group order 13, simple, derived
B[1]:=[[1,2,3,4,5,6],[1,2,3,4,5,7],[1,2,3,8,9,10],[1,2,4,11,12,13],[1,2,8,11,12,13],[1,3,5,9,11,12],[1,3,6,7,8,11],[1,4,6,9,10,12],[1,4,6,9,10,13],[1,5,7,8,10,13],[1,5,7,10,12,13],[1,6,7,8,9,11],[2,3,6,7,10,12],[2,3,8,9,10,13],[2,4,5,8,10,11],[2,4,7,8,9,12],[2,5,6,7,9,13],[2,5,6,9,11,13],[2,6,7,10,11,12],[3,4,6,8,12,13],[3,4,7,9,11,13],[3,4,7,10,11,13],[3,5,6,8,12,13],[3,5,9,10,11,12],[4,5,6,8,10,11],[4,5,7,8,9,12]];
G[1]:=Group([(1,2,10,5,9,4,3,8,11,12,7,13,6)]);