<Chapter Label="Algorithms for almost crystallographic groups">
<Heading>Algorithms for almost crystallographic groups</Heading>
This chapter presents a variety of algorithms for almost crystallographic
groups. In most cases, they assume a polycyclically presented group as 
input; in particular, the input groups must be polycyclic in this case.
The methods described here supplement the methods of the &Polycyclic;
package for polycyclically presented groups. Many of the functions in this
chapter are based on methods of the &Polycyclic; package and thus this
package must be installed to use the functions introduced here. We refer to
the &Polycyclic; package for further information on polycyclic
presentations.
<Section Label="Properties of almost crystallographic groups">
<Heading>Properties of almost crystallographic groups</Heading>
<ManSection>
<Prop Name="IsAlmostCrystallographic" Arg="G"/>
<Description>
This function checks if a polycyclically presented group <A>G</A> is almost
crystallographic; that is, it checks if <A>G</A> is nilpotent-by-finite and
has no non-trivial finite normal subgroup.
</Description>
</ManSection>
<ManSection>
<Prop Name="IsAlmostBieberbachGroup" Arg="G"/>
<Description>
This function checks if a polycyclically presented group <A>G</A> is almost
Bieberbach; that is, it checks if <A>G</A> is nilpotent-by-finite and torsion
free.
</Description>
</ManSection>
</Section>
<Section Label="Betti numbers">
<Heading>Betti numbers</Heading>
Let <M>G</M> be a polycyclically presented and torsion free group of Hirsch 
length <M>n</M>. Then we can compute the Betti numbers <M>\beta_i(G)</M> for <M>i \in
\{0, 1, 2, n-2, n-1, n\}</M>. If <M>n \leq 6</M>, then we can compute all Betti
numbers <M>\beta_i(G)</M> for <M>0 \leq i \leq 6</M> of <M>G</M>. We introduce the following
functions for this purpose and we refer to <Cite Key="BRO"/> for the details on 
the orientation module and the Betti numbers.
<ManSection>
<Attr Name="OrientationModule" Arg="G"/>
<Description>
This function determines the orientation module of the polycyclically
presented group <A>G</A>; that is, it returns a list of matrices <M>m_1, \ldots,
m_n \in GL( 1, &ZZ; )</M> which are the images of the <C>Igs(G)</C> in their action
on the orientation module.
</Description>
</ManSection>
<ManSection>
<Oper Name="BettiNumber" Arg="G, m"/>
<Description>
This function returns the <A>m</A>th Betti number of the polycyclically presented
torsion free group <A>G</A> if <M>m \in \{0, 1, 2, n-2, n-1, n\}</M>, where <M>n</M> is the 
Hirsch length of <A>G</A>.
</Description>
</ManSection>
<ManSection>
<Attr Name="BettiNumbers" Arg="G"/>
<Description>
This function returns the Betti numbers of the polycyclically presented
torsion free group <A>G</A> if the Hirsch length of <A>G</A> is smaller than 7.
</Description>
</ManSection>
</Section>
<Section Label="Determination of certain extensions">
<Heading>Determination of certain extensions</Heading>
Let <M>G</M> be a polycyclically presented almost crystallographic group. We want 
to check the existence of certain extensions of <M>G</M>.
<P/>
First, it is well-known that the equivalence classes of extensions of <M>G</M>
correspond to the second cohomology group of <M>G</M>. This cohomology group can
be computed using the methods of the &Polycyclic; package for any
explicitly given module of <M>G</M>. Further, we can construct a polycyclic
presentation for each cocycle of the second cohomology group. We give an
example for such a computation below.
<P/>
However, we may be interested in certain extensions only; for example, 
the torsion free extensions are often of particular interest. If the 
second cohomology group is finite, then we can compute a polycyclic 
presentation for each element of this group and check the resulting group
for torsion freeness. But if the second cohomology group is infinite, then
this approach is not available. Hence we introduce the following special 
method to cover this and related applications.
<ManSection>
<Func Name="HasExtensionOfType" Arg="G, torsionfree, minimalcentre"/>
<Description>
Suppose that <A>G</A> is a polycyclically presented almost crystallographic group
with Fitting subgroup <M>N</M>. This function checks if there is a <M>G</M>-module 
<M>M \cong &ZZ;</M> which is centralized by <M>N</M> such that there exists a torsion
free extension of <M>M</M> by <A>G</A> (if the flag <A>torsionfree</A> is true) or an 
extension <M>E</M> with <M>Z(Fitt(E)) = M</M> (if the flag <A>minimalcentre</A> is true)
or an extension which satisfies both conditions (if both flags are true).
<P/>
We note that the existence of such extensions is of interest in the 
determination of extensions which are almost Bieberbach groups. We refer 
to <Cite Key="DE1"/> for a more detailed account of this application and for
further results of a similar nature.
</Description>
</ManSection>
</Section>
</Chapter>
