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 19580

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 1143	. . . . . . . . . 10 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → 𝑋 ∈ Fin)
2		elrabi 3625	. . . . . . . . . . 11 ⊢ (𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} → 𝑥 ∈ (SubGrp‘𝐺))
3		pgpssslw.1	. . . . . . . . . . . 12 ⊢ 𝑋 = (Base‘𝐺)
4	3	subgss 19094	. . . . . . . . . . 11 ⊢ (𝑥 ∈ (SubGrp‘𝐺) → 𝑥 ⊆ 𝑋)
5	2, 4	syl 17	. . . . . . . . . 10 ⊢ (𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} → 𝑥 ⊆ 𝑋)
6		ssfi 9097	. . . . . . . . . 10 ⊢ ((𝑋 ∈ Fin ∧ 𝑥 ⊆ 𝑋) → 𝑥 ∈ Fin)
7	1, 5, 6	syl2an 602	. . . . . . . . 9 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → 𝑥 ∈ Fin)
8		hashcl 14309	. . . . . . . . 9 ⊢ (𝑥 ∈ Fin → (♯‘𝑥) ∈ ℕ₀)
9	7, 8	syl 17	. . . . . . . 8 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (♯‘𝑥) ∈ ℕ₀)
10	9	nn0zd 12540	. . . . . . 7 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (♯‘𝑥) ∈ ℤ)
11		pgpssslw.3	. . . . . . 7 ⊢ 𝐹 = (𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} ↦ (♯‘𝑥))
12	10, 11	fmptd 7055	. . . . . 6 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → 𝐹:{𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}⟶ℤ)
13	12	frnd 6663	. . . . 5 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ran 𝐹 ⊆ ℤ)
14		fvex 6840	. . . . . . . 8 ⊢ (♯‘𝑥) ∈ V
15	14, 11	fnmpti 6628	. . . . . . 7 ⊢ 𝐹 Fn {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}
16		eqimss2 3974	. . . . . . . . . 10 ⊢ (𝑦 = 𝐻 → 𝐻 ⊆ 𝑦)
17	16	biantrud 536	. . . . . . . . 9 ⊢ (𝑦 = 𝐻 → (𝑃 pGrp (𝐺 ↾_s 𝑦) ↔ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)))
18		oveq2 7364	. . . . . . . . . . 11 ⊢ (𝑦 = 𝐻 → (𝐺 ↾_s 𝑦) = (𝐺 ↾_s 𝐻))
19		pgpssslw.2	. . . . . . . . . . 11 ⊢ 𝑆 = (𝐺 ↾_s 𝐻)
20	18, 19	eqtr4di 2792	. . . . . . . . . 10 ⊢ (𝑦 = 𝐻 → (𝐺 ↾_s 𝑦) = 𝑆)
21	20	breq2d 5084	. . . . . . . . 9 ⊢ (𝑦 = 𝐻 → (𝑃 pGrp (𝐺 ↾_s 𝑦) ↔ 𝑃 pGrp 𝑆))
22	17, 21	bitr3d 282	. . . . . . . 8 ⊢ (𝑦 = 𝐻 → ((𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦) ↔ 𝑃 pGrp 𝑆))
23		simp1 1142	. . . . . . . 8 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → 𝐻 ∈ (SubGrp‘𝐺))
24		simp3 1144	. . . . . . . 8 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → 𝑃 pGrp 𝑆)
25	22, 23, 24	elrabd 3631	. . . . . . 7 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → 𝐻 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)})
26		fnfvelrn 7021	. . . . . . 7 ⊢ ((𝐹 Fn {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} ∧ 𝐻 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (𝐹‘𝐻) ∈ ran 𝐹)
27	15, 25, 26	sylancr 593	. . . . . 6 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → (𝐹‘𝐻) ∈ ran 𝐹)
28	27	ne0d 4270	. . . . 5 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ran 𝐹 ≠ ∅)
29		hashcl 14309	. . . . . . . 8 ⊢ (𝑋 ∈ Fin → (♯‘𝑋) ∈ ℕ₀)
30	1, 29	syl 17	. . . . . . 7 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → (♯‘𝑋) ∈ ℕ₀)
31	30	nn0red 12490	. . . . . 6 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → (♯‘𝑋) ∈ ℝ)
32		fveq2 6827	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑚 → (♯‘𝑥) = (♯‘𝑚))
33		fvex 6840	. . . . . . . . . . 11 ⊢ (♯‘𝑚) ∈ V
34	32, 11, 33	fvmpt 6935	. . . . . . . . . 10 ⊢ (𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} → (𝐹‘𝑚) = (♯‘𝑚))
35	34	adantl 482	. . . . . . . . 9 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (𝐹‘𝑚) = (♯‘𝑚))
36		oveq2 7364	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝑚 → (𝐺 ↾_s 𝑦) = (𝐺 ↾_s 𝑚))
37	36	breq2d 5084	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑚 → (𝑃 pGrp (𝐺 ↾_s 𝑦) ↔ 𝑃 pGrp (𝐺 ↾_s 𝑚)))
38		sseq2 3941	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑚 → (𝐻 ⊆ 𝑦 ↔ 𝐻 ⊆ 𝑚))
39	37, 38	anbi12d 638	. . . . . . . . . . 11 ⊢ (𝑦 = 𝑚 → ((𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦) ↔ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚)))
40	39	elrab 3629	. . . . . . . . . 10 ⊢ (𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} ↔ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚)))
41	1	adantr 481	. . . . . . . . . . . 12 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → 𝑋 ∈ Fin)
42	3	subgss 19094	. . . . . . . . . . . . 13 ⊢ (𝑚 ∈ (SubGrp‘𝐺) → 𝑚 ⊆ 𝑋)
43	42	ad2antrl 734	. . . . . . . . . . . 12 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → 𝑚 ⊆ 𝑋)
44		ssdomg 8937	. . . . . . . . . . . 12 ⊢ (𝑋 ∈ Fin → (𝑚 ⊆ 𝑋 → 𝑚 ≼ 𝑋))
45	41, 43, 44	sylc 65	. . . . . . . . . . 11 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → 𝑚 ≼ 𝑋)
46	41, 43	ssfid 9169	. . . . . . . . . . . 12 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → 𝑚 ∈ Fin)
47		hashdom 14332	. . . . . . . . . . . 12 ⊢ ((𝑚 ∈ Fin ∧ 𝑋 ∈ Fin) → ((♯‘𝑚) ≤ (♯‘𝑋) ↔ 𝑚 ≼ 𝑋))
48	46, 41, 47	syl2anc 590	. . . . . . . . . . 11 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → ((♯‘𝑚) ≤ (♯‘𝑋) ↔ 𝑚 ≼ 𝑋))
49	45, 48	mpbird 258	. . . . . . . . . 10 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → (♯‘𝑚) ≤ (♯‘𝑋))
50	40, 49	sylan2b 600	. . . . . . . . 9 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (♯‘𝑚) ≤ (♯‘𝑋))
51	35, 50	eqbrtrd 5094	. . . . . . . 8 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (𝐹‘𝑚) ≤ (♯‘𝑋))
52	51	ralrimiva 3131	. . . . . . 7 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ∀𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} (𝐹‘𝑚) ≤ (♯‘𝑋))
53		breq1 5075	. . . . . . . . 9 ⊢ (𝑤 = (𝐹‘𝑚) → (𝑤 ≤ (♯‘𝑋) ↔ (𝐹‘𝑚) ≤ (♯‘𝑋)))
54	53	ralrn 7029	. . . . . . . 8 ⊢ (𝐹 Fn {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} → (∀𝑤 ∈ ran 𝐹 𝑤 ≤ (♯‘𝑋) ↔ ∀𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} (𝐹‘𝑚) ≤ (♯‘𝑋)))
55	15, 54	ax-mp 5	. . . . . . 7 ⊢ (∀𝑤 ∈ ran 𝐹 𝑤 ≤ (♯‘𝑋) ↔ ∀𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} (𝐹‘𝑚) ≤ (♯‘𝑋))
56	52, 55	sylibr 235	. . . . . 6 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ∀𝑤 ∈ ran 𝐹 𝑤 ≤ (♯‘𝑋))
57		brralrspcev 5132	. . . . . 6 ⊢ (((♯‘𝑋) ∈ ℝ ∧ ∀𝑤 ∈ ran 𝐹 𝑤 ≤ (♯‘𝑋)) → ∃𝑧 ∈ ℝ ∀𝑤 ∈ ran 𝐹 𝑤 ≤ 𝑧)
58	31, 56, 57	syl2anc 590	. . . . 5 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ∃𝑧 ∈ ℝ ∀𝑤 ∈ ran 𝐹 𝑤 ≤ 𝑧)
59		suprzcl 12600	. . . . 5 ⊢ ((ran 𝐹 ⊆ ℤ ∧ ran 𝐹 ≠ ∅ ∧ ∃𝑧 ∈ ℝ ∀𝑤 ∈ ran 𝐹 𝑤 ≤ 𝑧) → sup(ran 𝐹, ℝ, < ) ∈ ran 𝐹)
60	13, 28, 58, 59	syl3anc 1379	. . . 4 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → sup(ran 𝐹, ℝ, < ) ∈ ran 𝐹)
61		fvelrnb 6887	. . . . 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 219	. . 3 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ∃𝑘 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < ))
64		oveq2 7364	. . . . . 6 ⊢ (𝑦 = 𝑘 → (𝐺 ↾_s 𝑦) = (𝐺 ↾_s 𝑘))
65	64	breq2d 5084	. . . . 5 ⊢ (𝑦 = 𝑘 → (𝑃 pGrp (𝐺 ↾_s 𝑦) ↔ 𝑃 pGrp (𝐺 ↾_s 𝑘)))
66		sseq2 3941	. . . . 5 ⊢ (𝑦 = 𝑘 → (𝐻 ⊆ 𝑦 ↔ 𝐻 ⊆ 𝑘))
67	65, 66	anbi12d 638	. . . 4 ⊢ (𝑦 = 𝑘 → ((𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦) ↔ (𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘)))
68	67	rexrab 3637	. . 3 ⊢ (∃𝑘 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < ) ↔ ∃𝑘 ∈ (SubGrp‘𝐺)((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))
69	63, 68	sylib 219	. 2 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ∃𝑘 ∈ (SubGrp‘𝐺)((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))
70		simpl3 1200	. . . 4 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → 𝑃 pGrp 𝑆)
71		pgpprm 19559	. . . 4 ⊢ (𝑃 pGrp 𝑆 → 𝑃 ∈ ℙ)
72	70, 71	syl 17	. . 3 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → 𝑃 ∈ ℙ)
73		simprl 776	. . 3 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → 𝑘 ∈ (SubGrp‘𝐺))
74		zssre 12522	. . . . . . . . . . . . 13 ⊢ ℤ ⊆ ℝ
75	13, 74	sstrdi 3927	. . . . . . . . . . . 12 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ran 𝐹 ⊆ ℝ)
76	75	ad2antrr 732	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ran 𝐹 ⊆ ℝ)
77	28	ad2antrr 732	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ran 𝐹 ≠ ∅)
78	58	ad2antrr 732	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ∃𝑧 ∈ ℝ ∀𝑤 ∈ ran 𝐹 𝑤 ≤ 𝑧)
79		simprl 776	. . . . . . . . . . . . . 14 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑚 ∈ (SubGrp‘𝐺))
80		simprrr 787	. . . . . . . . . . . . . . 15 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑃 pGrp (𝐺 ↾_s 𝑚))
81		simprrl 786	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → (𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘))
82	81	adantr 481	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘))
83	82	simprd 496	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝐻 ⊆ 𝑘)
84		simprrl 786	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑘 ⊆ 𝑚)
85	83, 84	sstrd 3925	. . . . . . . . . . . . . . 15 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝐻 ⊆ 𝑚)
86	80, 85	jca 516	. . . . . . . . . . . . . 14 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))
87	39, 79, 86	elrabd 3631	. . . . . . . . . . . . 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 7021	. . . . . . . . . . . . 13 ⊢ ((𝐹 Fn {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} ∧ 𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (𝐹‘𝑚) ∈ ran 𝐹)
90	15, 87, 89	sylancr 593	. . . . . . . . . . . 12 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝐹‘𝑚) ∈ ran 𝐹)
91	88, 90	eqeltrrd 2840	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (♯‘𝑚) ∈ ran 𝐹)
92	76, 77, 78, 91	suprubd 12109	. . . . . . . . . 10 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (♯‘𝑚) ≤ sup(ran 𝐹, ℝ, < ))
93		simprrr 787	. . . . . . . . . . . 12 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < ))
94	93	adantr 481	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < ))
95	73	adantr 481	. . . . . . . . . . . . 13 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑘 ∈ (SubGrp‘𝐺))
96	67, 95, 82	elrabd 3631	. . . . . . . . . . . 12 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑘 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)})
97		fveq2 6827	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑘 → (♯‘𝑥) = (♯‘𝑘))
98		fvex 6840	. . . . . . . . . . . . 13 ⊢ (♯‘𝑘) ∈ V
99	97, 11, 98	fvmpt 6935	. . . . . . . . . . . 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 2776	. . . . . . . . . 10 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → sup(ran 𝐹, ℝ, < ) = (♯‘𝑘))
102	92, 101	breqtrd 5098	. . . . . . . . 9 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (♯‘𝑚) ≤ (♯‘𝑘))
103		simpll2 1220	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑋 ∈ Fin)
104	42	ad2antrl 734	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑚 ⊆ 𝑋)
105	103, 104	ssfid 9169	. . . . . . . . . 10 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑚 ∈ Fin)
106	105, 84	ssfid 9169	. . . . . . . . . 10 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑘 ∈ Fin)
107		hashcl 14309	. . . . . . . . . . 11 ⊢ (𝑚 ∈ Fin → (♯‘𝑚) ∈ ℕ₀)
108		hashcl 14309	. . . . . . . . . . 11 ⊢ (𝑘 ∈ Fin → (♯‘𝑘) ∈ ℕ₀)
109		nn0re 12437	. . . . . . . . . . . 12 ⊢ ((♯‘𝑚) ∈ ℕ₀ → (♯‘𝑚) ∈ ℝ)
110		nn0re 12437	. . . . . . . . . . . 12 ⊢ ((♯‘𝑘) ∈ ℕ₀ → (♯‘𝑘) ∈ ℝ)
111		lenlt 11215	. . . . . . . . . . . 12 ⊢ (((♯‘𝑚) ∈ ℝ ∧ (♯‘𝑘) ∈ ℝ) → ((♯‘𝑚) ≤ (♯‘𝑘) ↔ ¬ (♯‘𝑘) < (♯‘𝑚)))
112	109, 110, 111	syl2an 602	. . . . . . . . . . 11 ⊢ (((♯‘𝑚) ∈ ℕ₀ ∧ (♯‘𝑘) ∈ ℕ₀) → ((♯‘𝑚) ≤ (♯‘𝑘) ↔ ¬ (♯‘𝑘) < (♯‘𝑚)))
113	107, 108, 112	syl2an 602	. . . . . . . . . 10 ⊢ ((𝑚 ∈ Fin ∧ 𝑘 ∈ Fin) → ((♯‘𝑚) ≤ (♯‘𝑘) ↔ ¬ (♯‘𝑘) < (♯‘𝑚)))
114	105, 106, 113	syl2anc 590	. . . . . . . . 9 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ((♯‘𝑚) ≤ (♯‘𝑘) ↔ ¬ (♯‘𝑘) < (♯‘𝑚)))
115	102, 114	mpbid 233	. . . . . . . 8 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ¬ (♯‘𝑘) < (♯‘𝑚))
116		php3 9133	. . . . . . . . . . 11 ⊢ ((𝑚 ∈ Fin ∧ 𝑘 ⊊ 𝑚) → 𝑘 ≺ 𝑚)
117	116	ex 413	. . . . . . . . . 10 ⊢ (𝑚 ∈ Fin → (𝑘 ⊊ 𝑚 → 𝑘 ≺ 𝑚))
118	105, 117	syl 17	. . . . . . . . 9 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝑘 ⊊ 𝑚 → 𝑘 ≺ 𝑚))
119		hashsdom 14334	. . . . . . . . . 10 ⊢ ((𝑘 ∈ Fin ∧ 𝑚 ∈ Fin) → ((♯‘𝑘) < (♯‘𝑚) ↔ 𝑘 ≺ 𝑚))
120	106, 105, 119	syl2anc 590	. . . . . . . . 9 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ((♯‘𝑘) < (♯‘𝑚) ↔ 𝑘 ≺ 𝑚))
121	118, 120	sylibrd 260	. . . . . . . 8 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝑘 ⊊ 𝑚 → (♯‘𝑘) < (♯‘𝑚)))
122	115, 121	mtod 199	. . . . . . 7 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ¬ 𝑘 ⊊ 𝑚)
123		sspss 4033	. . . . . . . . 9 ⊢ (𝑘 ⊆ 𝑚 ↔ (𝑘 ⊊ 𝑚 ∨ 𝑘 = 𝑚))
124	84, 123	sylib 219	. . . . . . . 8 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝑘 ⊊ 𝑚 ∨ 𝑘 = 𝑚))
125	124	ord 870	. . . . . . 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 457	. . . . 5 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ 𝑚 ∈ (SubGrp‘𝐺)) → ((𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)) → 𝑘 = 𝑚))
128	81	simpld 495	. . . . . . 7 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → 𝑃 pGrp (𝐺 ↾_s 𝑘))
129	128	adantr 481	. . . . . 6 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ 𝑚 ∈ (SubGrp‘𝐺)) → 𝑃 pGrp (𝐺 ↾_s 𝑘))
130		oveq2 7364	. . . . . . . 8 ⊢ (𝑘 = 𝑚 → (𝐺 ↾_s 𝑘) = (𝐺 ↾_s 𝑚))
131	130	breq2d 5084	. . . . . . 7 ⊢ (𝑘 = 𝑚 → (𝑃 pGrp (𝐺 ↾_s 𝑘) ↔ 𝑃 pGrp (𝐺 ↾_s 𝑚)))
132		eqimss 3973	. . . . . . . 8 ⊢ (𝑘 = 𝑚 → 𝑘 ⊆ 𝑚)
133	132	biantrurd 537	. . . . . . 7 ⊢ (𝑘 = 𝑚 → (𝑃 pGrp (𝐺 ↾_s 𝑚) ↔ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚))))
134	131, 133	bitrd 280	. . . . . 6 ⊢ (𝑘 = 𝑚 → (𝑃 pGrp (𝐺 ↾_s 𝑘) ↔ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚))))
135	129, 134	syl5ibcom 246	. . . . 5 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ 𝑚 ∈ (SubGrp‘𝐺)) → (𝑘 = 𝑚 → (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚))))
136	127, 135	impbid 213	. . . 4 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ 𝑚 ∈ (SubGrp‘𝐺)) → ((𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)) ↔ 𝑘 = 𝑚))
137	136	ralrimiva 3131	. . 3 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → ∀𝑚 ∈ (SubGrp‘𝐺)((𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)) ↔ 𝑘 = 𝑚))
138		isslw 19574	. . 3 ⊢ (𝑘 ∈ (𝑃 pSyl 𝐺) ↔ (𝑃 ∈ ℙ ∧ 𝑘 ∈ (SubGrp‘𝐺) ∧ ∀𝑚 ∈ (SubGrp‘𝐺)((𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)) ↔ 𝑘 = 𝑚)))
139	72, 73, 137, 138	syl3anbrc 1350	. 2 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → 𝑘 ∈ (𝑃 pSyl 𝐺))
140	81	simprd 496	. 2 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → 𝐻 ⊆ 𝑘)
141	69, 139, 140	reximssdv 3157	1 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ∃𝑘 ∈ (𝑃 pSyl 𝐺)𝐻 ⊆ 𝑘)

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 207 ∧ wa 396 ∨ wo 853 ∧ w3a 1092 = wceq 1547 ∈ wcel 2119 ≠ wne 2934 ∀wral 3053 ∃wrex 3063 {crab 3391 ⊆ wss 3883 ⊊ wpss 3884 ∅c0 4261 class class class wbr 5072 ↦ cmpt 5153 ran crn 5619 Fn wfn 6480 ‘cfv 6485 (class class class)co 7356 ≼ cdom 8881 ≺ csdm 8882 Fincfn 8883 supcsup 9343 ℝcr 11028 < clt 11170 ≤ cle 11171 ℕ₀cn0 12428 ℤcz 12515 ♯chash 14283 ℙcprime 16631 Basecbs 17170 ↾_s cress 17191 SubGrpcsubg 19087 pGrp cpgp 19492 pSyl cslw 19493

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1802 ax-4 1816 ax-5 1917 ax-6 1974 ax-7 2015 ax-8 2121 ax-9 2129 ax-10 2152 ax-11 2168 ax-12 2189 ax-ext 2711 ax-sep 5218 ax-nul 5228 ax-pow 5294 ax-pr 5362 ax-un 7678 ax-cnex 11085 ax-resscn 11086 ax-1cn 11087 ax-icn 11088 ax-addcl 11089 ax-addrcl 11090 ax-mulcl 11091 ax-mulrcl 11092 ax-mulcom 11093 ax-addass 11094 ax-mulass 11095 ax-distr 11096 ax-i2m1 11097 ax-1ne0 11098 ax-1rid 11099 ax-rnegex 11100 ax-rrecex 11101 ax-cnre 11102 ax-pre-lttri 11103 ax-pre-lttrn 11104 ax-pre-ltadd 11105 ax-pre-mulgt0 11106 ax-pre-sup 11107

This theorem depends on definitions: df-bi 208 df-an 397 df-or 854 df-3or 1093 df-3an 1094 df-tru 1550 df-fal 1560 df-ex 1787 df-nf 1791 df-sb 2074 df-mo 2543 df-eu 2573 df-clab 2718 df-cleq 2731 df-clel 2814 df-nfc 2888 df-ne 2935 df-nel 3039 df-ral 3054 df-rex 3064 df-rmo 3344 df-reu 3345 df-rab 3392 df-v 3433 df-sbc 3724 df-csb 3832 df-dif 3886 df-un 3888 df-in 3890 df-ss 3900 df-pss 3903 df-nul 4262 df-if 4455 df-pw 4531 df-sn 4556 df-pr 4558 df-op 4562 df-uni 4839 df-int 4878 df-iun 4923 df-br 5073 df-opab 5135 df-mpt 5154 df-tr 5180 df-id 5513 df-eprel 5518 df-po 5526 df-so 5527 df-fr 5571 df-we 5573 df-xp 5624 df-rel 5625 df-cnv 5626 df-co 5627 df-dm 5628 df-rn 5629 df-res 5630 df-ima 5631 df-pred 6252 df-ord 6313 df-on 6314 df-lim 6315 df-suc 6316 df-iota 6441 df-fun 6487 df-fn 6488 df-f 6489 df-f1 6490 df-fo 6491 df-f1o 6492 df-fv 6493 df-riota 7313 df-ov 7359 df-oprab 7360 df-mpo 7361 df-om 7807 df-1st 7931 df-2nd 7932 df-frecs 8221 df-wrecs 8252 df-recs 8301 df-rdg 8339 df-1o 8395 df-oadd 8399 df-er 8633 df-en 8884 df-dom 8885 df-sdom 8886 df-fin 8887 df-sup 9345 df-card 9854 df-pnf 11172 df-mnf 11173 df-xr 11174 df-ltxr 11175 df-le 11176 df-sub 11370 df-neg 11371 df-nn 12166 df-n0 12429 df-xnn0 12502 df-z 12516 df-uz 12780 df-fz 13453 df-hash 14284 df-subg 19090 df-pgp 19496 df-slw 19497

This theorem is referenced by: slwn0 19581

W3C validator