File: 2025-03-28-ModuleAutomorphisms.tst

package info (click to toggle)
gap 4.15.1-1
  • links: PTS
  • area: main
  • in suites: forky, sid
  • size: 110,212 kB
  • sloc: ansic: 97,261; xml: 48,343; cpp: 13,946; sh: 4,900; perl: 1,650; javascript: 255; makefile: 252; ruby: 9
file content (39 lines) | stat: -rw-r--r-- 1,551 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
# bug reported by David Roe on the GAP Forum: the command
#   AutomorphismGroup(TransitiveGroup(45, 3878));
# sometimes gives a result that is too small. Traced back to
# a bug in MTX.ModuleAutomorphisms
gap> mats:=Z(3)^0*[
> [ [ 0, 0, 0, 2, 0, 0, 0, 1, 0, 1, 0 ],
>   [ 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0 ],
>   [ 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0 ],
>   [ 0, 0, 0, 1, 0, 2, 0, 1, 0, 0, 0 ],
>   [ 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0 ],
>   [ 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0 ],
>   [ 0, 0, 0, 1, 0, 0, 0, 2, 0, 0, 0 ],
>   [ 0, 0, 0, 1, 0, 0, 0, 2, 0, 0, 1 ],
>   [ 0, 0, 0, 0, 0, 0, 1, 2, 0, 0, 0 ],
>   [ 0, 0, 1, 0, 0, 0, 0, 2, 0, 0, 0 ],
>   [ 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0 ] ],
> [ [ 0, 0, 0, 0, 2, 0, 1, 0, 0, 1, 0 ],
>   [ 0, 0, 1, 0, 2, 0, 1, 2, 0, 2, 0 ],
>   [ 0, 0, 0, 1, 0, 0, 1, 1, 0, 2, 0 ],
>   [ 0, 0, 0, 0, 2, 0, 1, 0, 2, 2, 0 ],
>   [ 0, 0, 0, 0, 2, 0, 2, 2, 0, 2, 0 ],
>   [ 0, 0, 0, 0, 0, 2, 1, 1, 0, 1, 0 ],
>   [ 0, 0, 0, 0, 1, 0, 1, 1, 0, 2, 1 ],
>   [ 1, 0, 0, 0, 1, 0, 2, 1, 0, 2, 0 ],
>   [ 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0 ],
>   [ 0, 2, 0, 0, 1, 0, 1, 2, 0, 0, 0 ],
>   [ 0, 0, 0, 0, 0, 0, 2, 1, 0, 0, 0 ] ]
> ];;
gap> m:=GModuleByMats(mats,GF(3));;
gap> MTX.ModuleAutomorphisms(m);
<matrix group of size 2 with 2 generators>
gap> MTX.ModuleAutomorphisms(m);
<matrix group of size 2 with 2 generators>
gap> MTX.ModuleAutomorphisms(m);
<matrix group of size 2 with 2 generators>
gap> MTX.ModuleAutomorphisms(m);
<matrix group of size 2 with 2 generators>
gap> MTX.ModuleAutomorphisms(m);
<matrix group of size 2 with 2 generators>