LogTo("t-groups.log");
RequirePackage("carat");
names := [];
GROUPS := [];
R := CaratReadBravaisFile("ordnung.12/(1)^2(2)^1(6)^1(72)^1/min.321");
P1 := Group(R.generators);
Append(names,["ordnung.12/(1)^2(2)^1(6)^1(72)^1/words.min.321"]);
Append(GROUPS,[P1]);
R := CaratReadBravaisFile("ordnung.12/(1)^2(2)^1(6)^1(72)^1/min.322");
P2 := Group(R.generators);
Append(names,["ordnung.12/(1)^2(2)^1(6)^1(72)^1/words.min.322"]);
Append(GROUPS,[P2]);
R := CaratReadBravaisFile("ordnung.12/(1)^2(2)^1(6)^1(72)^1/min.323");
P3 := Group(R.generators);
Append(names,["ordnung.12/(1)^2(2)^1(6)^1(72)^1/words.min.323"]);
Append(GROUPS,[P3]);
R := CaratReadBravaisFile("ordnung.12/(1)^2(2)^2(24)^1/min.324");
P4 := Group(R.generators);
Append(names,["ordnung.12/(1)^2(2)^2(24)^1/words.min.324"]);
Append(GROUPS,[P4]);
R := CaratReadBravaisFile("ordnung.12/(1)^2(2)^2(24)^1/min.325");
P5 := Group(R.generators);
Append(names,["ordnung.12/(1)^2(2)^2(24)^1/words.min.325"]);
Append(GROUPS,[P5]);
R := CaratReadBravaisFile("ordnung.12/(1)^2(2)^2(24)^1/min.326");
P6 := Group(R.generators);
Append(names,["ordnung.12/(1)^2(2)^2(24)^1/words.min.326"]);
Append(GROUPS,[P6]);
R := CaratReadBravaisFile("ordnung.12/(1)^2(3)^2(6)^2(72)^1/min.327");
P7 := Group(R.generators);
Append(names,["ordnung.12/(1)^2(3)^2(6)^2(72)^1/words.min.327"]);
Append(GROUPS,[P7]);
R := CaratReadBravaisFile("ordnung.12/(1)^2(3)^2(6)^2(72)^1/min.328");
P8 := Group(R.generators);
Append(names,["ordnung.12/(1)^2(3)^2(6)^2(72)^1/words.min.328"]);
Append(GROUPS,[P8]);
R := CaratReadBravaisFile("ordnung.12/(1)^2(3)^2(6)^2(72)^1/min.329");
P9 := Group(R.generators);
Append(names,["ordnung.12/(1)^2(3)^2(6)^2(72)^1/words.min.329"]);
Append(GROUPS,[P9]);
R := CaratReadBravaisFile("ordnung.12/(1)^2(3)^2(6)^2(72)^1/min.330");
P10 := Group(R.generators);
Append(names,["ordnung.12/(1)^2(3)^2(6)^2(72)^1/words.min.330"]);
Append(GROUPS,[P10]);
R := CaratReadBravaisFile("ordnung.12/(1)^2(6)^2(24)^1/min.331");
P11 := Group(R.generators);
Append(names,["ordnung.12/(1)^2(6)^2(24)^1/words.min.331"]);
Append(GROUPS,[P11]);
R := CaratReadBravaisFile("ordnung.12/(1)^2(6)^2(24)^1/min.332");
P12 := Group(R.generators);
Append(names,["ordnung.12/(1)^2(6)^2(24)^1/words.min.332"]);
Append(GROUPS,[P12]);
R := CaratReadBravaisFile("ordnung.12/(1)^2(6)^2(24)^1/min.333");
P13 := Group(R.generators);
Append(names,["ordnung.12/(1)^2(6)^2(24)^1/words.min.333"]);
Append(GROUPS,[P13]);
R := CaratReadBravaisFile("ordnung.12/(1)^2(6)^2(24)^1/min.334");
P14 := Group(R.generators);
Append(names,["ordnung.12/(1)^2(6)^2(24)^1/words.min.334"]);
Append(GROUPS,[P14]);
R := CaratReadBravaisFile("ordnung.12/(1)^3(3)^1(6)^1(18)^1(72)^1/min.335");
P15 := Group(R.generators);
Append(names,["ordnung.12/(1)^3(3)^1(6)^1(18)^1(72)^1/words.min.335"]);
Append(GROUPS,[P15]);
R := CaratReadBravaisFile("ordnung.12/(1)^3(3)^1(6)^1(18)^1(72)^1/min.336");
P16 := Group(R.generators);
Append(names,["ordnung.12/(1)^3(3)^1(6)^1(18)^1(72)^1/words.min.336"]);
Append(GROUPS,[P16]);
R := CaratReadBravaisFile("ordnung.12/(1)^3(3)^1(6)^1(18)^1(72)^1/min.337");
P17 := Group(R.generators);
Append(names,["ordnung.12/(1)^3(3)^1(6)^1(18)^1(72)^1/words.min.337"]);
Append(GROUPS,[P17]);
R := CaratReadBravaisFile("ordnung.12/(1)^3(3)^1(6)^2(24)^1/min.338");
P18 := Group(R.generators);
Append(names,["ordnung.12/(1)^3(3)^1(6)^2(24)^1/words.min.338"]);
Append(GROUPS,[P18]);
R := CaratReadBravaisFile("ordnung.12/(1)^3(3)^1(6)^2(24)^1/min.339");
P19 := Group(R.generators);
Append(names,["ordnung.12/(1)^3(3)^1(6)^2(24)^1/words.min.339"]);
Append(GROUPS,[P19]);
R := CaratReadBravaisFile("ordnung.12/(1)^3(3)^1(6)^2(24)^1/min.340");
P20 := Group(R.generators);
Append(names,["ordnung.12/(1)^3(3)^1(6)^2(24)^1/words.min.340"]);
Append(GROUPS,[P20]);
R := CaratReadBravaisFile("ordnung.12/(1)^4(6)^2(72)^1/min.341");
P21 := Group(R.generators);
Append(names,["ordnung.12/(1)^4(6)^2(72)^1/words.min.341"]);
Append(GROUPS,[P21]);
R := CaratReadBravaisFile("ordnung.12/(1)^4(6)^2(72)^1/min.342");
P22 := Group(R.generators);
Append(names,["ordnung.12/(1)^4(6)^2(72)^1/words.min.342"]);
Append(GROUPS,[P22]);
R := CaratReadBravaisFile("ordnung.12/(1)^4(6)^2(72)^1/min.343");
P23 := Group(R.generators);
Append(names,["ordnung.12/(1)^4(6)^2(72)^1/words.min.343"]);
Append(GROUPS,[P23]);
R := CaratReadBravaisFile("ordnung.12/(1)^4(6)^2(72)^1/min.344");
P24 := Group(R.generators);
Append(names,["ordnung.12/(1)^4(6)^2(72)^1/words.min.344"]);
Append(GROUPS,[P24]);
R := CaratReadBravaisFile("ordnung.24/(1)^2(2)^1(6)^1(72)^1/group.1746");
P25 := Group(R.generators);
Append(names,["ordnung.24/(1)^2(2)^1(6)^1(72)^1/words.group.1746"]);
Append(GROUPS,[P25]);
R := CaratReadBravaisFile("ordnung.24/(1)^2(2)^2(24)^1/group.1747");
P26 := Group(R.generators);
Append(names,["ordnung.24/(1)^2(2)^2(24)^1/words.group.1747"]);
Append(GROUPS,[P26]);
R := CaratReadBravaisFile("ordnung.24/(1)^2(2)^2(24)^1/group.1748");
P27 := Group(R.generators);
Append(names,["ordnung.24/(1)^2(2)^2(24)^1/words.group.1748"]);
Append(GROUPS,[P27]);
R := CaratReadBravaisFile("ordnung.24/(1)^2(2)^2(24)^1/group.1749");
P28 := Group(R.generators);
Append(names,["ordnung.24/(1)^2(2)^2(24)^1/words.group.1749"]);
Append(GROUPS,[P28]);
R := CaratReadBravaisFile("ordnung.24/(1)^2(2)^2(24)^1/group.1750");
P29 := Group(R.generators);
Append(names,["ordnung.24/(1)^2(2)^2(24)^1/words.group.1750"]);
Append(GROUPS,[P29]);
R := CaratReadBravaisFile("ordnung.24/(1)^2(2)^2(24)^1/group.1751");
P30 := Group(R.generators);
Append(names,["ordnung.24/(1)^2(2)^2(24)^1/words.group.1751"]);
Append(GROUPS,[P30]);
R := CaratReadBravaisFile("ordnung.24/(1)^2(2)^2(24)^1/group.1752");
P31 := Group(R.generators);
Append(names,["ordnung.24/(1)^2(2)^2(24)^1/words.group.1752"]);
Append(GROUPS,[P31]);
R := CaratReadBravaisFile("ordnung.24/(1)^2(2)^2(24)^1/group.1753");
P32 := Group(R.generators);
Append(names,["ordnung.24/(1)^2(2)^2(24)^1/words.group.1753"]);
Append(GROUPS,[P32]);
R := CaratReadBravaisFile("ordnung.24/(1)^2(3)^2(6)^2(72)^1/group.1754");
P33 := Group(R.generators);
Append(names,["ordnung.24/(1)^2(3)^2(6)^2(72)^1/words.group.1754"]);
Append(GROUPS,[P33]);
R := CaratReadBravaisFile("ordnung.24/(1)^2(6)^2(24)^1/group.1755");
P34 := Group(R.generators);
Append(names,["ordnung.24/(1)^2(6)^2(24)^1/words.group.1755"]);
Append(GROUPS,[P34]);
R := CaratReadBravaisFile("ordnung.24/(1)^3(3)^1(6)^1(18)^1(72)^1/group.1756");
P35 := Group(R.generators);
Append(names,["ordnung.24/(1)^3(3)^1(6)^1(18)^1(72)^1/words.group.1756"]);
Append(GROUPS,[P35]);
R := CaratReadBravaisFile("ordnung.24/(1)^3(3)^1(6)^2(24)^1/group.1757");
P36 := Group(R.generators);
Append(names,["ordnung.24/(1)^3(3)^1(6)^2(24)^1/words.group.1757"]);
Append(GROUPS,[P36]);
R := CaratReadBravaisFile("ordnung.24/(1)^3(3)^1(6)^2(24)^1/group.1758");
P37 := Group(R.generators);
Append(names,["ordnung.24/(1)^3(3)^1(6)^2(24)^1/words.group.1758"]);
Append(GROUPS,[P37]);
R := CaratReadBravaisFile("ordnung.24/(1)^3(3)^1(6)^2(24)^1/group.1759");
P38 := Group(R.generators);
Append(names,["ordnung.24/(1)^3(3)^1(6)^2(24)^1/words.group.1759"]);
Append(GROUPS,[P38]);
R := CaratReadBravaisFile("ordnung.24/(1)^3(3)^1(6)^2(24)^1/group.1760");
P39 := Group(R.generators);
Append(names,["ordnung.24/(1)^3(3)^1(6)^2(24)^1/words.group.1760"]);
Append(GROUPS,[P39]);
R := CaratReadBravaisFile("ordnung.24/(1)^3(3)^1(6)^2(24)^1/group.1761");
P40 := Group(R.generators);
Append(names,["ordnung.24/(1)^3(3)^1(6)^2(24)^1/words.group.1761"]);
Append(GROUPS,[P40]);
R := CaratReadBravaisFile("ordnung.24/(1)^3(3)^1(6)^2(24)^1/group.1762");
P41 := Group(R.generators);
Append(names,["ordnung.24/(1)^3(3)^1(6)^2(24)^1/words.group.1762"]);
Append(GROUPS,[P41]);
R := CaratReadBravaisFile("ordnung.24/(1)^3(3)^1(6)^2(24)^1/group.1763");
P42 := Group(R.generators);
Append(names,["ordnung.24/(1)^3(3)^1(6)^2(24)^1/words.group.1763"]);
Append(GROUPS,[P42]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1764");
P43 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1764"]);
Append(GROUPS,[P43]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1765");
P44 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1765"]);
Append(GROUPS,[P44]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1766");
P45 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1766"]);
Append(GROUPS,[P45]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1767");
P46 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1767"]);
Append(GROUPS,[P46]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1768");
P47 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1768"]);
Append(GROUPS,[P47]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1769");
P48 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1769"]);
Append(GROUPS,[P48]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1770");
P49 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1770"]);
Append(GROUPS,[P49]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1771");
P50 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1771"]);
Append(GROUPS,[P50]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1772");
P51 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1772"]);
Append(GROUPS,[P51]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1773");
P52 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1773"]);
Append(GROUPS,[P52]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1774");
P53 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1774"]);
Append(GROUPS,[P53]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1775");
P54 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1775"]);
Append(GROUPS,[P54]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1776");
P55 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1776"]);
Append(GROUPS,[P55]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1777");
P56 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1777"]);
Append(GROUPS,[P56]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1778");
P57 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1778"]);
Append(GROUPS,[P57]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1779");
P58 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1779"]);
Append(GROUPS,[P58]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(24)^1/group.1780");
P59 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(2)^1(6)^1(24)^1/words.group.1780"]);
Append(GROUPS,[P59]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(6)^2(72)^1/group.1781");
P60 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(6)^2(72)^1/words.group.1781"]);
Append(GROUPS,[P60]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(6)^2(72)^1/group.1782");
P61 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(6)^2(72)^1/words.group.1782"]);
Append(GROUPS,[P61]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(6)^2(72)^1/group.1783");
P62 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(6)^2(72)^1/words.group.1783"]);
Append(GROUPS,[P62]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(6)^2(72)^1/group.1784");
P63 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(6)^2(72)^1/words.group.1784"]);
Append(GROUPS,[P63]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(6)^2(72)^1/group.1785");
P64 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(6)^2(72)^1/words.group.1785"]);
Append(GROUPS,[P64]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(6)^2(72)^1/group.1786");
P65 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(6)^2(72)^1/words.group.1786"]);
Append(GROUPS,[P65]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(6)^2(72)^1/group.1787");
P66 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(6)^2(72)^1/words.group.1787"]);
Append(GROUPS,[P66]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(6)^2(72)^1/group.1788");
P67 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(6)^2(72)^1/words.group.1788"]);
Append(GROUPS,[P67]);
R := CaratReadBravaisFile("ordnung.24/(1)^4(6)^2(72)^1/group.1789");
P68 := Group(R.generators);
Append(names,["ordnung.24/(1)^4(6)^2(72)^1/words.group.1789"]);
Append(GROUPS,[P68]);
R := CaratReadBravaisFile("ordnung.48/(1)^2(2)^2(24)^1/group.1790");
P69 := Group(R.generators);
Append(names,["ordnung.48/(1)^2(2)^2(24)^1/words.group.1790"]);
Append(GROUPS,[P69]);
R := CaratReadBravaisFile("ordnung.48/(1)^3(3)^1(6)^2(24)^1/group.1791");
P70 := Group(R.generators);
Append(names,["ordnung.48/(1)^3(3)^1(6)^2(24)^1/words.group.1791"]);
Append(GROUPS,[P70]);
R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(24)^1/group.1792");
P71 := Group(R.generators);
Append(names,["ordnung.48/(1)^4(2)^1(6)^1(24)^1/words.group.1792"]);
Append(GROUPS,[P71]);
R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(24)^1/group.1793");
P72 := Group(R.generators);
Append(names,["ordnung.48/(1)^4(2)^1(6)^1(24)^1/words.group.1793"]);
Append(GROUPS,[P72]);
R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(24)^1/group.1794");
P73 := Group(R.generators);
Append(names,["ordnung.48/(1)^4(2)^1(6)^1(24)^1/words.group.1794"]);
Append(GROUPS,[P73]);
R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(24)^1/group.1795");
P74 := Group(R.generators);
Append(names,["ordnung.48/(1)^4(2)^1(6)^1(24)^1/words.group.1795"]);
Append(GROUPS,[P74]);
R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(24)^1/group.1796");
P75 := Group(R.generators);
Append(names,["ordnung.48/(1)^4(2)^1(6)^1(24)^1/words.group.1796"]);
Append(GROUPS,[P75]);
R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(24)^1/group.1797");
P76 := Group(R.generators);
Append(names,["ordnung.48/(1)^4(2)^1(6)^1(24)^1/words.group.1797"]);
Append(GROUPS,[P76]);
R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(24)^1/group.1798");
P77 := Group(R.generators);
Append(names,["ordnung.48/(1)^4(2)^1(6)^1(24)^1/words.group.1798"]);
Append(GROUPS,[P77]);
R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(24)^1/group.1799");
P78 := Group(R.generators);
Append(names,["ordnung.48/(1)^4(2)^1(6)^1(24)^1/words.group.1799"]);
Append(GROUPS,[P78]);
R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(24)^1/group.1800");
P79 := Group(R.generators);
Append(names,["ordnung.48/(1)^4(2)^1(6)^1(24)^1/words.group.1800"]);
Append(GROUPS,[P79]);
R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(24)^1/group.1801");
P80 := Group(R.generators);
Append(names,["ordnung.48/(1)^4(2)^1(6)^1(24)^1/words.group.1801"]);
Append(GROUPS,[P80]);
R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(24)^1/group.1802");
P81 := Group(R.generators);
Append(names,["ordnung.48/(1)^4(2)^1(6)^1(24)^1/words.group.1802"]);
Append(GROUPS,[P81]);
R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(24)^1/group.1803");
P82 := Group(R.generators);
Append(names,["ordnung.48/(1)^4(2)^1(6)^1(24)^1/words.group.1803"]);
Append(GROUPS,[P82]);
R := CaratReadBravaisFile("ordnung.48/(1)^4(6)^2(72)^1/group.1804");
P83 := Group(R.generators);
Append(names,["ordnung.48/(1)^4(6)^2(72)^1/words.group.1804"]);
Append(GROUPS,[P83]);
R := CaratReadBravaisFile("ordnung.96/(1)^4(2)^1(6)^1(24)^1/group.1805");
P84 := Group(R.generators);
Append(names,["ordnung.96/(1)^4(2)^1(6)^1(24)^1/words.group.1805"]);
Append(GROUPS,[P84]);
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();
