GAP 4.8.9 installation with standard packages -- copy to your CoCalc project to get it
#############################################################################
##
#W AutGrp.gd FGA package Christian Sievers
##
## Methods for automorphism groups of free groups
##
#Y 2003 - 2012
##
#############################################################################
##
#F IsAutomorphismGroupOfFreeGroup( <obj> )
##
## returns true if <obj> is the automorphism group of a free group.
##
DeclareFilter( "IsAutomorphismGroupOfFreeGroup" );
InstallTrueMethod( IsAutomorphismGroup,
IsAutomorphismGroupOfFreeGroup );
#############################################################################
##
#F FreeGroupEndomorphismByImages( <group>, <images> )
##
## returns the endomorphism of <group> that maps the generators of <group>
## to <images>.
##
DeclareGlobalFunction( "FreeGroupEndomorphismByImages" );
#############################################################################
##
#F FreeGroupAutomorphismsGeneratorO( <group> )
#F FreeGroupAutomorphismsGeneratorP( <group> )
#F FreeGroupAutomorphismsGeneratorU( <group> )
#F FreeGroupAutomorphismsGeneratorS( <group> )
#F FreeGroupAutomorphismsGeneratorT( <group> )
#F FreeGroupAutomorphismsGeneratorQ( <group> )
#F FreeGroupAutomorphismsGeneratorR( <group> )
##
## These functions return the automorphism of <group> which maps the
## generators [<x1>, <x2>, ..., <xn>] to
## O : [<x1>^-1 , <x2>, ..., <xn> ] (n>=1)
## P : [<x2> , <x1>, <x3>, ..., <xn> ] (n>=2)
## U : [<x1><x2>, <x2>, <x3>, ..., <xn> ] (n>=2)
## S : [<x2>^-1, <x3>^-1, ..., <xn>^-1, <x1>^-1 ] (n>=1)
## T : [<x2> , <x1>^-1, <x3>, ..., <xn>] (n>=2)
## Q : [<x2>, <x3>, ..., <xn>, <x1> ] (n>=2)
## R : [<x2>^-1, <x1>, <x3>, <x4>, ...,
## <x{n-2}>, <xn><x{n-1}>^-1, <x{n-1}>^-1] (n>=4)
##
DeclareGlobalFunction( "FreeGroupAutomorphismsGeneratorO" );
DeclareGlobalFunction( "FreeGroupAutomorphismsGeneratorP" );
DeclareGlobalFunction( "FreeGroupAutomorphismsGeneratorU" );
DeclareGlobalFunction( "FreeGroupAutomorphismsGeneratorS" );
DeclareGlobalFunction( "FreeGroupAutomorphismsGeneratorT" );
DeclareGlobalFunction( "FreeGroupAutomorphismsGeneratorQ" );
DeclareGlobalFunction( "FreeGroupAutomorphismsGeneratorR" );
#############################################################################
##
#F FGA_CheckRank( <group>, <minrank> )
##
## Checks whether <group> has rank at least <minrank>, and signals an
## error otherwise (helper function for FreeGroupAutomorphismsGenerator*)
##
DeclareGlobalFunction( "FGA_CheckRank" );
#############################################################################
##
#E