Working with Finitely Presented Groups

Introduction


A finitely presented group is a group defined by a finite number of generators and defining relations or relators. Unlike permutation groups or Cayley table groups, where there are many operations that can be decided (even if only by an expensive algorithm), most interesting questions about finitely presented groups are algorithmically undecidable. This is not just a matter of nobody having yet been clever enough to devise an algorithm to answer the question. For most such questions it can be proved that no general algorithm can, in fact, exist. Nevertheless, you can attempt to answer questions about special classes of finitely presented groups, and there are procedures such as the ToddCoxeter algorithm that, while nonterminating in general, will (eventually) terminate for finite finitely presented groups, given sufficient time and memory.
The following sections discuss some of the operations on finitely presented groups that are available in Maple.


Creating a Finitely Presented Group


To begin working with finitely presented groups in Maple, the first thing that you need to do is to create such a group. A finitely presented group can be entered directly using notation very close to that used in textbooks. For example, the statement
>

G := < a, b  a^2, b^3, (a.b)^5 = 1 >;

${G}{\u2254}\u27e8{}{a}{\,}{b}{}{\mid}{}{{a}}^{{2}}{\,}{{b}}^{{3}}{\,}{a}{}{b}{}{a}{}{b}{}{a}{}{b}{}{a}{}{b}{}{a}{}{b}{}\u27e9$
 (1) 
creates the alternating group of degree $5$ as a finitely presented group.
There is one idiosyncrasy that you must be aware of: there must be at least one relation (in the form of an equation) among the relators for the input to be recognized as a finite presentation. Otherwise, Maple will interpret the syntax as a Vector.
To retrieve the set of generators of G, use the Generators command:
$\left[\left[{a}\right]{\,}\left[{b}\right]\right]$
 (2) 
Note that the generators are represented as words [a] and [b], rather than just the symbols a and b. This is because, in general, a finitely presented group can be produced as the subgroup of another finitely presented group generated by some words on the original generators. You can obtain the relators (again, as a set of words), by using the Relators command:
$\left\{\left[{a}{\,}{a}\right]{\,}\left[{b}{\,}{b}{\,}{b}\right]{\,}\left[{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}\right]\right\}$
 (3) 
Another way to obtain finitely presented groups is to use one of the group constructors that return groups in this class by using the form = "fpgroup" option. For instance, all groups in the small groups database can be obtained in this way.
>

SmallGroup( 12, 3, 'form' = "fpgroup" );

$\u27e8{}{\mathrm{a1}}{\,}{\mathrm{a2}}{\,}{\mathrm{a3}}{}{\mid}{}{{\mathrm{a2}}}^{{2}}{\,}{{\mathrm{a3}}}^{{2}}{\,}{{\mathrm{a1}}}^{{3}}{\,}{{\mathrm{a3}}}^{{1}}{}{{\mathrm{a2}}}^{{1}}{}{\mathrm{a3}}{}{\mathrm{a2}}{\,}{{\mathrm{a3}}}^{{1}}{}{{\mathrm{a1}}}^{{1}}{}{\mathrm{a3}}{}{\mathrm{a1}}{}{{\mathrm{a2}}}^{{1}}{\,}{{\mathrm{a2}}}^{{1}}{}{{\mathrm{a1}}}^{{1}}{}{\mathrm{a2}}{}{\mathrm{a1}}{}{{\mathrm{a3}}}^{{1}}{}{{\mathrm{a2}}}^{{1}}{}\u27e9$
 (4) 
Many other constructors can produce a group in the form of a finitely presented group.
>

CyclicGroup( 6, 'form' = "fpgroup" );

$\u27e8{}{g}{}{\mid}{}{{g}}^{{6}}{}\u27e9$
 (5) 
>

DihedralGroup( 5, 'form' = "fpgroup" );

${{\mathbf{D}}}_{{5}}$
 (6) 
>

Symm( 5, 'form' = "fpgroup" );

${{\mathbf{S}}}_{{5}}$
 (7) 


Subgroups of Finitely Presented Groups


Use the Subgroup command to create a subgroup of a finitely presented group. The first argument is the set of generators, and the second argument is the finitely presented group of which it is a subgroup.
>

G := < a, b  [a,b] = 1 >;

${G}{\u2254}\u27e8{}{a}{\,}{b}{}{\mid}{}{{a}}^{{1}}{}{{b}}^{{1}}{}{a}{}{b}{}\u27e9$
 (8) 
>

H := Subgroup( { a^4, (a.b)^9 }, G );

