Quelle 2022-09-15-Orbits.tst
Sprache: unbekannt
|
|
# Verify that Orbits works when the given seeds are a range
# See https://github.com/gap-system/gap/issues/5056
gap> act := function(omega,g) return PowerModInt(omega,Int(g),15); end;;
gap> ugrp := Units(ZmodnZ(Phi(15)));
<group of size 4 with 2 generators>
gap> orbs := Orbits(ugrp,[1..5],act);
[ [ 1 ], [ 2, 8 ], [ 3, 12 ], [ 4 ], [ 5 ] ]
[ Dauer der Verarbeitung: 0.31 Sekunden
(vorverarbeitet)
]
|
2026-03-28
|
