(1) -> )r axiom/semidirectProduct
)set output algebra off
)set output mathml on
-- first try C2 x C3
C2 := FiniteGroup(2,[[1,2],[2,1]],["1","m"])
Type: Type
SDP := semidirectProduct([[1,2,3],[2,3,1],[3,1,2]],["1","r","rr"],
[[2,2,2],[2,2,2],[2,2,2]])$C2
Type: Type
toTable()$SDP
1 |
r |
rr |
m |
mr |
mrr |
r |
rr |
1 |
mr |
mrr |
m |
rr |
1 |
r |
mrr |
m |
mr |
m |
mr |
mrr |
1 |
r |
rr |
mr |
mrr |
m |
r |
rr |
1 |
mrr |
m |
mr |
rr |
1 |
r |
Type: Table(6)
setGenerators([false,true,false,true,false,false])$SDP
Type: Void
PSDP := toPermutation()$SDP
<(1 2 3)(4 5 6),(1 4)(2 5)(3 6)>
Type: PermutationGroup(Integer)
permutationRepresentation(PSDP,6)
[
|
0 |
0 |
1 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
0 |
|
,
|
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
|
|
]
|
Type: List(Matrix(Integer))
-- then try C3 x C2 with mapping [[2,2],[2,2]]
C3 := FiniteGroup(3,[[1,2,3],[2,3,1],[3,1,2]],["1","r","rr"])
Type: Type
SDP := semidirectProduct([[1,2],[2,1]],["1","m"],[[2,2],[2,2]])$C3
Type: Type
toTable()$SDP
1 |
m |
rr |
rrm |
r |
rm |
m |
1 |
rrm |
rr |
rm |
r |
r |
rm |
1 |
m |
rr |
rrm |
rm |
r |
m |
1 |
rrm |
rr |
rr |
rrm |
r |
rm |
1 |
m |
rrm |
rr |
rm |
r |
m |
1 |
Type: Table(6)
setGenerators([false,true,true,false,false,false])$SDP
Type: Void
PSDP := toPermutation()$SDP
<(1 2)(3 4)(5 6),(1 3 5)(2 4 6)>
Type: PermutationGroup(Integer)
permutationRepresentation(PSDP,6)
[
|
0 |
1 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
1 |
0 |
|
,
|
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
|
|
]
|
Type: List(Matrix(Integer))
-- then try C3 x C2 with mapping [[1,1],[2,2]]
C3b := FiniteGroup(3,[[1,2,3],[2,3,1],[3,1,2]],["1","r","rr"])
Type: Type
SDP := semidirectProduct([[1,2],[2,1]],["1","m"],[[1,1],[2,2]])$C3b
Type: Type
toTable()$SDP
1 |
m |
r |
rm |
rr |
rrm |
m |
1 |
rrm |
rr |
rm |
r |
r |
rm |
rr |
rrm |
1 |
m |
rm |
r |
m |
1 |
rrm |
rr |
rr |
rrm |
1 |
m |
r |
rm |
rrm |
rr |
rm |
r |
m |
1 |
Type: Table(6)
setGenerators([false,true,true,false,false,false])$SDP
Type: Void
PSDP := toPermutation()$SDP
<(1 2)(3 6)(4 5),(1 3 5)(2 4 6)>
Type: PermutationGroup(Integer)
permutationRepresentation(PSDP,6)
[
|
0 |
1 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
|
,
|
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
0 |
0 |
0 |
0 |
1 |
0 |
0 |
|
|
]
|
Type: List(Matrix(Integer))
(19) ->
|