File: PqSupplementInnerAutomorphisms

package info (click to toggle)
gap-anupq 3.3.3-1
  • links: PTS
  • area: main
  • in suites: forky, sid
  • size: 8,328 kB
  • sloc: ansic: 15,243; xml: 5,186; sh: 1,259; makefile: 281; perl: 260; javascript: 155
file content (14 lines) | stat: -rw-r--r-- 504 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
#Example: "PqSupplementInnerAutomorphisms" . . . based on manual example
#Illustrates `PqSupplementInnerAutomorphisms' usage
#vars: Q, procId, des, S, A;
#options: 
#alt: do
#procId := PqStart( FreeGroup(2) );
#alt: sub <procId> for <FreeGroup(2)>
Q := Pq( FreeGroup(2) : Prime := 3, ClassBound := 1 );
#alt: do
#PqSetPQuotientToGroup( procId );;
#alt: sub <procId> for <Q>
des := PqDescendants( Q : StepSize := 1 );
S := PqSupplementInnerAutomorphisms( des[3] );
A := AutomorphismGroupPGroup( des[3] );