pgpssslw - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > pgpssslw		Structured version Visualization version GIF version

Theorem pgpssslw 19551

Description: Every 𝑃-subgroup is contained in a Sylow 𝑃-subgroup. (Contributed by Mario Carneiro, 16-Jan-2015.)

**Hypotheses**
Ref	Expression
pgpssslw.1	⊢ 𝑋 = (Base‘𝐺)
pgpssslw.2	⊢ 𝑆 = (𝐺 ↾_s 𝐻)
pgpssslw.3	⊢ 𝐹 = (𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} ↦ (♯‘𝑥))

**Assertion**
Ref	Expression
pgpssslw	⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ∃𝑘 ∈ (𝑃 pSyl 𝐺)𝐻 ⊆ 𝑘)

Distinct variable groups: 𝑥,𝑘,𝑦,𝐺 𝑘,𝐻,𝑥,𝑦 𝑃,𝑘,𝑥,𝑦 𝑘,𝑋,𝑥 𝑘,𝐹 𝑆,𝑘,𝑥,𝑦 Allowed substitution hints: 𝐹(𝑥,𝑦) 𝑋(𝑦)

Proof of Theorem pgpssslw Dummy variables 𝑚 𝑤 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		simp2 1137	. . . . . . . . . 10 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → 𝑋 ∈ Fin)
2		elrabi 3657	. . . . . . . . . . 11 ⊢ (𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} → 𝑥 ∈ (SubGrp‘𝐺))
3		pgpssslw.1	. . . . . . . . . . . 12 ⊢ 𝑋 = (Base‘𝐺)
4	3	subgss 19066	. . . . . . . . . . 11 ⊢ (𝑥 ∈ (SubGrp‘𝐺) → 𝑥 ⊆ 𝑋)
5	2, 4	syl 17	. . . . . . . . . 10 ⊢ (𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} → 𝑥 ⊆ 𝑋)
6		ssfi 9143	. . . . . . . . . 10 ⊢ ((𝑋 ∈ Fin ∧ 𝑥 ⊆ 𝑋) → 𝑥 ∈ Fin)
7	1, 5, 6	syl2an 596	. . . . . . . . 9 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → 𝑥 ∈ Fin)
8		hashcl 14328	. . . . . . . . 9 ⊢ (𝑥 ∈ Fin → (♯‘𝑥) ∈ ℕ₀)
9	7, 8	syl 17	. . . . . . . 8 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (♯‘𝑥) ∈ ℕ₀)
10	9	nn0zd 12562	. . . . . . 7 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (♯‘𝑥) ∈ ℤ)
11		pgpssslw.3	. . . . . . 7 ⊢ 𝐹 = (𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} ↦ (♯‘𝑥))
12	10, 11	fmptd 7089	. . . . . 6 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → 𝐹:{𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}⟶ℤ)
13	12	frnd 6699	. . . . 5 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ran 𝐹 ⊆ ℤ)
14		fvex 6874	. . . . . . . 8 ⊢ (♯‘𝑥) ∈ V
15	14, 11	fnmpti 6664	. . . . . . 7 ⊢ 𝐹 Fn {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}
16		eqimss2 4009	. . . . . . . . . 10 ⊢ (𝑦 = 𝐻 → 𝐻 ⊆ 𝑦)
17	16	biantrud 531	. . . . . . . . 9 ⊢ (𝑦 = 𝐻 → (𝑃 pGrp (𝐺 ↾_s 𝑦) ↔ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)))
18		oveq2 7398	. . . . . . . . . . 11 ⊢ (𝑦 = 𝐻 → (𝐺 ↾_s 𝑦) = (𝐺 ↾_s 𝐻))
19		pgpssslw.2	. . . . . . . . . . 11 ⊢ 𝑆 = (𝐺 ↾_s 𝐻)
20	18, 19	eqtr4di 2783	. . . . . . . . . 10 ⊢ (𝑦 = 𝐻 → (𝐺 ↾_s 𝑦) = 𝑆)
21	20	breq2d 5122	. . . . . . . . 9 ⊢ (𝑦 = 𝐻 → (𝑃 pGrp (𝐺 ↾_s 𝑦) ↔ 𝑃 pGrp 𝑆))
22	17, 21	bitr3d 281	. . . . . . . 8 ⊢ (𝑦 = 𝐻 → ((𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦) ↔ 𝑃 pGrp 𝑆))
23		simp1 1136	. . . . . . . 8 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → 𝐻 ∈ (SubGrp‘𝐺))
24		simp3 1138	. . . . . . . 8 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → 𝑃 pGrp 𝑆)
25	22, 23, 24	elrabd 3664	. . . . . . 7 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → 𝐻 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)})
26		fnfvelrn 7055	. . . . . . 7 ⊢ ((𝐹 Fn {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} ∧ 𝐻 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (𝐹‘𝐻) ∈ ran 𝐹)
27	15, 25, 26	sylancr 587	. . . . . 6 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → (𝐹‘𝐻) ∈ ran 𝐹)
28	27	ne0d 4308	. . . . 5 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ran 𝐹 ≠ ∅)
29		hashcl 14328	. . . . . . . 8 ⊢ (𝑋 ∈ Fin → (♯‘𝑋) ∈ ℕ₀)
30	1, 29	syl 17	. . . . . . 7 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → (♯‘𝑋) ∈ ℕ₀)
31	30	nn0red 12511	. . . . . 6 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → (♯‘𝑋) ∈ ℝ)
32		fveq2 6861	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑚 → (♯‘𝑥) = (♯‘𝑚))
33		fvex 6874	. . . . . . . . . . 11 ⊢ (♯‘𝑚) ∈ V
34	32, 11, 33	fvmpt 6971	. . . . . . . . . 10 ⊢ (𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} → (𝐹‘𝑚) = (♯‘𝑚))
35	34	adantl 481	. . . . . . . . 9 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (𝐹‘𝑚) = (♯‘𝑚))
36		oveq2 7398	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝑚 → (𝐺 ↾_s 𝑦) = (𝐺 ↾_s 𝑚))
37	36	breq2d 5122	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑚 → (𝑃 pGrp (𝐺 ↾_s 𝑦) ↔ 𝑃 pGrp (𝐺 ↾_s 𝑚)))
38		sseq2 3976	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑚 → (𝐻 ⊆ 𝑦 ↔ 𝐻 ⊆ 𝑚))
39	37, 38	anbi12d 632	. . . . . . . . . . 11 ⊢ (𝑦 = 𝑚 → ((𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦) ↔ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚)))
40	39	elrab 3662	. . . . . . . . . 10 ⊢ (𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} ↔ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚)))
41	1	adantr 480	. . . . . . . . . . . 12 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → 𝑋 ∈ Fin)
42	3	subgss 19066	. . . . . . . . . . . . 13 ⊢ (𝑚 ∈ (SubGrp‘𝐺) → 𝑚 ⊆ 𝑋)
43	42	ad2antrl 728	. . . . . . . . . . . 12 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → 𝑚 ⊆ 𝑋)
44		ssdomg 8974	. . . . . . . . . . . 12 ⊢ (𝑋 ∈ Fin → (𝑚 ⊆ 𝑋 → 𝑚 ≼ 𝑋))
45	41, 43, 44	sylc 65	. . . . . . . . . . 11 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → 𝑚 ≼ 𝑋)
46	41, 43	ssfid 9219	. . . . . . . . . . . 12 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → 𝑚 ∈ Fin)
47		hashdom 14351	. . . . . . . . . . . 12 ⊢ ((𝑚 ∈ Fin ∧ 𝑋 ∈ Fin) → ((♯‘𝑚) ≤ (♯‘𝑋) ↔ 𝑚 ≼ 𝑋))
48	46, 41, 47	syl2anc 584	. . . . . . . . . . 11 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → ((♯‘𝑚) ≤ (♯‘𝑋) ↔ 𝑚 ≼ 𝑋))
49	45, 48	mpbird 257	. . . . . . . . . 10 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → (♯‘𝑚) ≤ (♯‘𝑋))
50	40, 49	sylan2b 594	. . . . . . . . 9 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (♯‘𝑚) ≤ (♯‘𝑋))
51	35, 50	eqbrtrd 5132	. . . . . . . 8 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (𝐹‘𝑚) ≤ (♯‘𝑋))
52	51	ralrimiva 3126	. . . . . . 7 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ∀𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} (𝐹‘𝑚) ≤ (♯‘𝑋))
53		breq1 5113	. . . . . . . . 9 ⊢ (𝑤 = (𝐹‘𝑚) → (𝑤 ≤ (♯‘𝑋) ↔ (𝐹‘𝑚) ≤ (♯‘𝑋)))
54	53	ralrn 7063	. . . . . . . 8 ⊢ (𝐹 Fn {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} → (∀𝑤 ∈ ran 𝐹 𝑤 ≤ (♯‘𝑋) ↔ ∀𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} (𝐹‘𝑚) ≤ (♯‘𝑋)))
55	15, 54	ax-mp 5	. . . . . . 7 ⊢ (∀𝑤 ∈ ran 𝐹 𝑤 ≤ (♯‘𝑋) ↔ ∀𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} (𝐹‘𝑚) ≤ (♯‘𝑋))
56	52, 55	sylibr 234	. . . . . 6 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ∀𝑤 ∈ ran 𝐹 𝑤 ≤ (♯‘𝑋))
57		brralrspcev 5170	. . . . . 6 ⊢ (((♯‘𝑋) ∈ ℝ ∧ ∀𝑤 ∈ ran 𝐹 𝑤 ≤ (♯‘𝑋)) → ∃𝑧 ∈ ℝ ∀𝑤 ∈ ran 𝐹 𝑤 ≤ 𝑧)
58	31, 56, 57	syl2anc 584	. . . . 5 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ∃𝑧 ∈ ℝ ∀𝑤 ∈ ran 𝐹 𝑤 ≤ 𝑧)
59		suprzcl 12621	. . . . 5 ⊢ ((ran 𝐹 ⊆ ℤ ∧ ran 𝐹 ≠ ∅ ∧ ∃𝑧 ∈ ℝ ∀𝑤 ∈ ran 𝐹 𝑤 ≤ 𝑧) → sup(ran 𝐹, ℝ, < ) ∈ ran 𝐹)
60	13, 28, 58, 59	syl3anc 1373	. . . 4 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → sup(ran 𝐹, ℝ, < ) ∈ ran 𝐹)
61		fvelrnb 6924	. . . . 5 ⊢ (𝐹 Fn {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} → (sup(ran 𝐹, ℝ, < ) ∈ ran 𝐹 ↔ ∃𝑘 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))
62	15, 61	ax-mp 5	. . . 4 ⊢ (sup(ran 𝐹, ℝ, < ) ∈ ran 𝐹 ↔ ∃𝑘 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < ))
63	60, 62	sylib 218	. . 3 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ∃𝑘 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < ))
64		oveq2 7398	. . . . . 6 ⊢ (𝑦 = 𝑘 → (𝐺 ↾_s 𝑦) = (𝐺 ↾_s 𝑘))
65	64	breq2d 5122	. . . . 5 ⊢ (𝑦 = 𝑘 → (𝑃 pGrp (𝐺 ↾_s 𝑦) ↔ 𝑃 pGrp (𝐺 ↾_s 𝑘)))
66		sseq2 3976	. . . . 5 ⊢ (𝑦 = 𝑘 → (𝐻 ⊆ 𝑦 ↔ 𝐻 ⊆ 𝑘))
67	65, 66	anbi12d 632	. . . 4 ⊢ (𝑦 = 𝑘 → ((𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦) ↔ (𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘)))
68	67	rexrab 3670	. . 3 ⊢ (∃𝑘 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < ) ↔ ∃𝑘 ∈ (SubGrp‘𝐺)((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))
69	63, 68	sylib 218	. 2 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ∃𝑘 ∈ (SubGrp‘𝐺)((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))
70		simpl3 1194	. . . 4 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → 𝑃 pGrp 𝑆)
71		pgpprm 19530	. . . 4 ⊢ (𝑃 pGrp 𝑆 → 𝑃 ∈ ℙ)
72	70, 71	syl 17	. . 3 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → 𝑃 ∈ ℙ)
73		simprl 770	. . 3 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → 𝑘 ∈ (SubGrp‘𝐺))
74		zssre 12543	. . . . . . . . . . . . 13 ⊢ ℤ ⊆ ℝ
75	13, 74	sstrdi 3962	. . . . . . . . . . . 12 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ran 𝐹 ⊆ ℝ)
76	75	ad2antrr 726	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ran 𝐹 ⊆ ℝ)
77	28	ad2antrr 726	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ran 𝐹 ≠ ∅)
78	58	ad2antrr 726	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ∃𝑧 ∈ ℝ ∀𝑤 ∈ ran 𝐹 𝑤 ≤ 𝑧)
79		simprl 770	. . . . . . . . . . . . . 14 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑚 ∈ (SubGrp‘𝐺))
80		simprrr 781	. . . . . . . . . . . . . . 15 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑃 pGrp (𝐺 ↾_s 𝑚))
81		simprrl 780	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → (𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘))
82	81	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘))
83	82	simprd 495	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝐻 ⊆ 𝑘)
84		simprrl 780	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑘 ⊆ 𝑚)
85	83, 84	sstrd 3960	. . . . . . . . . . . . . . 15 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝐻 ⊆ 𝑚)
86	80, 85	jca 511	. . . . . . . . . . . . . 14 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))
87	39, 79, 86	elrabd 3664	. . . . . . . . . . . . 13 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)})
88	87, 34	syl 17	. . . . . . . . . . . 12 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝐹‘𝑚) = (♯‘𝑚))
89		fnfvelrn 7055	. . . . . . . . . . . . 13 ⊢ ((𝐹 Fn {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} ∧ 𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (𝐹‘𝑚) ∈ ran 𝐹)
90	15, 87, 89	sylancr 587	. . . . . . . . . . . 12 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝐹‘𝑚) ∈ ran 𝐹)
91	88, 90	eqeltrrd 2830	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (♯‘𝑚) ∈ ran 𝐹)
92	76, 77, 78, 91	suprubd 12152	. . . . . . . . . 10 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (♯‘𝑚) ≤ sup(ran 𝐹, ℝ, < ))
93		simprrr 781	. . . . . . . . . . . 12 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < ))
94	93	adantr 480	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < ))
95	73	adantr 480	. . . . . . . . . . . . 13 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑘 ∈ (SubGrp‘𝐺))
96	67, 95, 82	elrabd 3664	. . . . . . . . . . . 12 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑘 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)})
97		fveq2 6861	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑘 → (♯‘𝑥) = (♯‘𝑘))
98		fvex 6874	. . . . . . . . . . . . 13 ⊢ (♯‘𝑘) ∈ V
99	97, 11, 98	fvmpt 6971	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} → (𝐹‘𝑘) = (♯‘𝑘))
100	96, 99	syl 17	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝐹‘𝑘) = (♯‘𝑘))
101	94, 100	eqtr3d 2767	. . . . . . . . . 10 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → sup(ran 𝐹, ℝ, < ) = (♯‘𝑘))
102	92, 101	breqtrd 5136	. . . . . . . . 9 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (♯‘𝑚) ≤ (♯‘𝑘))
103		simpll2 1214	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑋 ∈ Fin)
104	42	ad2antrl 728	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑚 ⊆ 𝑋)
105	103, 104	ssfid 9219	. . . . . . . . . 10 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑚 ∈ Fin)
106	105, 84	ssfid 9219	. . . . . . . . . 10 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑘 ∈ Fin)
107		hashcl 14328	. . . . . . . . . . 11 ⊢ (𝑚 ∈ Fin → (♯‘𝑚) ∈ ℕ₀)
108		hashcl 14328	. . . . . . . . . . 11 ⊢ (𝑘 ∈ Fin → (♯‘𝑘) ∈ ℕ₀)
109		nn0re 12458	. . . . . . . . . . . 12 ⊢ ((♯‘𝑚) ∈ ℕ₀ → (♯‘𝑚) ∈ ℝ)
110		nn0re 12458	. . . . . . . . . . . 12 ⊢ ((♯‘𝑘) ∈ ℕ₀ → (♯‘𝑘) ∈ ℝ)
111		lenlt 11259	. . . . . . . . . . . 12 ⊢ (((♯‘𝑚) ∈ ℝ ∧ (♯‘𝑘) ∈ ℝ) → ((♯‘𝑚) ≤ (♯‘𝑘) ↔ ¬ (♯‘𝑘) < (♯‘𝑚)))
112	109, 110, 111	syl2an 596	. . . . . . . . . . 11 ⊢ (((♯‘𝑚) ∈ ℕ₀ ∧ (♯‘𝑘) ∈ ℕ₀) → ((♯‘𝑚) ≤ (♯‘𝑘) ↔ ¬ (♯‘𝑘) < (♯‘𝑚)))
113	107, 108, 112	syl2an 596	. . . . . . . . . 10 ⊢ ((𝑚 ∈ Fin ∧ 𝑘 ∈ Fin) → ((♯‘𝑚) ≤ (♯‘𝑘) ↔ ¬ (♯‘𝑘) < (♯‘𝑚)))
114	105, 106, 113	syl2anc 584	. . . . . . . . 9 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ((♯‘𝑚) ≤ (♯‘𝑘) ↔ ¬ (♯‘𝑘) < (♯‘𝑚)))
115	102, 114	mpbid 232	. . . . . . . 8 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ¬ (♯‘𝑘) < (♯‘𝑚))
116		php3 9179	. . . . . . . . . . 11 ⊢ ((𝑚 ∈ Fin ∧ 𝑘 ⊊ 𝑚) → 𝑘 ≺ 𝑚)
117	116	ex 412	. . . . . . . . . 10 ⊢ (𝑚 ∈ Fin → (𝑘 ⊊ 𝑚 → 𝑘 ≺ 𝑚))
118	105, 117	syl 17	. . . . . . . . 9 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝑘 ⊊ 𝑚 → 𝑘 ≺ 𝑚))
119		hashsdom 14353	. . . . . . . . . 10 ⊢ ((𝑘 ∈ Fin ∧ 𝑚 ∈ Fin) → ((♯‘𝑘) < (♯‘𝑚) ↔ 𝑘 ≺ 𝑚))
120	106, 105, 119	syl2anc 584	. . . . . . . . 9 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ((♯‘𝑘) < (♯‘𝑚) ↔ 𝑘 ≺ 𝑚))
121	118, 120	sylibrd 259	. . . . . . . 8 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝑘 ⊊ 𝑚 → (♯‘𝑘) < (♯‘𝑚)))
122	115, 121	mtod 198	. . . . . . 7 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ¬ 𝑘 ⊊ 𝑚)
123		sspss 4068	. . . . . . . . 9 ⊢ (𝑘 ⊆ 𝑚 ↔ (𝑘 ⊊ 𝑚 ∨ 𝑘 = 𝑚))
124	84, 123	sylib 218	. . . . . . . 8 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝑘 ⊊ 𝑚 ∨ 𝑘 = 𝑚))
125	124	ord 864	. . . . . . 7 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (¬ 𝑘 ⊊ 𝑚 → 𝑘 = 𝑚))
126	122, 125	mpd 15	. . . . . 6 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑘 = 𝑚)
127	126	expr 456	. . . . 5 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ 𝑚 ∈ (SubGrp‘𝐺)) → ((𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)) → 𝑘 = 𝑚))
128	81	simpld 494	. . . . . . 7 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → 𝑃 pGrp (𝐺 ↾_s 𝑘))
129	128	adantr 480	. . . . . 6 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ 𝑚 ∈ (SubGrp‘𝐺)) → 𝑃 pGrp (𝐺 ↾_s 𝑘))
130		oveq2 7398	. . . . . . . 8 ⊢ (𝑘 = 𝑚 → (𝐺 ↾_s 𝑘) = (𝐺 ↾_s 𝑚))
131	130	breq2d 5122	. . . . . . 7 ⊢ (𝑘 = 𝑚 → (𝑃 pGrp (𝐺 ↾_s 𝑘) ↔ 𝑃 pGrp (𝐺 ↾_s 𝑚)))
132		eqimss 4008	. . . . . . . 8 ⊢ (𝑘 = 𝑚 → 𝑘 ⊆ 𝑚)
133	132	biantrurd 532	. . . . . . 7 ⊢ (𝑘 = 𝑚 → (𝑃 pGrp (𝐺 ↾_s 𝑚) ↔ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚))))
134	131, 133	bitrd 279	. . . . . 6 ⊢ (𝑘 = 𝑚 → (𝑃 pGrp (𝐺 ↾_s 𝑘) ↔ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚))))
135	129, 134	syl5ibcom 245	. . . . 5 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ 𝑚 ∈ (SubGrp‘𝐺)) → (𝑘 = 𝑚 → (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚))))
136	127, 135	impbid 212	. . . 4 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ 𝑚 ∈ (SubGrp‘𝐺)) → ((𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)) ↔ 𝑘 = 𝑚))
137	136	ralrimiva 3126	. . 3 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → ∀𝑚 ∈ (SubGrp‘𝐺)((𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)) ↔ 𝑘 = 𝑚))
138		isslw 19545	. . 3 ⊢ (𝑘 ∈ (𝑃 pSyl 𝐺) ↔ (𝑃 ∈ ℙ ∧ 𝑘 ∈ (SubGrp‘𝐺) ∧ ∀𝑚 ∈ (SubGrp‘𝐺)((𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)) ↔ 𝑘 = 𝑚)))
139	72, 73, 137, 138	syl3anbrc 1344	. 2 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → 𝑘 ∈ (𝑃 pSyl 𝐺))
140	81	simprd 495	. 2 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → 𝐻 ⊆ 𝑘)
141	69, 139, 140	reximssdv 3152	1 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ∃𝑘 ∈ (𝑃 pSyl 𝐺)𝐻 ⊆ 𝑘)

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 ∧ wa 395 ∨ wo 847 ∧ w3a 1086 = wceq 1540 ∈ wcel 2109 ≠ wne 2926 ∀wral 3045 ∃wrex 3054 {crab 3408 ⊆ wss 3917 ⊊ wpss 3918 ∅c0 4299 class class class wbr 5110 ↦ cmpt 5191 ran crn 5642 Fn wfn 6509 ‘cfv 6514 (class class class)co 7390 ≼ cdom 8919 ≺ csdm 8920 Fincfn 8921 supcsup 9398 ℝcr 11074 < clt 11215 ≤ cle 11216 ℕ₀cn0 12449 ℤcz 12536 ♯chash 14302 ℙcprime 16648 Basecbs 17186 ↾_s cress 17207 SubGrpcsubg 19059 pGrp cpgp 19463 pSyl cslw 19464

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2008 ax-8 2111 ax-9 2119 ax-10 2142 ax-11 2158 ax-12 2178 ax-ext 2702 ax-sep 5254 ax-nul 5264 ax-pow 5323 ax-pr 5390 ax-un 7714 ax-cnex 11131 ax-resscn 11132 ax-1cn 11133 ax-icn 11134 ax-addcl 11135 ax-addrcl 11136 ax-mulcl 11137 ax-mulrcl 11138 ax-mulcom 11139 ax-addass 11140 ax-mulass 11141 ax-distr 11142 ax-i2m1 11143 ax-1ne0 11144 ax-1rid 11145 ax-rnegex 11146 ax-rrecex 11147 ax-cnre 11148 ax-pre-lttri 11149 ax-pre-lttrn 11150 ax-pre-ltadd 11151 ax-pre-mulgt0 11152 ax-pre-sup 11153

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2534 df-eu 2563 df-clab 2709 df-cleq 2722 df-clel 2804 df-nfc 2879 df-ne 2927 df-nel 3031 df-ral 3046 df-rex 3055 df-rmo 3356 df-reu 3357 df-rab 3409 df-v 3452 df-sbc 3757 df-csb 3866 df-dif 3920 df-un 3922 df-in 3924 df-ss 3934 df-pss 3937 df-nul 4300 df-if 4492 df-pw 4568 df-sn 4593 df-pr 4595 df-op 4599 df-uni 4875 df-int 4914 df-iun 4960 df-br 5111 df-opab 5173 df-mpt 5192 df-tr 5218 df-id 5536 df-eprel 5541 df-po 5549 df-so 5550 df-fr 5594 df-we 5596 df-xp 5647 df-rel 5648 df-cnv 5649 df-co 5650 df-dm 5651 df-rn 5652 df-res 5653 df-ima 5654 df-pred 6277 df-ord 6338 df-on 6339 df-lim 6340 df-suc 6341 df-iota 6467 df-fun 6516 df-fn 6517 df-f 6518 df-f1 6519 df-fo 6520 df-f1o 6521 df-fv 6522 df-riota 7347 df-ov 7393 df-oprab 7394 df-mpo 7395 df-om 7846 df-1st 7971 df-2nd 7972 df-frecs 8263 df-wrecs 8294 df-recs 8343 df-rdg 8381 df-1o 8437 df-oadd 8441 df-er 8674 df-en 8922 df-dom 8923 df-sdom 8924 df-fin 8925 df-sup 9400 df-card 9899 df-pnf 11217 df-mnf 11218 df-xr 11219 df-ltxr 11220 df-le 11221 df-sub 11414 df-neg 11415 df-nn 12194 df-n0 12450 df-xnn0 12523 df-z 12537 df-uz 12801 df-fz 13476 df-hash 14303 df-subg 19062 df-pgp 19467 df-slw 19468

This theorem is referenced by: slwn0 19552

W3C validator