GAP 4.8.9 installation with standard packages -- copy to your CoCalc project to get it
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();