${H}{\u2254}\u27e8{}{\mathrm{\_G}}{\,}{\mathrm{\_G0}}{}{\mid}{}{\mathrm{\_G}}{}{\mathrm{\_G0}}{}{{\mathrm{\_G}}}^{{1}}{}{{\mathrm{\_G0}}}^{{1}}{}\u27e9$
 (9) 
Notice that Maple has produced a presentation for the subgroup H on a new set {_G, _G0} of generators.
To verify that H is indeed a subgroup of G, use the IsSubgroup command.
You can obtain the parent group G from H by using the Supergroup command.
$\u27e8{}{a}{\,}{b}{}{\mid}{}{{a}}^{{1}}{}{{b}}^{{1}}{}{a}{}{b}{}\u27e9$
 (11) 
Each subgroup of a finitely presented group comes equipped with an embedding morphism.
${\mathrm{\eta}}{\u2254}{\mathrm{<a\; group\; morphism>}}$
 (12) 
>

eta( [_G,_G,_G0,_G0,_G0] );

$\left[{a}{\,}{a}{\,}{a}{\,}{a}{\,}{a}{\,}{a}{\,}{a}{\,}{a}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}{\,}{a}{\,}{b}\right]$
 (13) 
You can apply the embedding eta to a word on the generators of H.


Operations on Finitely Presented Groups


To compute the order of a finitely presented group, use the GroupOrder command. In general, the order of a finitely presented group cannot be determined, but the command attempts to handle certain cases in which the order can be determined. In particular, if the group is finite then, given sufficient time and space, the order can eventually be determined.
>

G := < a, b, c, d, e  a.b = c, b.c = d, c.d = e, d.e = a, e.a = b >;

${G}{\u2254}\u27e8{}{a}{\,}{b}{\,}{c}{\,}{d}{\,}{e}{}{\mid}{}{{a}}^{{1}}{}{{e}}^{{1}}{}{b}{\,}{{b}}^{{1}}{}{{a}}^{{1}}{}{c}{\,}{{c}}^{{1}}{}{{b}}^{{1}}{}{d}{\,}{{d}}^{{1}}{}{{c}}^{{1}}{}{e}{\,}{{e}}^{{1}}{}{{d}}^{{1}}{}{a}{}\u27e9$
 (14) 
>

G := < a, b  a^2 = b^3 >;

${G}{\u2254}\u27e8{}{a}{\,}{b}{}{\mid}{}{{a}}^{{2}}{}{{b}}^{{3}}{}\u27e9$
 (16) 
It is often of use to know the structure of the abelianization of a finitely presented group. Use the AbelianInvariants command to obtain the canonical invariants of the abelianization of a finitely presented group.
>

AbelianInvariants( G );

$\left[{1}{\,}\left[\right]\right]$
 (18) 
The list returned has the form [r,[d[1], d[2], ..., d[k]]], where r is the rank of the torsionfree part, and the d[i] are the invariant factors, with d[i] a divisor of d[i+1]. Thus, the abelianization of this group G is infinite cyclic.
Now, consider the following subgroup H of G.
>

H := Subgroup( { a, [b,a,1/b], [1/b,a,b,a,1/b,1/a,b],[1/b,a,1/b,a,b,a,1/b,1/a,b,1/a,b], [1/b,a,1/b,a,1/b,a,b,1/a,b,1/a,b,1/a,b] }, G );

${H}{\u2254}\u27e8{}{\mathrm{\_G1}}{\,}{\mathrm{\_G2}}{\,}{\mathrm{\_G3}}{\,}{\mathrm{\_G4}}{\,}{\mathrm{\_G5}}{}{\mid}{}{{\mathrm{\_G1}}}^{{2}}{}{{\mathrm{\_G2}}}^{{2}}{\,}{\mathrm{\_G3}}{}{{\mathrm{\_G2}}}^{{2}}{}{\mathrm{\_G3}}{\,}{\mathrm{\_G4}}{}{{\mathrm{\_G2}}}^{{2}}{}{\mathrm{\_G4}}{\,}{\mathrm{\_G5}}{}{{\mathrm{\_G2}}}^{{2}}{}{{\mathrm{\_G5}}}^{{2}}{\,}{\mathrm{\_G3}}{}{{\mathrm{\_G2}}}^{{2}}{}{{\mathrm{\_G3}}}^{{1}}{}{{\mathrm{\_G1}}}^{{2}}{\,}{\mathrm{\_G4}}{}{{\mathrm{\_G2}}}^{{2}}{}{{\mathrm{\_G4}}}^{{1}}{}{\mathrm{\_G3}}{}{{\mathrm{\_G2}}}^{{2}}{}{{\mathrm{\_G3}}}^{{1}}{\,}{\mathrm{\_G5}}{}{{\mathrm{\_G2}}}^{{2}}{}{{\mathrm{\_G5}}}^{{1}}{}{\mathrm{\_G4}}{}{{\mathrm{\_G2}}}^{{2}}{}{{\mathrm{\_G4}}}^{{1}}{}\u27e9$
 (19) 
