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(4)^1(12)^3/min.345"); P1 := Group(R.generators); Append(names,["ordnung.12/(1)^2(4)^1(12)^3/words.min.345"]); Append(GROUPS,[P1]); R := CaratReadBravaisFile("ordnung.12/(1)^2(4)^1(12)^3/min.346"); P2 := Group(R.generators); Append(names,["ordnung.12/(1)^2(4)^1(12)^3/words.min.346"]); Append(GROUPS,[P2]); R := CaratReadBravaisFile("ordnung.12/(1)^4(12)^2(36)^2/min.347"); P3 := Group(R.generators); Append(names,["ordnung.12/(1)^4(12)^2(36)^2/words.min.347"]); Append(GROUPS,[P3]); R := CaratReadBravaisFile("ordnung.12/(1)^4(12)^2(36)^2/min.348"); P4 := Group(R.generators); Append(names,["ordnung.12/(1)^4(12)^2(36)^2/words.min.348"]); Append(GROUPS,[P4]); R := CaratReadBravaisFile("ordnung.192/(1)^4(2)^2(12)^2/group.1806"); P5 := Group(R.generators); Append(names,["ordnung.192/(1)^4(2)^2(12)^2/words.group.1806"]); Append(GROUPS,[P5]); R := CaratReadBravaisFile("ordnung.24/(1)^2(2)^1(6)^1(12)^2/group.1807"); P6 := Group(R.generators); Append(names,["ordnung.24/(1)^2(2)^1(6)^1(12)^2/words.group.1807"]); Append(GROUPS,[P6]); R := CaratReadBravaisFile("ordnung.24/(1)^2(2)^1(6)^1(12)^2/group.1808"); P7 := Group(R.generators); Append(names,["ordnung.24/(1)^2(2)^1(6)^1(12)^2/words.group.1808"]); Append(GROUPS,[P7]); R := CaratReadBravaisFile("ordnung.24/(1)^2(2)^1(6)^1(12)^2/group.1809"); P8 := Group(R.generators); Append(names,["ordnung.24/(1)^2(2)^1(6)^1(12)^2/words.group.1809"]); Append(GROUPS,[P8]); R := CaratReadBravaisFile("ordnung.24/(1)^2(2)^1(6)^1(12)^2/group.1810"); P9 := Group(R.generators); Append(names,["ordnung.24/(1)^2(2)^1(6)^1(12)^2/words.group.1810"]); Append(GROUPS,[P9]); R := CaratReadBravaisFile("ordnung.24/(1)^2(2)^2(4)^1(12)^1/group.1811"); P10 := Group(R.generators); Append(names,["ordnung.24/(1)^2(2)^2(4)^1(12)^1/words.group.1811"]); Append(GROUPS,[P10]); R := CaratReadBravaisFile("ordnung.24/(1)^2(2)^2(4)^1(12)^1/group.1812"); P11 := Group(R.generators); Append(names,["ordnung.24/(1)^2(2)^2(4)^1(12)^1/words.group.1812"]); Append(GROUPS,[P11]); R := CaratReadBravaisFile("ordnung.24/(1)^2(2)^2(4)^1(12)^1/group.1813"); P12 := Group(R.generators); Append(names,["ordnung.24/(1)^2(2)^2(4)^1(12)^1/words.group.1813"]); Append(GROUPS,[P12]); R := CaratReadBravaisFile("ordnung.24/(1)^2(2)^2(4)^1(12)^1/group.1814"); P13 := Group(R.generators); Append(names,["ordnung.24/(1)^2(2)^2(4)^1(12)^1/words.group.1814"]); Append(GROUPS,[P13]); R := CaratReadBravaisFile("ordnung.24/(1)^2(4)^1(12)^3/group.1815"); P14 := Group(R.generators); Append(names,["ordnung.24/(1)^2(4)^1(12)^3/words.group.1815"]); Append(GROUPS,[P14]); R := CaratReadBravaisFile("ordnung.24/(1)^2(4)^3(12)^1/group.1816"); P15 := Group(R.generators); Append(names,["ordnung.24/(1)^2(4)^3(12)^1/words.group.1816"]); Append(GROUPS,[P15]); R := CaratReadBravaisFile("ordnung.24/(1)^2(4)^3(12)^1/group.1817"); P16 := Group(R.generators); Append(names,["ordnung.24/(1)^2(4)^3(12)^1/words.group.1817"]); Append(GROUPS,[P16]); R := CaratReadBravaisFile("ordnung.24/(1)^2(4)^3(12)^1/group.1818"); P17 := Group(R.generators); Append(names,["ordnung.24/(1)^2(4)^3(12)^1/words.group.1818"]); Append(GROUPS,[P17]); R := CaratReadBravaisFile("ordnung.24/(1)^4(12)^2(36)^2/group.1819"); P18 := Group(R.generators); Append(names,["ordnung.24/(1)^4(12)^2(36)^2/words.group.1819"]); Append(GROUPS,[P18]); R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1820"); P19 := Group(R.generators); Append(names,["ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1820"]); Append(GROUPS,[P19]); R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1821"); P20 := Group(R.generators); Append(names,["ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1821"]); Append(GROUPS,[P20]); R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1822"); P21 := Group(R.generators); Append(names,["ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1822"]); Append(GROUPS,[P21]); R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1823"); P22 := Group(R.generators); Append(names,["ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1823"]); Append(GROUPS,[P22]); R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1824"); P23 := Group(R.generators); Append(names,["ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1824"]); Append(GROUPS,[P23]); R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1825"); P24 := Group(R.generators); Append(names,["ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1825"]); Append(GROUPS,[P24]); R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1826"); P25 := Group(R.generators); Append(names,["ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1826"]); Append(GROUPS,[P25]); R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1827"); P26 := Group(R.generators); Append(names,["ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1827"]); Append(GROUPS,[P26]); R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1828"); P27 := Group(R.generators); Append(names,["ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1828"]); Append(GROUPS,[P27]); R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1829"); P28 := Group(R.generators); Append(names,["ordnung.24/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1829"]); Append(GROUPS,[P28]); R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^2(12)^2/group.1830"); P29 := Group(R.generators); Append(names,["ordnung.24/(1)^4(2)^2(12)^2/words.group.1830"]); Append(GROUPS,[P29]); R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^2(12)^2/group.1831"); P30 := Group(R.generators); Append(names,["ordnung.24/(1)^4(2)^2(12)^2/words.group.1831"]); Append(GROUPS,[P30]); R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^2(12)^2/group.1832"); P31 := Group(R.generators); Append(names,["ordnung.24/(1)^4(2)^2(12)^2/words.group.1832"]); Append(GROUPS,[P31]); R := CaratReadBravaisFile("ordnung.24/(1)^4(2)^2(12)^2/group.1833"); P32 := Group(R.generators); Append(names,["ordnung.24/(1)^4(2)^2(12)^2/words.group.1833"]); Append(GROUPS,[P32]); R := CaratReadBravaisFile("ordnung.24/(1)^4(4)^1(12)^2(36)^1/group.1834"); P33 := Group(R.generators); Append(names,["ordnung.24/(1)^4(4)^1(12)^2(36)^1/words.group.1834"]); Append(GROUPS,[P33]); R := CaratReadBravaisFile("ordnung.24/(1)^4(4)^1(12)^2(36)^1/group.1835"); P34 := Group(R.generators); Append(names,["ordnung.24/(1)^4(4)^1(12)^2(36)^1/words.group.1835"]); Append(GROUPS,[P34]); R := CaratReadBravaisFile("ordnung.24/(1)^4(4)^1(12)^2(36)^1/group.1836"); P35 := Group(R.generators); Append(names,["ordnung.24/(1)^4(4)^1(12)^2(36)^1/words.group.1836"]); Append(GROUPS,[P35]); R := CaratReadBravaisFile("ordnung.24/(1)^4(4)^1(12)^2(36)^1/group.1837"); P36 := Group(R.generators); Append(names,["ordnung.24/(1)^4(4)^1(12)^2(36)^1/words.group.1837"]); Append(GROUPS,[P36]); R := CaratReadBravaisFile("ordnung.24/(1)^4(4)^2(12)^2/group.1838"); P37 := Group(R.generators); Append(names,["ordnung.24/(1)^4(4)^2(12)^2/words.group.1838"]); Append(GROUPS,[P37]); R := CaratReadBravaisFile("ordnung.24/(1)^4(4)^2(12)^2/group.1839"); P38 := Group(R.generators); Append(names,["ordnung.24/(1)^4(4)^2(12)^2/words.group.1839"]); Append(GROUPS,[P38]); R := CaratReadBravaisFile("ordnung.24/(1)^4(4)^2(12)^2/group.1840"); P39 := Group(R.generators); Append(names,["ordnung.24/(1)^4(4)^2(12)^2/words.group.1840"]); Append(GROUPS,[P39]); R := CaratReadBravaisFile("ordnung.24/(1)^4(6)^2(36)^2/group.1841"); P40 := Group(R.generators); Append(names,["ordnung.24/(1)^4(6)^2(36)^2/words.group.1841"]); Append(GROUPS,[P40]); R := CaratReadBravaisFile("ordnung.24/(1)^4(6)^2(36)^2/group.1842"); P41 := Group(R.generators); Append(names,["ordnung.24/(1)^4(6)^2(36)^2/words.group.1842"]); Append(GROUPS,[P41]); R := CaratReadBravaisFile("ordnung.24/(1)^4(6)^2(36)^2/group.1843"); P42 := Group(R.generators); Append(names,["ordnung.24/(1)^4(6)^2(36)^2/words.group.1843"]); Append(GROUPS,[P42]); R := CaratReadBravaisFile("ordnung.24/(1)^4(6)^2(36)^2/group.1844"); P43 := Group(R.generators); Append(names,["ordnung.24/(1)^4(6)^2(36)^2/words.group.1844"]); Append(GROUPS,[P43]); R := CaratReadBravaisFile("ordnung.48/(1)^2(2)^1(6)^1(12)^2/group.1845"); P44 := Group(R.generators); Append(names,["ordnung.48/(1)^2(2)^1(6)^1(12)^2/words.group.1845"]); Append(GROUPS,[P44]); R := CaratReadBravaisFile("ordnung.48/(1)^2(2)^2(4)^1(12)^1/group.1846"); P45 := Group(R.generators); Append(names,["ordnung.48/(1)^2(2)^2(4)^1(12)^1/words.group.1846"]); Append(GROUPS,[P45]); R := CaratReadBravaisFile("ordnung.48/(1)^2(2)^2(4)^1(12)^1/group.1847"); P46 := Group(R.generators); Append(names,["ordnung.48/(1)^2(2)^2(4)^1(12)^1/words.group.1847"]); Append(GROUPS,[P46]); R := CaratReadBravaisFile("ordnung.48/(1)^2(2)^2(4)^1(12)^1/group.1848"); P47 := Group(R.generators); Append(names,["ordnung.48/(1)^2(2)^2(4)^1(12)^1/words.group.1848"]); Append(GROUPS,[P47]); R := CaratReadBravaisFile("ordnung.48/(1)^2(2)^2(4)^1(12)^1/group.1849"); P48 := Group(R.generators); Append(names,["ordnung.48/(1)^2(2)^2(4)^1(12)^1/words.group.1849"]); Append(GROUPS,[P48]); R := CaratReadBravaisFile("ordnung.48/(1)^2(2)^2(4)^1(12)^1/group.1850"); P49 := Group(R.generators); Append(names,["ordnung.48/(1)^2(2)^2(4)^1(12)^1/words.group.1850"]); Append(GROUPS,[P49]); R := CaratReadBravaisFile("ordnung.48/(1)^2(2)^2(4)^1(12)^1/group.1851"); P50 := Group(R.generators); Append(names,["ordnung.48/(1)^2(2)^2(4)^1(12)^1/words.group.1851"]); Append(GROUPS,[P50]); R := CaratReadBravaisFile("ordnung.48/(1)^2(4)^3(12)^1/group.1852"); P51 := Group(R.generators); Append(names,["ordnung.48/(1)^2(4)^3(12)^1/words.group.1852"]); Append(GROUPS,[P51]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1853"); P52 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1853"]); Append(GROUPS,[P52]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1854"); P53 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1854"]); Append(GROUPS,[P53]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1855"); P54 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1855"]); Append(GROUPS,[P54]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1856"); P55 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1856"]); Append(GROUPS,[P55]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1857"); P56 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1857"]); Append(GROUPS,[P56]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1858"); P57 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1858"]); Append(GROUPS,[P57]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1859"); P58 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1859"]); Append(GROUPS,[P58]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1860"); P59 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1860"]); Append(GROUPS,[P59]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1861"); P60 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1861"]); Append(GROUPS,[P60]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1862"); P61 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1862"]); Append(GROUPS,[P61]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1863"); P62 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1863"]); Append(GROUPS,[P62]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1864"); P63 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1864"]); Append(GROUPS,[P63]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1865"); P64 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1865"]); Append(GROUPS,[P64]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1866"); P65 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1866"]); Append(GROUPS,[P65]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1867"); P66 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1867"]); Append(GROUPS,[P66]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1868"); P67 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1868"]); Append(GROUPS,[P67]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1869"); P68 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1869"]); Append(GROUPS,[P68]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1870"); P69 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1870"]); Append(GROUPS,[P69]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1871"); P70 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1871"]); Append(GROUPS,[P70]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1872"); P71 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1872"]); Append(GROUPS,[P71]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1873"); P72 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1873"]); Append(GROUPS,[P72]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1874"); P73 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1874"]); Append(GROUPS,[P73]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1875"); P74 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1875"]); Append(GROUPS,[P74]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1876"); P75 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1876"]); Append(GROUPS,[P75]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1877"); P76 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1877"]); Append(GROUPS,[P76]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1878"); P77 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1878"]); Append(GROUPS,[P77]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1879"); P78 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1879"]); Append(GROUPS,[P78]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1880"); P79 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1880"]); Append(GROUPS,[P79]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1881"); P80 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1881"]); Append(GROUPS,[P80]); R := CaratReadBravaisFile("ordnung.48/(1)^4(2)^2(12)^2/group.1882"); P81 := Group(R.generators); Append(names,["ordnung.48/(1)^4(2)^2(12)^2/words.group.1882"]); Append(GROUPS,[P81]); R := CaratReadBravaisFile("ordnung.48/(1)^4(4)^1(12)^2(36)^1/group.1883"); P82 := Group(R.generators); Append(names,["ordnung.48/(1)^4(4)^1(12)^2(36)^1/words.group.1883"]); Append(GROUPS,[P82]); R := CaratReadBravaisFile("ordnung.48/(1)^4(4)^2(12)^2/group.1884"); P83 := Group(R.generators); Append(names,["ordnung.48/(1)^4(4)^2(12)^2/words.group.1884"]); Append(GROUPS,[P83]); R := CaratReadBravaisFile("ordnung.48/(1)^4(4)^2(12)^2/group.1885"); P84 := Group(R.generators); Append(names,["ordnung.48/(1)^4(4)^2(12)^2/words.group.1885"]); Append(GROUPS,[P84]); R := CaratReadBravaisFile("ordnung.48/(1)^4(4)^2(12)^2/group.1886"); P85 := Group(R.generators); Append(names,["ordnung.48/(1)^4(4)^2(12)^2/words.group.1886"]); Append(GROUPS,[P85]); R := CaratReadBravaisFile("ordnung.48/(1)^4(4)^2(12)^2/group.1887"); P86 := Group(R.generators); Append(names,["ordnung.48/(1)^4(4)^2(12)^2/words.group.1887"]); Append(GROUPS,[P86]); R := CaratReadBravaisFile("ordnung.48/(1)^4(4)^2(12)^2/group.1888"); P87 := Group(R.generators); Append(names,["ordnung.48/(1)^4(4)^2(12)^2/words.group.1888"]); Append(GROUPS,[P87]); R := CaratReadBravaisFile("ordnung.48/(1)^4(6)^2(36)^2/group.1889"); P88 := Group(R.generators); Append(names,["ordnung.48/(1)^4(6)^2(36)^2/words.group.1889"]); Append(GROUPS,[P88]); R := CaratReadBravaisFile("ordnung.96/(1)^2(2)^2(4)^1(12)^1/group.1890"); P89 := Group(R.generators); Append(names,["ordnung.96/(1)^2(2)^2(4)^1(12)^1/words.group.1890"]); Append(GROUPS,[P89]); R := CaratReadBravaisFile("ordnung.96/(1)^4(2)^1(6)^1(12)^1(36)^1/group.1891"); P90 := Group(R.generators); Append(names,["ordnung.96/(1)^4(2)^1(6)^1(12)^1(36)^1/words.group.1891"]); Append(GROUPS,[P90]); R := CaratReadBravaisFile("ordnung.96/(1)^4(2)^2(12)^2/group.1892"); P91 := Group(R.generators); Append(names,["ordnung.96/(1)^4(2)^2(12)^2/words.group.1892"]); Append(GROUPS,[P91]); R := CaratReadBravaisFile("ordnung.96/(1)^4(2)^2(12)^2/group.1893"); P92 := Group(R.generators); Append(names,["ordnung.96/(1)^4(2)^2(12)^2/words.group.1893"]); Append(GROUPS,[P92]); R := CaratReadBravaisFile("ordnung.96/(1)^4(2)^2(12)^2/group.1894"); P93 := Group(R.generators); Append(names,["ordnung.96/(1)^4(2)^2(12)^2/words.group.1894"]); Append(GROUPS,[P93]); R := CaratReadBravaisFile("ordnung.96/(1)^4(2)^2(12)^2/group.1895"); P94 := Group(R.generators); Append(names,["ordnung.96/(1)^4(2)^2(12)^2/words.group.1895"]); Append(GROUPS,[P94]); R := CaratReadBravaisFile("ordnung.96/(1)^4(2)^2(12)^2/group.1896"); P95 := Group(R.generators); Append(names,["ordnung.96/(1)^4(2)^2(12)^2/words.group.1896"]); Append(GROUPS,[P95]); R := CaratReadBravaisFile("ordnung.96/(1)^4(2)^2(12)^2/group.1897"); P96 := Group(R.generators); Append(names,["ordnung.96/(1)^4(2)^2(12)^2/words.group.1897"]); Append(GROUPS,[P96]); R := CaratReadBravaisFile("ordnung.96/(1)^4(2)^2(12)^2/group.1898"); P97 := Group(R.generators); Append(names,["ordnung.96/(1)^4(2)^2(12)^2/words.group.1898"]); Append(GROUPS,[P97]); R := CaratReadBravaisFile("ordnung.96/(1)^4(2)^2(12)^2/group.1899"); P98 := Group(R.generators); Append(names,["ordnung.96/(1)^4(2)^2(12)^2/words.group.1899"]); Append(GROUPS,[P98]); R := CaratReadBravaisFile("ordnung.96/(1)^4(2)^2(12)^2/group.1900"); P99 := Group(R.generators); Append(names,["ordnung.96/(1)^4(2)^2(12)^2/words.group.1900"]); Append(GROUPS,[P99]); R := CaratReadBravaisFile("ordnung.96/(1)^4(2)^2(12)^2/group.1901"); P100 := Group(R.generators); Append(names,["ordnung.96/(1)^4(2)^2(12)^2/words.group.1901"]); Append(GROUPS,[P100]); R := CaratReadBravaisFile("ordnung.96/(1)^4(4)^2(12)^2/group.1902"); P101 := Group(R.generators); Append(names,["ordnung.96/(1)^4(4)^2(12)^2/words.group.1902"]); Append(GROUPS,[P101]); 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();