D₈₇₃₆ #72213629

order	17472
automorphism	Aut(G) order 20127744
homology	Abelianization (H₁) = C₂² · Schur multiplier (H₂) = C₂

Aliases

dihedral

D₈₇₃₆

Splittings

Fitting	C₃×C₇×C₁₃×C₃₂ ⋊ C₂
Hall	C₃×C₇×C₁₃ ⋊ D₃₂
Hall	C₇×C₁₃ ⋊ D₉₆
Hall	C₃×C₁₃ ⋊ D₂₂₄
Hall	C₃×C₇ ⋊ D₄₁₆
Sylow	C₁₃ ⋊ D₆₇₂
Sylow	C₇ ⋊ D₁₂₄₈
Sylow	C₃ ⋊ D₂₉₁₂

Subgroups

	subgroup	G/H
center	C₂	D₄₃₆₈
commutator, cosocle	C₃×C₇×C₁₃×C₁₆	C₂²
Frattini	C₁₆	C₂×D₂₇₃
Fitting	C₃×C₇×C₁₃×C₃₂	C₂
socle	C₂×C₃×C₇×C₁₃	D₁₆
hypercenter	C₃₂	D₂₇₃
hypocenter	C₃×C₇×C₁₃	D₃₂
LCS	G ▷ C₃×C₇×C₁₃×C₁₆ ▷ C₃×C₇×C₈×C₁₃ ▷ C₃×C₄×C₇×C₁₃ ▷ C₂×C₃×C₇×C₁₃ ▷ C₃×C₇×C₁₃
UCS	C₁ ◁ C₂ ◁ C₄ ◁ C₈ ◁ C₁₆ ◁ C₃₂

136 conjugacy classes of subgroups.

Full subgroup data →

Presentation

minimal degree	μ(G) = 55
transitive degree	μ_t(G) = 8736

A minimal faithful permutation representation — 2 generators on 55 points:

(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32)(33,34,35)(36,37,38,39,40,41,42)(43,44,45,46,47,48,49,50,51,52,53,54,55);(2,32)(3,31)(4,30)(5,29)(6,28)(7,27)(8,26)(9,25)(10,24)(11,23)(12,22)(13,21)(14,20)(15,19)(16,18)(34,35)(37,42)(38,41)(39,40)(44,55)(45,54)(46,53)(47,52)(48,51)(49,50)

Polycyclic presentation:

2^6,3,7,13|b^2=cd,c^2=de,d^2=ef,e^2=f,b^a=bc,c^a=cd,d^a=de,e^a=ef,g^a=g^2,h^a=h^6,i^a=i^12

Conjugacy classes & character table

4371 conjugacy classes. The character table is too large to display.

Relationships

maximal subgroup of	D₁₇₄₇₂, D₂₆₂₀₈
maximal normal subgroup of	D₁₇₄₇₂
maximal quotient of	Dic₈₇₃₆, D₁₇₄₇₂, D₂₆₂₀₈

GAP

Past the SmallGroups library coverage — no SmallGroups id. Construct it from its polycyclic presentation:

gap> F := FreeGroup(IsSyllableWordsFamily, "a", "b", "c", "d", "e", "f", "g", "h", "i");;
gap> coll := SingleCollector(F, [2, 2, 2, 2, 2, 2, 3, 7, 13]);;
gap> SetPower(coll, 2, F.3*F.4);;
gap> SetPower(coll, 3, F.4*F.5);;
gap> SetPower(coll, 4, F.5*F.6);;
gap> SetPower(coll, 5, F.6);;
gap> SetConjugate(coll, 2, 1, F.2*F.3);;
gap> SetConjugate(coll, 3, 1, F.3*F.4);;
gap> SetConjugate(coll, 4, 1, F.4*F.5);;
gap> SetConjugate(coll, 5, 1, F.5*F.6);;
gap> SetConjugate(coll, 7, 1, F.7^2);;
gap> SetConjugate(coll, 8, 1, F.8^6);;
gap> SetConjugate(coll, 9, 1, F.9^12);;
gap> UpdatePolycyclicCollector(coll);;
gap> G := GroupByRws(coll);

D8736 #72213629