Theorem sylow3lem4 19150

Description: Lemma for sylow3 19153, 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 19149	. 2 ⊢ (𝜑 → (♯‘(𝑃 pSyl 𝐺)) = (♯‘(𝑋 / (𝐺 ~QG 𝑁))))
12		slwsubg 19130	. . . . . . . . . 10 ⊢ (𝐾 ∈ (𝑃 pSyl 𝐺) → 𝐾 ∈ (SubGrp‘𝐺))
13	8, 12	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ∈ (SubGrp‘𝐺))
14		eqid 2738	. . . . . . . . . . 11 ⊢ (𝐺 ↾s 𝑁) = (𝐺 ↾s 𝑁)
15	10, 1, 5, 14	nmznsg 18711	. . . . . . . . . 10 ⊢ (𝐾 ∈ (SubGrp‘𝐺) → 𝐾 ∈ (NrmSGrp‘(𝐺 ↾s 𝑁)))
16		nsgsubg 18701	. . . . . . . . . 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 18708	. . . . . . . . . . 11 ⊢ (𝐺 ∈ Grp → 𝑁 ∈ (SubGrp‘𝐺))
20	2, 19	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ∈ (SubGrp‘𝐺))
21	14	subgbas 18674	. . . . . . . . . 10 ⊢ (𝑁 ∈ (SubGrp‘𝐺) → 𝑁 = (Base‘(𝐺 ↾s 𝑁)))
22	20, 21	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 𝑁 = (Base‘(𝐺 ↾s 𝑁)))
23	1	subgss 18671	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (SubGrp‘𝐺) → 𝑁 ⊆ 𝑋)
24	20, 23	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ⊆ 𝑋)
25	3, 24	ssfid 8971	. . . . . . . . 9 ⊢ (𝜑 → 𝑁 ∈ Fin)
26	22, 25	eqeltrrd 2840	. . . . . . . 8 ⊢ (𝜑 → (Base‘(𝐺 ↾s 𝑁)) ∈ Fin)
27		eqid 2738	. . . . . . . . 9 ⊢ (Base‘(𝐺 ↾s 𝑁)) = (Base‘(𝐺 ↾s 𝑁))
28	27	lagsubg 18733	. . . . . . . 8 ⊢ ((𝐾 ∈ (SubGrp‘(𝐺 ↾s 𝑁)) ∧ (Base‘(𝐺 ↾s 𝑁)) ∈ Fin) → (♯‘𝐾) ∥ (♯‘(Base‘(𝐺 ↾s 𝑁))))
29	18, 26, 28	syl2anc 583	. . . . . . 7 ⊢ (𝜑 → (♯‘𝐾) ∥ (♯‘(Base‘(𝐺 ↾s 𝑁))))
30	22	fveq2d 6760	. . . . . . 7 ⊢ (𝜑 → (♯‘𝑁) = (♯‘(Base‘(𝐺 ↾s 𝑁))))
31	29, 30	breqtrrd 5098	. . . . . 6 ⊢ (𝜑 → (♯‘𝐾) ∥ (♯‘𝑁))
32		eqid 2738	. . . . . . . . . . . 12 ⊢ (0g‘𝐺) = (0g‘𝐺)
33	32	subg0cl 18678	. . . . . . . . . . 11 ⊢ (𝐾 ∈ (SubGrp‘𝐺) → (0g‘𝐺) ∈ 𝐾)
34	13, 33	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (0g‘𝐺) ∈ 𝐾)
35	34	ne0d 4266	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ≠ ∅)
36	1	subgss 18671	. . . . . . . . . . . 12 ⊢ (𝐾 ∈ (SubGrp‘𝐺) → 𝐾 ⊆ 𝑋)
37	13, 36	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐾 ⊆ 𝑋)
38	3, 37	ssfid 8971	. . . . . . . . . 10 ⊢ (𝜑 → 𝐾 ∈ Fin)
39		hashnncl 14009	. . . . . . . . . 10 ⊢ (𝐾 ∈ Fin → ((♯‘𝐾) ∈ ℕ ↔ 𝐾 ≠ ∅))
40	38, 39	syl 17	. . . . . . . . 9 ⊢ (𝜑 → ((♯‘𝐾) ∈ ℕ ↔ 𝐾 ≠ ∅))
41	35, 40	mpbird 256	. . . . . . . 8 ⊢ (𝜑 → (♯‘𝐾) ∈ ℕ)
42	41	nnzd 12354	. . . . . . 7 ⊢ (𝜑 → (♯‘𝐾) ∈ ℤ)
43		hashcl 13999	. . . . . . . . 9 ⊢ (𝑁 ∈ Fin → (♯‘𝑁) ∈ ℕ0)
44	25, 43	syl 17	. . . . . . . 8 ⊢ (𝜑 → (♯‘𝑁) ∈ ℕ0)
45	44	nn0zd 12353	. . . . . . 7 ⊢ (𝜑 → (♯‘𝑁) ∈ ℤ)
46		pwfi 8923	. . . . . . . . . . 11 ⊢ (𝑋 ∈ Fin ↔ 𝒫 𝑋 ∈ Fin)
47	3, 46	sylib 217	. . . . . . . . . 10 ⊢ (𝜑 → 𝒫 𝑋 ∈ Fin)
48		eqid 2738	. . . . . . . . . . . . 13 ⊢ (𝐺 ~QG 𝑁) = (𝐺 ~QG 𝑁)
49	1, 48	eqger 18721	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (SubGrp‘𝐺) → (𝐺 ~QG 𝑁) Er 𝑋)
50	20, 49	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐺 ~QG 𝑁) Er 𝑋)
51	50	qsss 8525	. . . . . . . . . 10 ⊢ (𝜑 → (𝑋 / (𝐺 ~QG 𝑁)) ⊆ 𝒫 𝑋)
52	47, 51	ssfid 8971	. . . . . . . . 9 ⊢ (𝜑 → (𝑋 / (𝐺 ~QG 𝑁)) ∈ Fin)
53		hashcl 13999	. . . . . . . . 9 ⊢ ((𝑋 / (𝐺 ~QG 𝑁)) ∈ Fin → (♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∈ ℕ0)
54	52, 53	syl 17	. . . . . . . 8 ⊢ (𝜑 → (♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∈ ℕ0)
55	54	nn0zd 12353	. . . . . . 7 ⊢ (𝜑 → (♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∈ ℤ)
56		dvdscmul 15920	. . . . . . 7 ⊢ (((♯‘𝐾) ∈ ℤ ∧ (♯‘𝑁) ∈ ℤ ∧ (♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∈ ℤ) → ((♯‘𝐾) ∥ (♯‘𝑁) → ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝐾)) ∥ ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝑁))))
57	42, 45, 55, 56	syl3anc 1369	. . . . . 6 ⊢ (𝜑 → ((♯‘𝐾) ∥ (♯‘𝑁) → ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝐾)) ∥ ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝑁))))
58	31, 57	mpd 15	. . . . 5 ⊢ (𝜑 → ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝐾)) ∥ ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝑁)))
59		hashcl 13999	. . . . . . . . 9 ⊢ (𝑋 ∈ Fin → (♯‘𝑋) ∈ ℕ0)
60	3, 59	syl 17	. . . . . . . 8 ⊢ (𝜑 → (♯‘𝑋) ∈ ℕ0)
61	60	nn0cnd 12225	. . . . . . 7 ⊢ (𝜑 → (♯‘𝑋) ∈ ℂ)
62	41	nncnd 11919	. . . . . . 7 ⊢ (𝜑 → (♯‘𝐾) ∈ ℂ)
63	41	nnne0d 11953	. . . . . . 7 ⊢ (𝜑 → (♯‘𝐾) ≠ 0)
64	61, 62, 63	divcan1d 11682	. . . . . 6 ⊢ (𝜑 → (((♯‘𝑋) / (♯‘𝐾)) · (♯‘𝐾)) = (♯‘𝑋))
65	1, 48, 20, 3	lagsubg2 18732	. . . . . 6 ⊢ (𝜑 → (♯‘𝑋) = ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝑁)))
66	64, 65	eqtrd 2778	. . . . 5 ⊢ (𝜑 → (((♯‘𝑋) / (♯‘𝐾)) · (♯‘𝐾)) = ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝑁)))
67	58, 66	breqtrrd 5098	. . . 4 ⊢ (𝜑 → ((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝐾)) ∥ (((♯‘𝑋) / (♯‘𝐾)) · (♯‘𝐾)))
68	1	lagsubg 18733	. . . . . . 7 ⊢ ((𝐾 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin) → (♯‘𝐾) ∥ (♯‘𝑋))
69	13, 3, 68	syl2anc 583	. . . . . 6 ⊢ (𝜑 → (♯‘𝐾) ∥ (♯‘𝑋))
70	60	nn0zd 12353	. . . . . . 7 ⊢ (𝜑 → (♯‘𝑋) ∈ ℤ)
71		dvdsval2 15894	. . . . . . 7 ⊢ (((♯‘𝐾) ∈ ℤ ∧ (♯‘𝐾) ≠ 0 ∧ (♯‘𝑋) ∈ ℤ) → ((♯‘𝐾) ∥ (♯‘𝑋) ↔ ((♯‘𝑋) / (♯‘𝐾)) ∈ ℤ))
72	42, 63, 70, 71	syl3anc 1369	. . . . . 6 ⊢ (𝜑 → ((♯‘𝐾) ∥ (♯‘𝑋) ↔ ((♯‘𝑋) / (♯‘𝐾)) ∈ ℤ))
73	69, 72	mpbid 231	. . . . 5 ⊢ (𝜑 → ((♯‘𝑋) / (♯‘𝐾)) ∈ ℤ)
74		dvdsmulcr 15923	. . . . 5 ⊢ (((♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∈ ℤ ∧ ((♯‘𝑋) / (♯‘𝐾)) ∈ ℤ ∧ ((♯‘𝐾) ∈ ℤ ∧ (♯‘𝐾) ≠ 0)) → (((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝐾)) ∥ (((♯‘𝑋) / (♯‘𝐾)) · (♯‘𝐾)) ↔ (♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∥ ((♯‘𝑋) / (♯‘𝐾))))
75	55, 73, 42, 63, 74	syl112anc 1372	. . . 4 ⊢ (𝜑 → (((♯‘(𝑋 / (𝐺 ~QG 𝑁))) · (♯‘𝐾)) ∥ (((♯‘𝑋) / (♯‘𝐾)) · (♯‘𝐾)) ↔ (♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∥ ((♯‘𝑋) / (♯‘𝐾))))
76	67, 75	mpbid 231	. . 3 ⊢ (𝜑 → (♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∥ ((♯‘𝑋) / (♯‘𝐾)))
77	1, 3, 8	slwhash 19144	. . . 4 ⊢ (𝜑 → (♯‘𝐾) = (𝑃↑(𝑃 pCnt (♯‘𝑋))))
78	77	oveq2d 7271	. . 3 ⊢ (𝜑 → ((♯‘𝑋) / (♯‘𝐾)) = ((♯‘𝑋) / (𝑃↑(𝑃 pCnt (♯‘𝑋)))))
79	76, 78	breqtrd 5096	. 2 ⊢ (𝜑 → (♯‘(𝑋 / (𝐺 ~QG 𝑁))) ∥ ((♯‘𝑋) / (𝑃↑(𝑃 pCnt (♯‘𝑋)))))
80	11, 79	eqbrtrd 5092	1 ⊢ (𝜑 → (♯‘(𝑃 pSyl 𝐺)) ∥ ((♯‘𝑋) / (𝑃↑(𝑃 pCnt (♯‘𝑋)))))

Syntax hints:   → wi 4   ↔ wb 205   = wceq 1539   ∈ wcel 2108   ≠ wne 2942  ∀wral 3063  {crab 3067   ⊆ wss 3883  ∅c0 4253  𝒫 cpw 4530   class class class wbr 5070   ↦ cmpt 5153  ran crn 5581  ‘cfv 6418  (class class class)co 7255   ∈ cmpo 7257   Er wer 8453   / cqs 8455  Fincfn 8691  0cc0 10802   · cmul 10807   / cdiv 11562  ℕcn 11903  ℕ₀cn0 12163  ℤcz 12249  ↑cexp 13710  ♯chash 13972   ∥ cdvds 15891  ℙcprime 16304   pCnt cpc 16465  Basecbs 16840   ↾_s cress 16867  +_gcplusg 16888  0_gc0g 17067  Grpcgrp 18492  -_gcsg 18494  SubGrpcsubg 18664  NrmSGrpcnsg 18665   ~_QG cqg 18666   pSyl cslw 19050

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-rep 5205  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566  ax-inf2 9329  ax-cnex 10858  ax-resscn 10859  ax-1cn 10860  ax-icn 10861  ax-addcl 10862  ax-addrcl 10863  ax-mulcl 10864  ax-mulrcl 10865  ax-mulcom 10866  ax-addass 10867  ax-mulass 10868  ax-distr 10869  ax-i2m1 10870  ax-1ne0 10871  ax-1rid 10872  ax-rnegex 10873  ax-rrecex 10874  ax-cnre 10875  ax-pre-lttri 10876  ax-pre-lttrn 10877  ax-pre-ltadd 10878  ax-pre-mulgt0 10879  ax-pre-sup 10880

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-nel 3049  df-ral 3068  df-rex 3069  df-reu 3070  df-rmo 3071  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-int 4877  df-iun 4923  df-disj 5036  df-br 5071  df-opab 5133  df-mpt 5154  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-se 5536  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-pred 6191  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-isom 6427  df-riota 7212  df-ov 7258  df-oprab 7259  df-mpo 7260  df-om 7688  df-1st 7804  df-2nd 7805  df-frecs 8068  df-wrecs 8099  df-recs 8173  df-rdg 8212  df-1o 8267  df-2o 8268  df-oadd 8271  df-omul 8272  df-er 8456  df-ec 8458  df-qs 8462  df-map 8575  df-en 8692  df-dom 8693  df-sdom 8694  df-fin 8695  df-sup 9131  df-inf 9132  df-oi 9199  df-dju 9590  df-card 9628  df-acn 9631  df-pnf 10942  df-mnf 10943  df-xr 10944  df-ltxr 10945  df-le 10946  df-sub 11137  df-neg 11138  df-div 11563  df-nn 11904  df-2 11966  df-3 11967  df-n0 12164  df-xnn0 12236  df-z 12250  df-uz 12512  df-q 12618  df-rp 12660  df-fz 13169  df-fzo 13312  df-fl 13440  df-mod 13518  df-seq 13650  df-exp 13711  df-fac 13916  df-bc 13945  df-hash 13973  df-cj 14738  df-re 14739  df-im 14740  df-sqrt 14874  df-abs 14875  df-clim 15125  df-sum 15326  df-dvds 15892  df-gcd 16130  df-prm 16305  df-pc 16466  df-sets 16793  df-slot 16811  df-ndx 16823  df-base 16841  df-ress 16868  df-plusg 16901  df-0g 17069  df-mgm 18241  df-sgrp 18290  df-mnd 18301  df-submnd 18346  df-grp 18495  df-minusg 18496  df-sbg 18497  df-mulg 18616  df-subg 18667  df-nsg 18668  df-eqg 18669  df-ghm 18747  df-ga 18811  df-od 19051  df-pgp 19053  df-slw 19054

This theorem is referenced by:  sylow3  19153