Quelle  g20.def   Sprache: unbekannt

#---------------------------------------------------------------------------#
# C20
GTW20_1 := Group( ( 1, 2, 3, 4, 5, 6, 7, 8, 9,10,
                  11,12,13,14,15,16,17,18,19,20) );
SetName( GTW20_1,  "20/1" ); 
#---------------------------------------------------------------------------#
# C10xC2
GTW20_2 := Group( ( 1, 2, 3, 4, 5, 6, 7, 8, 9,10), (11,12) );
SetName( GTW20_2,  "20/2" ); 
#---------------------------------------------------------------------------#
# dihedral group of order 20
GTW20_3 := Group( ( 1, 2, 3, 4, 5, 6, 7, 8, 9,10), 
                ( 2,10)( 3, 9)( 4, 8)( 5, 7) );
SetName( GTW20_3,  "20/3" ); 
#---------------------------------------------------------------------------#
# quaternion group of order 20
GTW20_4 := Group( (1,2,4,8,12,7,10,15,19,20)(3,6,11,17,16,13,18,14,9,5), 
                (1,3,7,13)(2,5,10,16)(4,9,15,17)(6,12,18,20)(8,14,19,11) );
SetName( GTW20_4,  "20/4" ); 
#---------------------------------------------------------------------------#
GTW20_5 := Group( (1,2,4,8,15)(3,6,11,5,9)(7,13,16,12,10)(14,20,17,19,18), 
                (1,3,7,14)(2,5,10,17)(4,6,12,18)(8,9,16,20)(11,13,19,15) );
SetName( GTW20_5,  "20/5" ); 
#---------------------------------------------------------------------------#