This is a subgroup of finite index in G. You can determine the index by using the Index command.
Often, computing a subgroup of a finitely presented group will produce an unwieldy presentation. You can try to reduce the overall "size" of the presentation by using the Simplify command.
${\mathrm{H2}}{\u2254}\u27e8{}{\mathrm{\_G1}}{\,}{\mathrm{\_G2}}{\,}{\mathrm{\_G3}}{\,}{\mathrm{\_G4}}{\,}{\mathrm{\_G5}}{}{\mid}{}{{\mathrm{\_G1}}}^{{2}}{}{{\mathrm{\_G2}}}^{{2}}{\,}{\mathrm{\_G3}}{}{{\mathrm{\_G2}}}^{{2}}{}{\mathrm{\_G3}}{\,}{\mathrm{\_G4}}{}{{\mathrm{\_G2}}}^{{2}}{}{\mathrm{\_G4}}{\,}{{\mathrm{\_G3}}}^{{2}}{}{{\mathrm{\_G1}}}^{{2}}{\,}{{\mathrm{\_G4}}}^{{2}}{}{{\mathrm{\_G3}}}^{{2}}{\,}{\mathrm{\_G5}}{}{{\mathrm{\_G2}}}^{{2}}{}{{\mathrm{\_G5}}}^{{2}}{\,}{{\mathrm{\_G5}}}^{{3}}{}{{\mathrm{\_G4}}}^{{2}}{}\u27e9$
 (21) 
To measure the effect of whatever simplifications were achieved, use the PresentationComplexity command.
>

PresentationComplexity( H );

>

PresentationComplexity( H2 );

This indicates that, while the numbers of generators ($5$) and relators ($7$) were not reduced, the total length of the relators was reduced from $39$ to $30$.
For a finite index subgroup H of a finitely presented group G, you can obtain the set of (left or right) cosets as shown in the following example.
>

cosets := RightCosets( H, G );

 (24) 
Each coset has the form $\mathrm{Hg}$, for some element $g$ of $G$. This element $g$ is called a representative of the coset $\mathrm{Hg}$. To obtain a representative for a coset, use the Representative method.
>

map( Representative, cosets );

$\left\{{{b}}^{{1}}{\,}{{b}}^{{1}}{}{a}{\,}{{b}}^{{1}}{}{a}{}{b}{\,}{{b}}^{{1}}{}{a}{}{b}{}{a}{}{{b}}^{{2}}{\,}{{b}}^{{1}}{}{a}{}{b}{}{a}{}{{b}}^{{2}}{}{a}{\,}{{b}}^{{1}}{}{a}{}{b}{}{a}{}{{b}}^{{2}}{}{a}{}{b}{\,}{{b}}^{{1}}{}{a}{}{b}{}{a}{}{{b}}^{{2}}{}{a}{}{b}{}{a}{}{{b}}^{{2}}{\,}{{b}}^{{1}}{}{a}{}{b}{}{a}{}{{b}}^{{2}}{}{a}{}{b}{}{a}{}{{b}}^{{2}}{}{a}{\,}{1}{\,}{b}\right\}$
 (25) 
As explained above, most questions about finitely presented groups cannot be answered in general.
However, if you have a finite finitely presented group, you can often get an answer by first converting it to a permutation group using the PermutationGroup constructor.
>

G := < a, b  a^2, b^4, (a.b)^2 = 1 >;

${G}{\u2254}\u27e8{}{a}{\,}{b}{}{\mid}{}{{a}}^{{2}}{\,}{a}{}{b}{}{a}{}{b}{\,}{{b}}^{{4}}{}\u27e9$
 (26) 
>

IsAbelian( PermutationGroup( G ) );

The same is true of many other computations that cannot be completed for finitely presented groups in general.
>

IsNilpotent( PermutationGroup( G ) );



Compatibility


The Working with Finitely Presented Groups tutorial was introduced in Maple 2015.
For more information on Maple 2015 changes, see Updates in Maple 2015.

