gap> ap:=[[2,1],[2,1]];; #Arc presentation for the trivial knot
gap> L51:=ThreeManifoldViaDehnSurgery(ap,5,1);;
gap> D:=DijkgraafWittenInvariant(L51,CyclicGroup(5));
[ g1^4, g1^4, g1, g1, id ]
gap> L52:=ThreeManifoldViaDehnSurgery(ap,5,2);;
gap> D:=DijkgraafWittenInvariant(L52,CyclicGroup(5));
[ g1^3, g1^3, g1^2, g1^2, id ]
¤ Dauer der Verarbeitung: 0.9 Sekunden
(vorverarbeitet am 2026-05-20)
¤
*© Formatika GbR, Deutschland