Quelle  1.7.3   Sprache: unbekannt

K:=PureCubicalKnot(9,1);
G:=KnotGroup(K);;
L:=List(LowIndexSubgroupsFpGroup(G,6), AbelianInvariants);;
Print(SortedList(L),"\n");

[ Dauer der Verarbeitung: 0.15 Sekunden  (vorverarbeitet)  ]