LogTo("t-groups.log");
RequirePackage("carat");
names := [];
GROUPS := [];
R := CaratReadBravaisFile("ordnung.12/(2)^3(6)^2/min.565");
P1 := Group(R.generators);
Append(names,["ordnung.12/(2)^3(6)^2/words.min.565"]);
Append(GROUPS,[P1]);
R := CaratReadBravaisFile("ordnung.12/(2)^3(6)^2/min.566");
P2 := Group(R.generators);
Append(names,["ordnung.12/(2)^3(6)^2/words.min.566"]);
Append(GROUPS,[P2]);
R := CaratReadBravaisFile("ordnung.144/(1)^5(3)^10(9)^1(18)^1/group.5910");
P3 := Group(R.generators);
Append(names,["ordnung.144/(1)^5(3)^10(9)^1(18)^1/words.group.5910"]);
Append(GROUPS,[P3]);
R := CaratReadBravaisFile("ordnung.144/(1)^5(3)^3(6)^1/group.5911");
P4 := Group(R.generators);
Append(names,["ordnung.144/(1)^5(3)^3(6)^1/words.group.5911"]);
Append(GROUPS,[P4]);
R := CaratReadBravaisFile("ordnung.144/(1)^5(3)^8(9)^3(18)^1/group.5912");
P5 := Group(R.generators);
Append(names,["ordnung.144/(1)^5(3)^8(9)^3(18)^1/words.group.5912"]);
Append(GROUPS,[P5]);
R := CaratReadBravaisFile("ordnung.144/(1)^5(3)^8(9)^3(18)^1/group.5913");
P6 := Group(R.generators);
Append(names,["ordnung.144/(1)^5(3)^8(9)^3(18)^1/words.group.5913"]);
Append(GROUPS,[P6]);
R := CaratReadBravaisFile("ordnung.144/(1)^5(3)^8(9)^3(18)^1/group.5914");
P7 := Group(R.generators);
Append(names,["ordnung.144/(1)^5(3)^8(9)^3(18)^1/words.group.5914"]);
Append(GROUPS,[P7]);
R := CaratReadBravaisFile("ordnung.144/(1)^5(3)^8(9)^3(18)^1/group.5915");
P8 := Group(R.generators);
Append(names,["ordnung.144/(1)^5(3)^8(9)^3(18)^1/words.group.5915"]);
Append(GROUPS,[P8]);
R := CaratReadBravaisFile("ordnung.144/(1)^7(3)^8(9)^1(18)^1/group.5916");
P9 := Group(R.generators);
Append(names,["ordnung.144/(1)^7(3)^8(9)^1(18)^1/words.group.5916"]);
Append(GROUPS,[P9]);
R := CaratReadBravaisFile("ordnung.144/(1)^7(3)^8(9)^1(18)^1/group.5917");
P10 := Group(R.generators);
Append(names,["ordnung.144/(1)^7(3)^8(9)^1(18)^1/words.group.5917"]);
Append(GROUPS,[P10]);
R := CaratReadBravaisFile("ordnung.144/(1)^7(3)^8(9)^1(18)^1/group.5918");
P11 := Group(R.generators);
Append(names,["ordnung.144/(1)^7(3)^8(9)^1(18)^1/words.group.5918"]);
Append(GROUPS,[P11]);
R := CaratReadBravaisFile("ordnung.144/(1)^7(3)^8(9)^1(18)^1/group.5919");
P12 := Group(R.generators);
Append(names,["ordnung.144/(1)^7(3)^8(9)^1(18)^1/words.group.5919"]);
Append(GROUPS,[P12]);
R := CaratReadBravaisFile("ordnung.144/(1)^7(3)^8(9)^1(18)^1/group.5920");
P13 := Group(R.generators);
Append(names,["ordnung.144/(1)^7(3)^8(9)^1(18)^1/words.group.5920"]);
Append(GROUPS,[P13]);
R := CaratReadBravaisFile("ordnung.144/(1)^7(3)^8(9)^1(18)^1/group.5921");
P14 := Group(R.generators);
Append(names,["ordnung.144/(1)^7(3)^8(9)^1(18)^1/words.group.5921"]);
Append(GROUPS,[P14]);
R := CaratReadBravaisFile("ordnung.144/(1)^7(3)^8(9)^1(18)^1/group.5922");
P15 := Group(R.generators);
Append(names,["ordnung.144/(1)^7(3)^8(9)^1(18)^1/words.group.5922"]);
Append(GROUPS,[P15]);
R := CaratReadBravaisFile("ordnung.144/(1)^7(3)^8(9)^1(18)^1/group.5923");
P16 := Group(R.generators);
Append(names,["ordnung.144/(1)^7(3)^8(9)^1(18)^1/words.group.5923"]);
Append(GROUPS,[P16]);
R := CaratReadBravaisFile("ordnung.144/(1)^7(3)^8(9)^1(18)^1/group.5924");
P17 := Group(R.generators);
Append(names,["ordnung.144/(1)^7(3)^8(9)^1(18)^1/words.group.5924"]);
Append(GROUPS,[P17]);
R := CaratReadBravaisFile("ordnung.144/(1)^7(3)^8(9)^1(18)^1/group.5925");
P18 := Group(R.generators);
Append(names,["ordnung.144/(1)^7(3)^8(9)^1(18)^1/words.group.5925"]);
Append(GROUPS,[P18]);
R := CaratReadBravaisFile("ordnung.144/(1)^7(3)^8(9)^1(18)^1/group.5926");
P19 := Group(R.generators);
Append(names,["ordnung.144/(1)^7(3)^8(9)^1(18)^1/words.group.5926"]);
Append(GROUPS,[P19]);
R := CaratReadBravaisFile("ordnung.144/(1)^9(3)^7(6)^1/group.5927");
P20 := Group(R.generators);
Append(names,["ordnung.144/(1)^9(3)^7(6)^1/words.group.5927"]);
Append(GROUPS,[P20]);
R := CaratReadBravaisFile("ordnung.144/(1)^9(3)^7(6)^1/group.5928");
P21 := Group(R.generators);
Append(names,["ordnung.144/(1)^9(3)^7(6)^1/words.group.5928"]);
Append(GROUPS,[P21]);
R := CaratReadBravaisFile("ordnung.144/(1)^9(3)^7(6)^1/group.5929");
P22 := Group(R.generators);
Append(names,["ordnung.144/(1)^9(3)^7(6)^1/words.group.5929"]);
Append(GROUPS,[P22]);
R := CaratReadBravaisFile("ordnung.144/(1)^9(3)^7(6)^1/group.5930");
P23 := Group(R.generators);
Append(names,["ordnung.144/(1)^9(3)^7(6)^1/words.group.5930"]);
Append(GROUPS,[P23]);
R := CaratReadBravaisFile("ordnung.144/(1)^9(3)^7(6)^1/group.5931");
P24 := Group(R.generators);
Append(names,["ordnung.144/(1)^9(3)^7(6)^1/words.group.5931"]);
Append(GROUPS,[P24]);
R := CaratReadBravaisFile("ordnung.144/(1)^9(3)^7(6)^1/group.5932");
P25 := Group(R.generators);
Append(names,["ordnung.144/(1)^9(3)^7(6)^1/words.group.5932"]);
Append(GROUPS,[P25]);
R := CaratReadBravaisFile("ordnung.144/(1)^9(3)^7(6)^1/group.5933");
P26 := Group(R.generators);
Append(names,["ordnung.144/(1)^9(3)^7(6)^1/words.group.5933"]);
Append(GROUPS,[P26]);
R := CaratReadBravaisFile("ordnung.144/(1)^9(3)^7(6)^1/group.5934");
P27 := Group(R.generators);
Append(names,["ordnung.144/(1)^9(3)^7(6)^1/words.group.5934"]);
Append(GROUPS,[P27]);
R := CaratReadBravaisFile("ordnung.144/(1)^9(3)^7(6)^1/group.5935");
P28 := Group(R.generators);
Append(names,["ordnung.144/(1)^9(3)^7(6)^1/words.group.5935"]);
Append(GROUPS,[P28]);
R := CaratReadBravaisFile("ordnung.18/(1)^2(3)^4(9)^2(18)^1/min.567");
P29 := Group(R.generators);
Append(names,["ordnung.18/(1)^2(3)^4(9)^2(18)^1/words.min.567"]);
Append(GROUPS,[P29]);
R := CaratReadBravaisFile("ordnung.18/(1)^2(3)^4(9)^2(18)^1/min.568");
P30 := Group(R.generators);
Append(names,["ordnung.18/(1)^2(3)^4(9)^2(18)^1/words.min.568"]);
Append(GROUPS,[P30]);
R := CaratReadBravaisFile("ordnung.24/(2)^3(6)^2/group.5936");
P31 := Group(R.generators);
Append(names,["ordnung.24/(2)^3(6)^2/words.group.5936"]);
Append(GROUPS,[P31]);
R := CaratReadBravaisFile("ordnung.24/(2)^5(6)^4/group.5937");
P32 := Group(R.generators);
Append(names,["ordnung.24/(2)^5(6)^4/words.group.5937"]);
Append(GROUPS,[P32]);
R := CaratReadBravaisFile("ordnung.24/(2)^5(6)^4/group.5938");
P33 := Group(R.generators);
Append(names,["ordnung.24/(2)^5(6)^4/words.group.5938"]);
Append(GROUPS,[P33]);
R := CaratReadBravaisFile("ordnung.24/(2)^5(6)^4/group.5939");
P34 := Group(R.generators);
Append(names,["ordnung.24/(2)^5(6)^4/words.group.5939"]);
Append(GROUPS,[P34]);
R := CaratReadBravaisFile("ordnung.24/(2)^5(6)^4/group.5940");
P35 := Group(R.generators);
Append(names,["ordnung.24/(2)^5(6)^4/words.group.5940"]);
Append(GROUPS,[P35]);
R := CaratReadBravaisFile("ordnung.24/(2)^5(6)^4/group.5941");
P36 := Group(R.generators);
Append(names,["ordnung.24/(2)^5(6)^4/words.group.5941"]);
Append(GROUPS,[P36]);
R := CaratReadBravaisFile("ordnung.24/(2)^5(6)^4/group.5942");
P37 := Group(R.generators);
Append(names,["ordnung.24/(2)^5(6)^4/words.group.5942"]);
Append(GROUPS,[P37]);
R := CaratReadBravaisFile("ordnung.24/(2)^5(6)^4/group.5943");
P38 := Group(R.generators);
Append(names,["ordnung.24/(2)^5(6)^4/words.group.5943"]);
Append(GROUPS,[P38]);
R := CaratReadBravaisFile("ordnung.24/(2)^5(6)^4/group.5944");
P39 := Group(R.generators);
Append(names,["ordnung.24/(2)^5(6)^4/words.group.5944"]);
Append(GROUPS,[P39]);
R := CaratReadBravaisFile("ordnung.24/(2)^5(6)^4/min.569");
P40 := Group(R.generators);
Append(names,["ordnung.24/(2)^5(6)^4/words.min.569"]);
Append(GROUPS,[P40]);
R := CaratReadBravaisFile("ordnung.24/(2)^5(6)^4/min.570");
P41 := Group(R.generators);
Append(names,["ordnung.24/(2)^5(6)^4/words.min.570"]);
Append(GROUPS,[P41]);
R := CaratReadBravaisFile("ordnung.24/(2)^5(6)^4/min.571");
P42 := Group(R.generators);
Append(names,["ordnung.24/(2)^5(6)^4/words.min.571"]);
Append(GROUPS,[P42]);
R := CaratReadBravaisFile("ordnung.288/(1)^7(3)^8(9)^1(18)^1/group.5945");
P43 := Group(R.generators);
Append(names,["ordnung.288/(1)^7(3)^8(9)^1(18)^1/words.group.5945"]);
Append(GROUPS,[P43]);
R := CaratReadBravaisFile("ordnung.288/(1)^7(3)^8(9)^1(18)^1/group.5946");
P44 := Group(R.generators);
Append(names,["ordnung.288/(1)^7(3)^8(9)^1(18)^1/words.group.5946"]);
Append(GROUPS,[P44]);
R := CaratReadBravaisFile("ordnung.288/(1)^9(3)^7(6)^1/group.5947");
P45 := Group(R.generators);
Append(names,["ordnung.288/(1)^9(3)^7(6)^1/words.group.5947"]);
Append(GROUPS,[P45]);
R := CaratReadBravaisFile("ordnung.288/(1)^9(3)^7(6)^1/group.5948");
P46 := Group(R.generators);
Append(names,["ordnung.288/(1)^9(3)^7(6)^1/words.group.5948"]);
Append(GROUPS,[P46]);
R := CaratReadBravaisFile("ordnung.288/(1)^9(3)^7(6)^1/group.5949");
P47 := Group(R.generators);
Append(names,["ordnung.288/(1)^9(3)^7(6)^1/words.group.5949"]);
Append(GROUPS,[P47]);
R := CaratReadBravaisFile("ordnung.288/(1)^9(3)^7(6)^1/group.5950");
P48 := Group(R.generators);
Append(names,["ordnung.288/(1)^9(3)^7(6)^1/words.group.5950"]);
Append(GROUPS,[P48]);
R := CaratReadBravaisFile("ordnung.288/(1)^9(3)^7(6)^1/group.5951");
P49 := Group(R.generators);
Append(names,["ordnung.288/(1)^9(3)^7(6)^1/words.group.5951"]);
Append(GROUPS,[P49]);
R := CaratReadBravaisFile("ordnung.288/(1)^9(3)^7(6)^1/group.5952");
P50 := Group(R.generators);
Append(names,["ordnung.288/(1)^9(3)^7(6)^1/words.group.5952"]);
Append(GROUPS,[P50]);
R := CaratReadBravaisFile("ordnung.288/(1)^9(3)^7(6)^1/group.5953");
P51 := Group(R.generators);
Append(names,["ordnung.288/(1)^9(3)^7(6)^1/words.group.5953"]);
Append(GROUPS,[P51]);
R := CaratReadBravaisFile("ordnung.288/(1)^9(3)^7(6)^1/group.5954");
P52 := Group(R.generators);
Append(names,["ordnung.288/(1)^9(3)^7(6)^1/words.group.5954"]);
Append(GROUPS,[P52]);
R := CaratReadBravaisFile("ordnung.36/(1)^2(3)^4(9)^2(18)^1/group.5955");
P53 := Group(R.generators);
Append(names,["ordnung.36/(1)^2(3)^4(9)^2(18)^1/words.group.5955"]);
Append(GROUPS,[P53]);
R := CaratReadBravaisFile("ordnung.36/(1)^3(3)^10(9)^3(18)^1/group.5956");
P54 := Group(R.generators);
Append(names,["ordnung.36/(1)^3(3)^10(9)^3(18)^1/words.group.5956"]);
Append(GROUPS,[P54]);
R := CaratReadBravaisFile("ordnung.36/(1)^3(3)^10(9)^3(18)^1/group.5957");
P55 := Group(R.generators);
Append(names,["ordnung.36/(1)^3(3)^10(9)^3(18)^1/words.group.5957"]);
Append(GROUPS,[P55]);
R := CaratReadBravaisFile("ordnung.36/(1)^3(3)^10(9)^3(18)^1/group.5958");
P56 := Group(R.generators);
Append(names,["ordnung.36/(1)^3(3)^10(9)^3(18)^1/words.group.5958"]);
Append(GROUPS,[P56]);
R := CaratReadBravaisFile("ordnung.36/(1)^3(3)^10(9)^3(18)^1/min.572");
P57 := Group(R.generators);
Append(names,["ordnung.36/(1)^3(3)^10(9)^3(18)^1/words.min.572"]);
Append(GROUPS,[P57]);
R := CaratReadBravaisFile("ordnung.36/(1)^3(3)^10(9)^3(18)^1/min.573");
P58 := Group(R.generators);
Append(names,["ordnung.36/(1)^3(3)^10(9)^3(18)^1/words.min.573"]);
Append(GROUPS,[P58]);
R := CaratReadBravaisFile("ordnung.36/(1)^3(3)^4(9)^1(18)^1/group.5959");
P59 := Group(R.generators);
Append(names,["ordnung.36/(1)^3(3)^4(9)^1(18)^1/words.group.5959"]);
Append(GROUPS,[P59]);
R := CaratReadBravaisFile("ordnung.36/(1)^3(3)^4(9)^1(18)^1/group.5960");
P60 := Group(R.generators);
Append(names,["ordnung.36/(1)^3(3)^4(9)^1(18)^1/words.group.5960"]);
Append(GROUPS,[P60]);
R := CaratReadBravaisFile("ordnung.36/(1)^3(3)^4(9)^1(18)^1/group.5961");
P61 := Group(R.generators);
Append(names,["ordnung.36/(1)^3(3)^4(9)^1(18)^1/words.group.5961"]);
Append(GROUPS,[P61]);
R := CaratReadBravaisFile("ordnung.36/(1)^3(3)^4(9)^1(18)^1/group.5962");
P62 := Group(R.generators);
Append(names,["ordnung.36/(1)^3(3)^4(9)^1(18)^1/words.group.5962"]);
Append(GROUPS,[P62]);
R := CaratReadBravaisFile("ordnung.36/(1)^3(3)^4(9)^1(18)^1/group.5963");
P63 := Group(R.generators);
Append(names,["ordnung.36/(1)^3(3)^4(9)^1(18)^1/words.group.5963"]);
Append(GROUPS,[P63]);
R := CaratReadBravaisFile("ordnung.48/(2)^5(6)^4/group.5964");
P64 := Group(R.generators);
Append(names,["ordnung.48/(2)^5(6)^4/words.group.5964"]);
Append(GROUPS,[P64]);
R := CaratReadBravaisFile("ordnung.48/(2)^5(6)^4/group.5965");
P65 := Group(R.generators);
Append(names,["ordnung.48/(2)^5(6)^4/words.group.5965"]);
Append(GROUPS,[P65]);
R := CaratReadBravaisFile("ordnung.48/(2)^5(6)^4/group.5966");
P66 := Group(R.generators);
Append(names,["ordnung.48/(2)^5(6)^4/words.group.5966"]);
Append(GROUPS,[P66]);
R := CaratReadBravaisFile("ordnung.48/(2)^9(6)^8/group.5967");
P67 := Group(R.generators);
Append(names,["ordnung.48/(2)^9(6)^8/words.group.5967"]);
Append(GROUPS,[P67]);
R := CaratReadBravaisFile("ordnung.48/(2)^9(6)^8/group.5968");
P68 := Group(R.generators);
Append(names,["ordnung.48/(2)^9(6)^8/words.group.5968"]);
Append(GROUPS,[P68]);
R := CaratReadBravaisFile("ordnung.48/(2)^9(6)^8/group.5969");
P69 := Group(R.generators);
Append(names,["ordnung.48/(2)^9(6)^8/words.group.5969"]);
Append(GROUPS,[P69]);
R := CaratReadBravaisFile("ordnung.48/(2)^9(6)^8/group.5970");
P70 := Group(R.generators);
Append(names,["ordnung.48/(2)^9(6)^8/words.group.5970"]);
Append(GROUPS,[P70]);
R := CaratReadBravaisFile("ordnung.48/(2)^9(6)^8/group.5971");
P71 := Group(R.generators);
Append(names,["ordnung.48/(2)^9(6)^8/words.group.5971"]);
Append(GROUPS,[P71]);
R := CaratReadBravaisFile("ordnung.48/(2)^9(6)^8/group.5972");
P72 := Group(R.generators);
Append(names,["ordnung.48/(2)^9(6)^8/words.group.5972"]);
Append(GROUPS,[P72]);
R := CaratReadBravaisFile("ordnung.576/(1)^9(3)^7(6)^1/group.5973");
P73 := Group(R.generators);
Append(names,["ordnung.576/(1)^9(3)^7(6)^1/words.group.5973"]);
Append(GROUPS,[P73]);
R := CaratReadBravaisFile("ordnung.72/(1)^3(3)^10(9)^3(18)^1/group.5974");
P74 := Group(R.generators);
Append(names,["ordnung.72/(1)^3(3)^10(9)^3(18)^1/words.group.5974"]);
Append(GROUPS,[P74]);
R := CaratReadBravaisFile("ordnung.72/(1)^3(3)^10(9)^3(18)^1/group.5975");
P75 := Group(R.generators);
Append(names,["ordnung.72/(1)^3(3)^10(9)^3(18)^1/words.group.5975"]);
Append(GROUPS,[P75]);
R := CaratReadBravaisFile("ordnung.72/(1)^3(3)^4(9)^1(18)^1/group.5976");
P76 := Group(R.generators);
Append(names,["ordnung.72/(1)^3(3)^4(9)^1(18)^1/words.group.5976"]);
Append(GROUPS,[P76]);
R := CaratReadBravaisFile("ordnung.72/(1)^3(3)^4(9)^1(18)^1/group.5977");
P77 := Group(R.generators);
Append(names,["ordnung.72/(1)^3(3)^4(9)^1(18)^1/words.group.5977"]);
Append(GROUPS,[P77]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^10(9)^1(18)^1/group.5978");
P78 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^10(9)^1(18)^1/words.group.5978"]);
Append(GROUPS,[P78]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^10(9)^1(18)^1/group.5979");
P79 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^10(9)^1(18)^1/words.group.5979"]);
Append(GROUPS,[P79]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^10(9)^1(18)^1/group.5980");
P80 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^10(9)^1(18)^1/words.group.5980"]);
Append(GROUPS,[P80]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^10(9)^1(18)^1/group.5981");
P81 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^10(9)^1(18)^1/words.group.5981"]);
Append(GROUPS,[P81]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^3(6)^1/group.5982");
P82 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^3(6)^1/words.group.5982"]);
Append(GROUPS,[P82]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^3(6)^1/group.5983");
P83 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^3(6)^1/words.group.5983"]);
Append(GROUPS,[P83]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^3(6)^1/group.5984");
P84 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^3(6)^1/words.group.5984"]);
Append(GROUPS,[P84]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^3(6)^1/group.5985");
P85 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^3(6)^1/words.group.5985"]);
Append(GROUPS,[P85]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^8(9)^3(18)^1/group.5986");
P86 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^8(9)^3(18)^1/words.group.5986"]);
Append(GROUPS,[P86]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^8(9)^3(18)^1/group.5987");
P87 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^8(9)^3(18)^1/words.group.5987"]);
Append(GROUPS,[P87]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^8(9)^3(18)^1/group.5988");
P88 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^8(9)^3(18)^1/words.group.5988"]);
Append(GROUPS,[P88]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^8(9)^3(18)^1/group.5989");
P89 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^8(9)^3(18)^1/words.group.5989"]);
Append(GROUPS,[P89]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^8(9)^3(18)^1/group.5990");
P90 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^8(9)^3(18)^1/words.group.5990"]);
Append(GROUPS,[P90]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^8(9)^3(18)^1/group.5991");
P91 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^8(9)^3(18)^1/words.group.5991"]);
Append(GROUPS,[P91]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^8(9)^3(18)^1/group.5992");
P92 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^8(9)^3(18)^1/words.group.5992"]);
Append(GROUPS,[P92]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^8(9)^3(18)^1/group.5993");
P93 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^8(9)^3(18)^1/words.group.5993"]);
Append(GROUPS,[P93]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^8(9)^3(18)^1/group.5994");
P94 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^8(9)^3(18)^1/words.group.5994"]);
Append(GROUPS,[P94]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^8(9)^3(18)^1/group.5995");
P95 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^8(9)^3(18)^1/words.group.5995"]);
Append(GROUPS,[P95]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^8(9)^3(18)^1/group.5996");
P96 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^8(9)^3(18)^1/words.group.5996"]);
Append(GROUPS,[P96]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^8(9)^3(18)^1/group.5997");
P97 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^8(9)^3(18)^1/words.group.5997"]);
Append(GROUPS,[P97]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^8(9)^3(18)^1/group.5998");
P98 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^8(9)^3(18)^1/words.group.5998"]);
Append(GROUPS,[P98]);
R := CaratReadBravaisFile("ordnung.72/(1)^5(3)^8(9)^3(18)^1/group.5999");
P99 := Group(R.generators);
Append(names,["ordnung.72/(1)^5(3)^8(9)^3(18)^1/words.group.5999"]);
Append(GROUPS,[P99]);
R := CaratReadBravaisFile("ordnung.72/(1)^7(3)^8(9)^1(18)^1/group.6000");
P100 := Group(R.generators);
Append(names,["ordnung.72/(1)^7(3)^8(9)^1(18)^1/words.group.6000"]);
Append(GROUPS,[P100]);
R := CaratReadBravaisFile("ordnung.72/(1)^7(3)^8(9)^1(18)^1/group.6001");
P101 := Group(R.generators);
Append(names,["ordnung.72/(1)^7(3)^8(9)^1(18)^1/words.group.6001"]);
Append(GROUPS,[P101]);
R := CaratReadBravaisFile("ordnung.72/(1)^7(3)^8(9)^1(18)^1/group.6002");
P102 := Group(R.generators);
Append(names,["ordnung.72/(1)^7(3)^8(9)^1(18)^1/words.group.6002"]);
Append(GROUPS,[P102]);
R := CaratReadBravaisFile("ordnung.72/(1)^7(3)^8(9)^1(18)^1/group.6003");
P103 := Group(R.generators);
Append(names,["ordnung.72/(1)^7(3)^8(9)^1(18)^1/words.group.6003"]);
Append(GROUPS,[P103]);
R := CaratReadBravaisFile("ordnung.96/(2)^9(6)^8/group.6004");
P104 := Group(R.generators);
Append(names,["ordnung.96/(2)^9(6)^8/words.group.6004"]);
Append(GROUPS,[P104]);
Print(GROUPS,"\n");
Print(names,"\n");
Size(GROUPS);
Size(names);
Read("../../TGROUPS.GAP");
for i in [1..Size(GROUPS)] do
   SubgroupWords(GROUPS[i], names[i]);
od;
LogTo();
