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 19555

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 1138	. . . . . . . . . 10 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → 𝑋 ∈ Fin)
2		elrabi 3644	. . . . . . . . . . 11 ⊢ (𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} → 𝑥 ∈ (SubGrp‘𝐺))
3		pgpssslw.1	. . . . . . . . . . . 12 ⊢ 𝑋 = (Base‘𝐺)
4	3	subgss 19069	. . . . . . . . . . 11 ⊢ (𝑥 ∈ (SubGrp‘𝐺) → 𝑥 ⊆ 𝑋)
5	2, 4	syl 17	. . . . . . . . . 10 ⊢ (𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} → 𝑥 ⊆ 𝑋)
6		ssfi 9109	. . . . . . . . . 10 ⊢ ((𝑋 ∈ Fin ∧ 𝑥 ⊆ 𝑋) → 𝑥 ∈ Fin)
7	1, 5, 6	syl2an 597	. . . . . . . . 9 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → 𝑥 ∈ Fin)
8		hashcl 14291	. . . . . . . . 9 ⊢ (𝑥 ∈ Fin → (♯‘𝑥) ∈ ℕ₀)
9	7, 8	syl 17	. . . . . . . 8 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (♯‘𝑥) ∈ ℕ₀)
10	9	nn0zd 12525	. . . . . . 7 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (♯‘𝑥) ∈ ℤ)
11		pgpssslw.3	. . . . . . 7 ⊢ 𝐹 = (𝑥 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} ↦ (♯‘𝑥))
12	10, 11	fmptd 7068	. . . . . 6 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → 𝐹:{𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}⟶ℤ)
13	12	frnd 6678	. . . . 5 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ran 𝐹 ⊆ ℤ)
14		fvex 6855	. . . . . . . 8 ⊢ (♯‘𝑥) ∈ V
15	14, 11	fnmpti 6643	. . . . . . 7 ⊢ 𝐹 Fn {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}
16		eqimss2 3995	. . . . . . . . . 10 ⊢ (𝑦 = 𝐻 → 𝐻 ⊆ 𝑦)
17	16	biantrud 531	. . . . . . . . 9 ⊢ (𝑦 = 𝐻 → (𝑃 pGrp (𝐺 ↾_s 𝑦) ↔ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)))
18		oveq2 7376	. . . . . . . . . . 11 ⊢ (𝑦 = 𝐻 → (𝐺 ↾_s 𝑦) = (𝐺 ↾_s 𝐻))
19		pgpssslw.2	. . . . . . . . . . 11 ⊢ 𝑆 = (𝐺 ↾_s 𝐻)
20	18, 19	eqtr4di 2790	. . . . . . . . . 10 ⊢ (𝑦 = 𝐻 → (𝐺 ↾_s 𝑦) = 𝑆)
21	20	breq2d 5112	. . . . . . . . 9 ⊢ (𝑦 = 𝐻 → (𝑃 pGrp (𝐺 ↾_s 𝑦) ↔ 𝑃 pGrp 𝑆))
22	17, 21	bitr3d 281	. . . . . . . 8 ⊢ (𝑦 = 𝐻 → ((𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦) ↔ 𝑃 pGrp 𝑆))
23		simp1 1137	. . . . . . . 8 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → 𝐻 ∈ (SubGrp‘𝐺))
24		simp3 1139	. . . . . . . 8 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → 𝑃 pGrp 𝑆)
25	22, 23, 24	elrabd 3650	. . . . . . 7 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → 𝐻 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)})
26		fnfvelrn 7034	. . . . . . 7 ⊢ ((𝐹 Fn {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} ∧ 𝐻 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (𝐹‘𝐻) ∈ ran 𝐹)
27	15, 25, 26	sylancr 588	. . . . . 6 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → (𝐹‘𝐻) ∈ ran 𝐹)
28	27	ne0d 4296	. . . . 5 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ran 𝐹 ≠ ∅)
29		hashcl 14291	. . . . . . . 8 ⊢ (𝑋 ∈ Fin → (♯‘𝑋) ∈ ℕ₀)
30	1, 29	syl 17	. . . . . . 7 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → (♯‘𝑋) ∈ ℕ₀)
31	30	nn0red 12475	. . . . . 6 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → (♯‘𝑋) ∈ ℝ)
32		fveq2 6842	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑚 → (♯‘𝑥) = (♯‘𝑚))
33		fvex 6855	. . . . . . . . . . 11 ⊢ (♯‘𝑚) ∈ V
34	32, 11, 33	fvmpt 6949	. . . . . . . . . 10 ⊢ (𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} → (𝐹‘𝑚) = (♯‘𝑚))
35	34	adantl 481	. . . . . . . . 9 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (𝐹‘𝑚) = (♯‘𝑚))
36		oveq2 7376	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝑚 → (𝐺 ↾_s 𝑦) = (𝐺 ↾_s 𝑚))
37	36	breq2d 5112	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑚 → (𝑃 pGrp (𝐺 ↾_s 𝑦) ↔ 𝑃 pGrp (𝐺 ↾_s 𝑚)))
38		sseq2 3962	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑚 → (𝐻 ⊆ 𝑦 ↔ 𝐻 ⊆ 𝑚))
39	37, 38	anbi12d 633	. . . . . . . . . . 11 ⊢ (𝑦 = 𝑚 → ((𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦) ↔ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚)))
40	39	elrab 3648	. . . . . . . . . 10 ⊢ (𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} ↔ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚)))
41	1	adantr 480	. . . . . . . . . . . 12 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → 𝑋 ∈ Fin)
42	3	subgss 19069	. . . . . . . . . . . . 13 ⊢ (𝑚 ∈ (SubGrp‘𝐺) → 𝑚 ⊆ 𝑋)
43	42	ad2antrl 729	. . . . . . . . . . . 12 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → 𝑚 ⊆ 𝑋)
44		ssdomg 8949	. . . . . . . . . . . 12 ⊢ (𝑋 ∈ Fin → (𝑚 ⊆ 𝑋 → 𝑚 ≼ 𝑋))
45	41, 43, 44	sylc 65	. . . . . . . . . . 11 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → 𝑚 ≼ 𝑋)
46	41, 43	ssfid 9181	. . . . . . . . . . . 12 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → 𝑚 ∈ Fin)
47		hashdom 14314	. . . . . . . . . . . 12 ⊢ ((𝑚 ∈ Fin ∧ 𝑋 ∈ Fin) → ((♯‘𝑚) ≤ (♯‘𝑋) ↔ 𝑚 ≼ 𝑋))
48	46, 41, 47	syl2anc 585	. . . . . . . . . . 11 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → ((♯‘𝑚) ≤ (♯‘𝑋) ↔ 𝑚 ≼ 𝑋))
49	45, 48	mpbird 257	. . . . . . . . . 10 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑃 pGrp (𝐺 ↾_s 𝑚) ∧ 𝐻 ⊆ 𝑚))) → (♯‘𝑚) ≤ (♯‘𝑋))
50	40, 49	sylan2b 595	. . . . . . . . 9 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (♯‘𝑚) ≤ (♯‘𝑋))
51	35, 50	eqbrtrd 5122	. . . . . . . 8 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ 𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (𝐹‘𝑚) ≤ (♯‘𝑋))
52	51	ralrimiva 3130	. . . . . . 7 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ∀𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} (𝐹‘𝑚) ≤ (♯‘𝑋))
53		breq1 5103	. . . . . . . . 9 ⊢ (𝑤 = (𝐹‘𝑚) → (𝑤 ≤ (♯‘𝑋) ↔ (𝐹‘𝑚) ≤ (♯‘𝑋)))
54	53	ralrn 7042	. . . . . . . 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 5160	. . . . . 6 ⊢ (((♯‘𝑋) ∈ ℝ ∧ ∀𝑤 ∈ ran 𝐹 𝑤 ≤ (♯‘𝑋)) → ∃𝑧 ∈ ℝ ∀𝑤 ∈ ran 𝐹 𝑤 ≤ 𝑧)
58	31, 56, 57	syl2anc 585	. . . . 5 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ∃𝑧 ∈ ℝ ∀𝑤 ∈ ran 𝐹 𝑤 ≤ 𝑧)
59		suprzcl 12584	. . . . 5 ⊢ ((ran 𝐹 ⊆ ℤ ∧ ran 𝐹 ≠ ∅ ∧ ∃𝑧 ∈ ℝ ∀𝑤 ∈ ran 𝐹 𝑤 ≤ 𝑧) → sup(ran 𝐹, ℝ, < ) ∈ ran 𝐹)
60	13, 28, 58, 59	syl3anc 1374	. . . 4 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → sup(ran 𝐹, ℝ, < ) ∈ ran 𝐹)
61		fvelrnb 6902	. . . . 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 7376	. . . . . 6 ⊢ (𝑦 = 𝑘 → (𝐺 ↾_s 𝑦) = (𝐺 ↾_s 𝑘))
65	64	breq2d 5112	. . . . 5 ⊢ (𝑦 = 𝑘 → (𝑃 pGrp (𝐺 ↾_s 𝑦) ↔ 𝑃 pGrp (𝐺 ↾_s 𝑘)))
66		sseq2 3962	. . . . 5 ⊢ (𝑦 = 𝑘 → (𝐻 ⊆ 𝑦 ↔ 𝐻 ⊆ 𝑘))
67	65, 66	anbi12d 633	. . . 4 ⊢ (𝑦 = 𝑘 → ((𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦) ↔ (𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘)))
68	67	rexrab 3656	. . 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 1195	. . . 4 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → 𝑃 pGrp 𝑆)
71		pgpprm 19534	. . . 4 ⊢ (𝑃 pGrp 𝑆 → 𝑃 ∈ ℙ)
72	70, 71	syl 17	. . 3 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → 𝑃 ∈ ℙ)
73		simprl 771	. . 3 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → 𝑘 ∈ (SubGrp‘𝐺))
74		zssre 12507	. . . . . . . . . . . . 13 ⊢ ℤ ⊆ ℝ
75	13, 74	sstrdi 3948	. . . . . . . . . . . 12 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ran 𝐹 ⊆ ℝ)
76	75	ad2antrr 727	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ran 𝐹 ⊆ ℝ)
77	28	ad2antrr 727	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ran 𝐹 ≠ ∅)
78	58	ad2antrr 727	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → ∃𝑧 ∈ ℝ ∀𝑤 ∈ ran 𝐹 𝑤 ≤ 𝑧)
79		simprl 771	. . . . . . . . . . . . . 14 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑚 ∈ (SubGrp‘𝐺))
80		simprrr 782	. . . . . . . . . . . . . . 15 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑃 pGrp (𝐺 ↾_s 𝑚))
81		simprrl 781	. . . . . . . . . . . . . . . . . 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 781	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑘 ⊆ 𝑚)
85	83, 84	sstrd 3946	. . . . . . . . . . . . . . 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 3650	. . . . . . . . . . . . 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 7034	. . . . . . . . . . . . 13 ⊢ ((𝐹 Fn {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)} ∧ 𝑚 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)}) → (𝐹‘𝑚) ∈ ran 𝐹)
90	15, 87, 89	sylancr 588	. . . . . . . . . . . 12 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝐹‘𝑚) ∈ ran 𝐹)
91	88, 90	eqeltrrd 2838	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (♯‘𝑚) ∈ ran 𝐹)
92	76, 77, 78, 91	suprubd 12116	. . . . . . . . . 10 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (♯‘𝑚) ≤ sup(ran 𝐹, ℝ, < ))
93		simprrr 782	. . . . . . . . . . . 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 3650	. . . . . . . . . . . 12 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑘 ∈ {𝑦 ∈ (SubGrp‘𝐺) ∣ (𝑃 pGrp (𝐺 ↾_s 𝑦) ∧ 𝐻 ⊆ 𝑦)})
97		fveq2 6842	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑘 → (♯‘𝑥) = (♯‘𝑘))
98		fvex 6855	. . . . . . . . . . . . 13 ⊢ (♯‘𝑘) ∈ V
99	97, 11, 98	fvmpt 6949	. . . . . . . . . . . 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 2774	. . . . . . . . . 10 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → sup(ran 𝐹, ℝ, < ) = (♯‘𝑘))
102	92, 101	breqtrd 5126	. . . . . . . . 9 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (♯‘𝑚) ≤ (♯‘𝑘))
103		simpll2 1215	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑋 ∈ Fin)
104	42	ad2antrl 729	. . . . . . . . . . 11 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑚 ⊆ 𝑋)
105	103, 104	ssfid 9181	. . . . . . . . . 10 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑚 ∈ Fin)
106	105, 84	ssfid 9181	. . . . . . . . . 10 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → 𝑘 ∈ Fin)
107		hashcl 14291	. . . . . . . . . . 11 ⊢ (𝑚 ∈ Fin → (♯‘𝑚) ∈ ℕ₀)
108		hashcl 14291	. . . . . . . . . . 11 ⊢ (𝑘 ∈ Fin → (♯‘𝑘) ∈ ℕ₀)
109		nn0re 12422	. . . . . . . . . . . 12 ⊢ ((♯‘𝑚) ∈ ℕ₀ → (♯‘𝑚) ∈ ℝ)
110		nn0re 12422	. . . . . . . . . . . 12 ⊢ ((♯‘𝑘) ∈ ℕ₀ → (♯‘𝑘) ∈ ℝ)
111		lenlt 11223	. . . . . . . . . . . 12 ⊢ (((♯‘𝑚) ∈ ℝ ∧ (♯‘𝑘) ∈ ℝ) → ((♯‘𝑚) ≤ (♯‘𝑘) ↔ ¬ (♯‘𝑘) < (♯‘𝑚)))
112	109, 110, 111	syl2an 597	. . . . . . . . . . 11 ⊢ (((♯‘𝑚) ∈ ℕ₀ ∧ (♯‘𝑘) ∈ ℕ₀) → ((♯‘𝑚) ≤ (♯‘𝑘) ↔ ¬ (♯‘𝑘) < (♯‘𝑚)))
113	107, 108, 112	syl2an 597	. . . . . . . . . 10 ⊢ ((𝑚 ∈ Fin ∧ 𝑘 ∈ Fin) → ((♯‘𝑚) ≤ (♯‘𝑘) ↔ ¬ (♯‘𝑘) < (♯‘𝑚)))
114	105, 106, 113	syl2anc 585	. . . . . . . . 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 9145	. . . . . . . . . . 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 14316	. . . . . . . . . 10 ⊢ ((𝑘 ∈ Fin ∧ 𝑚 ∈ Fin) → ((♯‘𝑘) < (♯‘𝑚) ↔ 𝑘 ≺ 𝑚))
120	106, 105, 119	syl2anc 585	. . . . . . . . 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 4056	. . . . . . . . 9 ⊢ (𝑘 ⊆ 𝑚 ↔ (𝑘 ⊊ 𝑚 ∨ 𝑘 = 𝑚))
124	84, 123	sylib 218	. . . . . . . 8 ⊢ ((((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) ∧ (𝑚 ∈ (SubGrp‘𝐺) ∧ (𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)))) → (𝑘 ⊊ 𝑚 ∨ 𝑘 = 𝑚))
125	124	ord 865	. . . . . . 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 7376	. . . . . . . 8 ⊢ (𝑘 = 𝑚 → (𝐺 ↾_s 𝑘) = (𝐺 ↾_s 𝑚))
131	130	breq2d 5112	. . . . . . 7 ⊢ (𝑘 = 𝑚 → (𝑃 pGrp (𝐺 ↾_s 𝑘) ↔ 𝑃 pGrp (𝐺 ↾_s 𝑚)))
132		eqimss 3994	. . . . . . . 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 3130	. . 3 ⊢ (((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) ∧ (𝑘 ∈ (SubGrp‘𝐺) ∧ ((𝑃 pGrp (𝐺 ↾_s 𝑘) ∧ 𝐻 ⊆ 𝑘) ∧ (𝐹‘𝑘) = sup(ran 𝐹, ℝ, < )))) → ∀𝑚 ∈ (SubGrp‘𝐺)((𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)) ↔ 𝑘 = 𝑚))
138		isslw 19549	. . 3 ⊢ (𝑘 ∈ (𝑃 pSyl 𝐺) ↔ (𝑃 ∈ ℙ ∧ 𝑘 ∈ (SubGrp‘𝐺) ∧ ∀𝑚 ∈ (SubGrp‘𝐺)((𝑘 ⊆ 𝑚 ∧ 𝑃 pGrp (𝐺 ↾_s 𝑚)) ↔ 𝑘 = 𝑚)))
139	72, 73, 137, 138	syl3anbrc 1345	. 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 3156	1 ⊢ ((𝐻 ∈ (SubGrp‘𝐺) ∧ 𝑋 ∈ Fin ∧ 𝑃 pGrp 𝑆) → ∃𝑘 ∈ (𝑃 pSyl 𝐺)𝐻 ⊆ 𝑘)

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 ∧ wa 395 ∨ wo 848 ∧ w3a 1087 = wceq 1542 ∈ wcel 2114 ≠ wne 2933 ∀wral 3052 ∃wrex 3062 {crab 3401 ⊆ wss 3903 ⊊ wpss 3904 ∅c0 4287 class class class wbr 5100 ↦ cmpt 5181 ran crn 5633 Fn wfn 6495 ‘cfv 6500 (class class class)co 7368 ≼ cdom 8893 ≺ csdm 8894 Fincfn 8895 supcsup 9355 ℝcr 11037 < clt 11178 ≤ cle 11179 ℕ₀cn0 12413 ℤcz 12500 ♯chash 14265 ℙcprime 16610 Basecbs 17148 ↾_s cress 17169 SubGrpcsubg 19062 pGrp cpgp 19467 pSyl cslw 19468

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2709 ax-sep 5243 ax-nul 5253 ax-pow 5312 ax-pr 5379 ax-un 7690 ax-cnex 11094 ax-resscn 11095 ax-1cn 11096 ax-icn 11097 ax-addcl 11098 ax-addrcl 11099 ax-mulcl 11100 ax-mulrcl 11101 ax-mulcom 11102 ax-addass 11103 ax-mulass 11104 ax-distr 11105 ax-i2m1 11106 ax-1ne0 11107 ax-1rid 11108 ax-rnegex 11109 ax-rrecex 11110 ax-cnre 11111 ax-pre-lttri 11112 ax-pre-lttrn 11113 ax-pre-ltadd 11114 ax-pre-mulgt0 11115 ax-pre-sup 11116

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2540 df-eu 2570 df-clab 2716 df-cleq 2729 df-clel 2812 df-nfc 2886 df-ne 2934 df-nel 3038 df-ral 3053 df-rex 3063 df-rmo 3352 df-reu 3353 df-rab 3402 df-v 3444 df-sbc 3743 df-csb 3852 df-dif 3906 df-un 3908 df-in 3910 df-ss 3920 df-pss 3923 df-nul 4288 df-if 4482 df-pw 4558 df-sn 4583 df-pr 4585 df-op 4589 df-uni 4866 df-int 4905 df-iun 4950 df-br 5101 df-opab 5163 df-mpt 5182 df-tr 5208 df-id 5527 df-eprel 5532 df-po 5540 df-so 5541 df-fr 5585 df-we 5587 df-xp 5638 df-rel 5639 df-cnv 5640 df-co 5641 df-dm 5642 df-rn 5643 df-res 5644 df-ima 5645 df-pred 6267 df-ord 6328 df-on 6329 df-lim 6330 df-suc 6331 df-iota 6456 df-fun 6502 df-fn 6503 df-f 6504 df-f1 6505 df-fo 6506 df-f1o 6507 df-fv 6508 df-riota 7325 df-ov 7371 df-oprab 7372 df-mpo 7373 df-om 7819 df-1st 7943 df-2nd 7944 df-frecs 8233 df-wrecs 8264 df-recs 8313 df-rdg 8351 df-1o 8407 df-oadd 8411 df-er 8645 df-en 8896 df-dom 8897 df-sdom 8898 df-fin 8899 df-sup 9357 df-card 9863 df-pnf 11180 df-mnf 11181 df-xr 11182 df-ltxr 11183 df-le 11184 df-sub 11378 df-neg 11379 df-nn 12158 df-n0 12414 df-xnn0 12487 df-z 12501 df-uz 12764 df-fz 13436 df-hash 14266 df-subg 19065 df-pgp 19471 df-slw 19472

This theorem is referenced by: slwn0 19556

W3C validator