Theorem sylow3lem4 18528

Description: Lemma for sylow3 18531, first part. The number of Sylow subgroups is a divisor of the size of 𝐺 reduced by the size of a Sylow subgroup of 𝐺. (Contributed by Mario Carneiro, 19-Jan-2015.)

Hypotheses

Ref	Expression
sylow3.x	⊢ 𝑋 = (Base‘𝐺)
sylow3.g	⊢ (𝜑 → 𝐺 ∈ Grp)
sylow3.xf	⊢ (𝜑 → 𝑋 ∈ Fin)
sylow3.p	⊢ (𝜑 → 𝑃 ∈ ℙ)
sylow3lem1.a	⊢ + = (+g‘𝐺)
sylow3lem1.d	⊢ − = (-g‘𝐺)
sylow3lem1.m	⊢ ⊕ = (𝑥 ∈ 𝑋, 𝑦 ∈ (𝑃 pSyl 𝐺) ↦ ran (𝑧 ∈ 𝑦 ↦ ((𝑥 + 𝑧) − 𝑥)))
sylow3lem2.k	⊢ (𝜑 → 𝐾 ∈ (𝑃 pSyl 𝐺))
sylow3lem2.h	⊢ 𝐻 = {𝑢 ∈ 𝑋 ∣ (𝑢 ⊕ 𝐾) = 𝐾}
sylow3lem2.n	⊢ 𝑁 = {𝑥 ∈ 𝑋 ∣ ∀𝑦 ∈ 𝑋 ((𝑥 + 𝑦) ∈ 𝐾 ↔ (𝑦 + 𝑥) ∈ 𝐾)}

Assertion

Ref	Expression
sylow3lem4	⊢ (𝜑 → (♯‘(𝑃 pSyl 𝐺)) ∥ ((♯‘𝑋) / (𝑃↑(𝑃 pCnt (♯‘𝑋)))))

Distinct variable groups:   𝑥,𝑢,𝑦,𝑧, −   𝑢, ⊕ ,𝑥,𝑦,𝑧   𝑥,𝐻,𝑦   𝑢,𝐾,𝑥,𝑦,𝑧   𝑢,𝑁,𝑧   𝑢,𝑋,𝑥,𝑦,𝑧   𝑢,𝐺,𝑥,𝑦,𝑧   𝜑,𝑢,𝑥,𝑦,𝑧   𝑢, + ,𝑥,𝑦,𝑧   𝑢,𝑃,𝑥,𝑦,𝑧

Allowed substitution hints:   𝐻(𝑧,𝑢)   𝑁(𝑥,𝑦)

Proof of Theorem sylow3lem4

