Dic₃₉₀₀ #72215219

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

Aliases

dicyclic

Dic₃₉₀₀

Splittings

Hall	C₃×C₁₃×C₂₅ ⋊ Q₁₆
Hall	C₁₃×C₂₅ ⋊ Dic₁₂
Hall	C₃×C₂₅ ⋊ Dic₅₂
Hall	C₃×C₁₃ ⋊ Dic₁₀₀
Sylow	C₂₅ ⋊ Dic₁₅₆
Sylow	C₁₃ ⋊ Dic₃₀₀
Sylow	C₃ ⋊ Dic₁₃₀₀

Subgroups

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

108 conjugacy classes of subgroups.

Full subgroup data →

Presentation

minimal degree	μ(G) = 57
transitive degree	μ_t(G) = 15600

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

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

Polycyclic presentation:

2^4,3,5,13,5|a^2=d,b^2=cd,c^2=d,f^5=h,b^a=bc,c^a=cd,e^a=e^2,f^a=f^4h^4,g^a=g^12,h^a=h^4

Conjugacy classes & character table

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

Relationships

maximal subgroup of	Dic₇₈₀₀, Dic₁₁₇₀₀
maximal normal subgroup of	Dic₇₈₀₀
maximal quotient of	Dic₁₁₇₀₀

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");;
gap> coll := SingleCollector(F, [2, 2, 2, 2, 3, 5, 13, 5]);;
gap> SetPower(coll, 1, F.4);;
gap> SetPower(coll, 2, F.3*F.4);;
gap> SetPower(coll, 3, F.4);;
gap> SetPower(coll, 6, F.8);;
gap> SetConjugate(coll, 2, 1, F.2*F.3);;
gap> SetConjugate(coll, 3, 1, F.3*F.4);;
gap> SetConjugate(coll, 5, 1, F.5^2);;
gap> SetConjugate(coll, 6, 1, F.6^4*F.8^4);;
gap> SetConjugate(coll, 7, 1, F.7^12);;
gap> SetConjugate(coll, 8, 1, F.8^4);;
gap> UpdatePolycyclicCollector(coll);;
gap> G := GroupByRws(coll);

Dic3900 #72215219