Step	Hyp	Ref	Expression
1		sylow3.x	. . 3 ⊢ 𝑋 = (Base‘𝐺)
2		sylow3.g	. . 3 ⊢ (𝜑 → 𝐺 ∈ Grp)
3		sylow3.xf	. . 3 ⊢ (𝜑 → 𝑋 ∈ Fin)
4		sylow3.p	. . 3 ⊢ (𝜑 → 𝑃 ∈ ℙ)
5		sylow3lem1.a	. . 3 ⊢ + = (+g‘𝐺)
6		sylow3lem1.d	. . 3 ⊢ − = (-g‘𝐺)
7		sylow3lem1.m	. . 3 ⊢ ⊕ = (𝑥 ∈ 𝑋, 𝑦 ∈ (𝑃 pSyl 𝐺) ↦ ran (𝑧 ∈ 𝑦 ↦ ((𝑥 + 𝑧) − 𝑥)))
8		sylow3lem2.k	. . 3 ⊢ (𝜑 → 𝐾 ∈ (𝑃 pSyl 𝐺))
9		sylow3lem2.h	. . 3 ⊢ 𝐻 = {𝑢 ∈ 𝑋 ∣ (𝑢 ⊕ 𝐾) = 𝐾}
10		sylow3lem2.n	. . 3 ⊢ 𝑁 = {𝑥 ∈ 𝑋 ∣ ∀𝑦 ∈ 𝑋 ((𝑥 + 𝑦) ∈ 𝐾 ↔ (𝑦 + 𝑥) ∈ 𝐾)}
11	1, 2, 3, 4, 5, 6, 7, 8, 9, 10	sylow3lem3 18527	. 2 ⊢ (𝜑 → (♯‘(𝑃 pSyl 𝐺)) = (♯‘(𝑋 / (𝐺 ~QG 𝑁))))
12		slwsubg 18508	. . . . . . . . . 10 ⊢ (𝐾 ∈ (𝑃 pSyl 𝐺) → 𝐾 ∈ (SubGrp‘𝐺))
13	8, 12	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ∈ (SubGrp‘𝐺))
14		eqid 2772	. . . . . . . . . . 11 ⊢ (𝐺 ↾s 𝑁) = (𝐺 ↾s 𝑁)
15	10, 1, 5, 14	nmznsg 18119	. . . . . . . . . 10 ⊢ (𝐾 ∈ (SubGrp‘𝐺) → 𝐾 ∈ (NrmSGrp‘(𝐺 ↾s 𝑁)))
16		nsgsubg 18107	. . . . . . . . . 10 ⊢ (𝐾 ∈ (NrmSGrp‘(𝐺 ↾s 𝑁)) → 𝐾 ∈ (SubGrp‘(𝐺 ↾s 𝑁)))
17	15, 16	syl 17	. . . . . . . . 9 ⊢ (𝐾 ∈ (SubGrp‘𝐺) → 𝐾 ∈ (SubGrp‘(𝐺 ↾s 𝑁)))
18	13, 17	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐾 ∈ (SubGrp‘(𝐺 ↾s 𝑁)))
19	10, 1, 5	nmzsubg 18116	. . . . . . . . . . 11 ⊢ (𝐺 ∈ Grp → 𝑁 ∈ (SubGrp‘𝐺))
20	2, 19	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ∈ (SubGrp‘𝐺))
21	14	subgbas 18079	. . . . . . . . . 10 ⊢ (𝑁 ∈ (SubGrp‘𝐺) → 𝑁 = (Base‘(𝐺 ↾s 𝑁)))
22	20, 21	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 𝑁 = (Base‘(𝐺 ↾s 𝑁)))
23	1	subgss 18076	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (SubGrp‘𝐺) → 𝑁 ⊆ 𝑋)
24	20, 23	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ⊆ 𝑋)
25	3, 24	ssfid 8534	. . . . . . . . 9 ⊢ (𝜑 → 𝑁 ∈ Fin)
26	22, 25	eqeltrrd 2861	. . . . . . . 8 ⊢ (𝜑 → (Base‘(𝐺 ↾s 𝑁)) ∈ Fin)
27		eqid 2772	. . . . . . . . 9 ⊢ (Base‘(𝐺 ↾s 𝑁)) = (Base‘(𝐺 ↾s 𝑁))
28	27	lagsubg 18137	. . . . . . . 8 ⊢ ((𝐾 ∈ (SubGrp‘(𝐺 ↾s 𝑁)) ∧ (Base‘(𝐺 ↾s 𝑁)) ∈ Fin) → (♯‘𝐾) ∥ (♯‘(Base‘(𝐺 ↾s 𝑁))))
29	18, 26, 28	syl2anc 576	. . . . . . 7 ⊢ (𝜑 → (♯‘𝐾) ∥ (♯‘(Base‘(𝐺 ↾s 𝑁))))
30	22	fveq2d 6500	. . . . . . 7 ⊢ (𝜑 → (♯‘𝑁) = (♯‘(Base‘(𝐺 ↾s 𝑁))))
31	29, 30	breqtrrd 4953	. . . . . 6 ⊢ (𝜑 → (♯‘𝐾) ∥ (♯‘𝑁))
32		eqid 2772	. . . . . . . . . . . 12 ⊢ (0g‘𝐺) = (0g‘𝐺)
33	32	subg0cl 18083	. . . . . . . . . . 11 ⊢ (𝐾 ∈ (SubGrp‘𝐺) → (0g‘𝐺) ∈ 𝐾)
34	13, 33	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (0g‘𝐺) ∈ 𝐾)
35	34	ne0d 4181	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ≠ ∅)
36	1	subgss 18076	. . . . . . . . . . . 12 ⊢ (𝐾 ∈ (SubGrp‘𝐺) → 𝐾 ⊆ 𝑋)
37	13, 36	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐾 ⊆ 𝑋)
38	3, 37	ssfid 8534	. . . . . . . . . 10 ⊢ (𝜑 → 𝐾 ∈ Fin)
39		hashnncl 13540	. . . . . . . . . 10 ⊢ (𝐾 ∈ Fin → ((♯‘𝐾) ∈ ℕ ↔ 𝐾 ≠ ∅))
40	38, 39	syl 17	. . . . . . . . 9 ⊢ (𝜑 → ((♯‘𝐾) ∈ ℕ ↔ 𝐾 ≠ ∅))
41	35, 40	mpbird 249	. . . . . . . 8 ⊢ (𝜑 → (♯‘𝐾) ∈ ℕ)
42	41	nnzd 11897	. . . . . . 7 ⊢ (𝜑 → (♯‘𝐾) ∈ ℤ)
43		hashcl 13530	. . . . . . . . 9 ⊢ (𝑁 ∈ Fin → (♯‘𝑁) ∈ ℕ0)
44	25, 43	syl 17	. . . . . . . 8 ⊢ (𝜑 → (♯‘𝑁) ∈ ℕ0)
45	44	nn0zd 11896	. . . . . . 7 ⊢ (𝜑 → (♯‘𝑁) ∈ ℤ)
46		pwfi 8612	. . . . . . . . . . 11 ⊢ (𝑋 ∈ Fin ↔ 𝒫 𝑋 ∈ Fin)
47	3, 46	sylib 210	. . . . . . . . . 10 ⊢ (𝜑 → 𝒫 𝑋 ∈ Fin)
48		eqid 2772	. . . . . . . . . . . . 13 ⊢ (𝐺 ~QG 𝑁) = (𝐺 ~QG 𝑁)
49	1, 48	eqger 18125	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (SubGrp‘𝐺) → (𝐺 ~QG 𝑁) Er 𝑋)
50	20, 49	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐺 ~QG 𝑁) Er 𝑋)
51	50	qsss 8156	. . . . . . . . . 10 ⊢ (𝜑 → (𝑋 / (𝐺 ~QG 𝑁)) ⊆ 𝒫 𝑋)
52	47, 51	ssfid 8534	. . . . . . . . 9 ⊢ (𝜑 → (𝑋 / (𝐺 ~QG 𝑁)) ∈ Fin)
53		hashcl 13530	. . . . . . . . 9 ⊢ ((𝑋 / (𝐺 ~QG 𝑁)) ∈ Fin → (♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∈ ℕ0)
54	52, 53	syl 17	. . . . . . . 8 ⊢ (𝜑 → (♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∈ ℕ0)
55	54	nn0zd 11896	. . . . . . 7 ⊢ (𝜑 → (♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∈ ℤ)
56		dvdscmul 15494	. . . . . . 7 ⊢ (((♯‘𝐾) ∈ ℤ ∧ (♯‘𝑁) ∈ ℤ ∧ (♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∈ ℤ) → ((♯‘𝐾) ∥ (♯‘𝑁) → ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝐾)) ∥ ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝑁))))
57	42, 45, 55, 56	syl3anc 1351	. . . . . 6 ⊢ (𝜑 → ((♯‘𝐾) ∥ (♯‘𝑁) → ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝐾)) ∥ ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝑁))))
58	31, 57	mpd 15	. . . . 5 ⊢ (𝜑 → ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝐾)) ∥ ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝑁)))
59		hashcl 13530	. . . . . . . . 9 ⊢ (𝑋 ∈ Fin → (♯‘𝑋) ∈ ℕ0)
60	3, 59	syl 17	. . . . . . . 8 ⊢ (𝜑 → (♯‘𝑋) ∈ ℕ0)
61	60	nn0cnd 11767	. . . . . . 7 ⊢ (𝜑 → (♯‘𝑋) ∈ ℂ)
62	41	nncnd 11455	. . . . . . 7 ⊢ (𝜑 → (♯‘𝐾) ∈ ℂ)
63	41	nnne0d 11488	. . . . . . 7 ⊢ (𝜑 → (♯‘𝐾) ≠ 0)
64	61, 62, 63	divcan1d 11216	. . . . . 6 ⊢ (𝜑 → (((♯‘𝑋) / (♯‘𝐾)) · (♯‘𝐾)) = (♯‘𝑋))
65	1, 48, 20, 3	lagsubg2 18136	. . . . . 6 ⊢ (𝜑 → (♯‘𝑋) = ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝑁)))
66	64, 65	eqtrd 2808	. . . . 5 ⊢ (𝜑 → (((♯‘𝑋) / (♯‘𝐾)) · (♯‘𝐾)) = ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝑁)))
67	58, 66	breqtrrd 4953	. . . 4 ⊢ (𝜑 → ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝐾)) ∥ (((♯‘𝑋) / (♯‘𝐾)) · (♯‘𝐾)))
68	1	lagsubg 18137	. . . . . . 7 ⊢ ((𝐾 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin) → (♯‘𝐾) ∥ (♯‘𝑋))
69	13, 3, 68	syl2anc 576	. . . . . 6 ⊢ (𝜑 → (♯‘𝐾) ∥ (♯‘𝑋))
70	60	nn0zd 11896	. . . . . . 7 ⊢ (𝜑 → (♯‘𝑋) ∈ ℤ)
71		dvdsval2 15468	. . . . . . 7 ⊢ (((♯‘𝐾) ∈ ℤ ∧ (♯‘𝐾) ≠ 0 ∧ (♯‘𝑋) ∈ ℤ) → ((♯‘𝐾) ∥ (♯‘𝑋) ↔ ((♯‘𝑋) / (♯‘𝐾)) ∈ ℤ))
72	42, 63, 70, 71	syl3anc 1351	. . . . . 6 ⊢ (𝜑 → ((♯‘𝐾) ∥ (♯‘𝑋) ↔ ((♯‘𝑋) / (♯‘𝐾)) ∈ ℤ))
73	69, 72	mpbid 224	. . . . 5 ⊢ (𝜑 → ((♯‘𝑋) / (♯‘𝐾)) ∈ ℤ)
74		dvdsmulcr 15497	. . . . 5 ⊢ (((♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∈ ℤ ∧ ((♯‘𝑋) / (♯‘𝐾)) ∈ ℤ ∧ ((♯‘𝐾) ∈ ℤ ∧ (♯‘𝐾) ≠ 0)) → (((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝐾)) ∥ (((♯‘𝑋) / (♯‘𝐾)) · (♯‘𝐾)) ↔ (♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∥ ((♯‘𝑋) / (♯‘𝐾))))
75	55, 73, 42, 63, 74	syl112anc 1354	. . . 4 ⊢ (𝜑 → (((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝐾)) ∥ (((♯‘𝑋) / (♯‘𝐾)) · (♯‘𝐾)) ↔ (♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∥ ((♯‘𝑋) / (♯‘𝐾))))
76	67, 75	mpbid 224	. . 3 ⊢ (𝜑 → (♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∥ ((♯‘𝑋) / (♯‘𝐾)))
77	1, 3, 8	slwhash 18522	. . . 4 ⊢ (𝜑 → (♯‘𝐾) = (𝑃↑(𝑃 pCnt (♯‘𝑋))))
78	77	oveq2d 6990	. . 3 ⊢ (𝜑 → ((♯‘𝑋) / (♯‘𝐾)) = ((♯‘𝑋) / (𝑃↑(𝑃 pCnt (♯‘𝑋)))))
79	76, 78	breqtrd 4951	. 2 ⊢ (𝜑 → (♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∥ ((♯‘𝑋) / (𝑃↑(𝑃 pCnt (♯‘𝑋)))))
80	11, 79	eqbrtrd 4947	1 ⊢ (𝜑 → (♯‘(𝑃 pSyl 𝐺)) ∥ ((♯‘𝑋) / (𝑃↑(𝑃 pCnt (♯‘𝑋)))))

Syntax hints:   → wi 4   ↔ wb 198   = wceq 1507   ∈ wcel 2050   ≠ wne 2961  ∀wral 3082  {crab 3086   ⊆ wss 3823  ∅c0 4172  𝒫 cpw 4416   class class class wbr 4925   ↦ cmpt 5004  ran crn 5404  ‘cfv 6185  (class class class)co 6974   ∈ cmpo 6976   Er wer 8084   / cqs 8086  Fincfn 8304  0cc0 10333   · cmul 10338   / cdiv 11096  ℕcn 11437  ℕ₀cn0 11705  ℤcz 11791  ↑cexp 13242  ♯chash 13503   ∥ cdvds 15465  ℙcprime 15869   pCnt cpc 16027  Basecbs 16337   ↾_s cress 16338  +_gcplusg 16419  0_gc0g 16567  Grpcgrp 17903  -_gcsg 17905  SubGrpcsubg 18069  NrmSGrpcnsg 18070   ~_QG cqg 18071   pSyl cslw 18429

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1758  ax-4 1772  ax-5 1869  ax-6 1928  ax-7 1965  ax-8 2052  ax-9 2059  ax-10 2079  ax-11 2093  ax-12 2106  ax-13 2301  ax-ext 2744  ax-rep 5045  ax-sep 5056  ax-nul 5063  ax-pow 5115  ax-pr 5182  ax-un 7277  ax-inf2 8896  ax-cnex 10389  ax-resscn 10390  ax-1cn 10391  ax-icn 10392  ax-addcl 10393  ax-addrcl 10394  ax-mulcl 10395  ax-mulrcl 10396  ax-mulcom 10397  ax-addass 10398  ax-mulass 10399  ax-distr 10400  ax-i2m1 10401  ax-1ne0 10402  ax-1rid 10403  ax-rnegex 10404  ax-rrecex 10405  ax-cnre 10406  ax-pre-lttri 10407  ax-pre-lttrn 10408  ax-pre-ltadd 10409  ax-pre-mulgt0 10410  ax-pre-sup 10411

This theorem depends on definitions:  df-bi 199  df-an 388  df-or 834  df-3or 1069  df-3an 1070  df-tru 1510  df-fal 1520  df-ex 1743  df-nf 1747  df-sb 2016  df-mo 2547  df-eu 2584  df-clab 2753  df-cleq 2765  df-clel 2840  df-nfc 2912  df-ne 2962  df-nel 3068  df-ral 3087  df-rex 3088  df-reu 3089  df-rmo 3090  df-rab 3091  df-v 3411  df-sbc 3676  df-csb 3781  df-dif 3826  df-un 3828  df-in 3830  df-ss 3837  df-pss 3839  df-nul 4173  df-if 4345  df-pw 4418  df-sn 4436  df-pr 4438  df-tp 4440  df-op 4442  df-uni 4709  df-int 4746  df-iun 4790  df-disj 4894  df-br 4926  df-opab 4988  df-mpt 5005  df-tr 5027  df-id 5308  df-eprel 5313  df-po 5322  df-so 5323  df-fr 5362  df-se 5363  df-we 5364  df-xp 5409  df-rel 5410  df-cnv 5411  df-co 5412  df-dm 5413  df-rn 5414  df-res 5415  df-ima 5416  df-pred 5983  df-ord 6029  df-on 6030  df-lim 6031  df-suc 6032  df-iota 6149  df-fun 6187  df-fn 6188  df-f 6189  df-f1 6190  df-fo 6191  df-f1o 6192  df-fv 6193  df-isom 6194  df-riota 6935  df-ov 6977  df-oprab 6978  df-mpo 6979  df-om 7395  df-1st 7499  df-2nd 7500  df-wrecs 7748  df-recs 7810  df-rdg 7848  df-1o 7903  df-2o 7904  df-oadd 7907  df-omul 7908  df-er 8087  df-ec 8089  df-qs 8093  df-map 8206  df-en 8305  df-dom 8306  df-sdom 8307  df-fin 8308  df-sup 8699  df-inf 8700  df-oi 8767  df-dju 9122  df-card 9160  df-acn 9163  df-pnf 10474  df-mnf 10475  df-xr 10476  df-ltxr 10477  df-le 10478  df-sub 10670  df-neg 10671  df-div 11097  df-nn 11438  df-2 11501  df-3 11502  df-n0 11706  df-xnn0 11778  df-z 11792  df-uz 12057  df-q 12161  df-rp 12203  df-fz 12707  df-fzo 12848  df-fl 12975  df-mod 13051  df-seq 13183  df-exp 13243  df-fac 13447  df-bc 13476  df-hash 13504  df-cj 14317  df-re 14318  df-im 14319  df-sqrt 14453  df-abs 14454  df-clim 14704  df-sum 14902  df-dvds 15466  df-gcd 15702  df-prm 15870  df-pc 16028  df-ndx 16340  df-slot 16341  df-base 16343  df-sets 16344  df-ress 16345  df-plusg 16432  df-0g 16569  df-mgm 17722  df-sgrp 17764  df-mnd 17775  df-submnd 17816  df-grp 17906  df-minusg 17907  df-sbg 17908  df-mulg 18024  df-subg 18072  df-nsg 18073  df-eqg 18074  df-ghm 18139  df-ga 18203  df-od 18430  df-pgp 18432  df-slw 18433

This theorem is referenced by:  sylow3  18531